Trailing-Edge
-
PDP-10 Archives
-
decuslib20-02
-
decus/20-0027/core.mac
There are 2 other files named core.mac in the archive. Click here to see a list.
TITLE CORE FOR SIMULATED PDP8 VERSION #2 SEPT. 1 '69
SUBTTL DAVE MCCLURE JULY/9/69
;CORE WILL BE ASSEMBLED WITH BOTH THE BINARY LOADER AND RIM LOADER IN
;THE TOP PAGE OF CORE FOR ANY SIZE PDP8 MEMORY.
INTERNAL CORE
IFE PACK,<
CORE: BLOCK <MEMSIZ-161>/3
SIZE=MEMSIZ-<MEMSIZ/^D12288>*^D12288
IFE SIZE,<
EXP 12127402
EXP 740274027402,740274020000,321242601300,775052372212
EXP 704052271212,764052301214,027413417510,222677505626
EXP 121402561257,321352300070,620100000000,603152626036
EXP 321412145660,601152706016,526503004343,704112157402
EXP 603260146214,125732137604,770013531352,326142265313
EXP 321512133336,121433764260,335542265275,434374205336
EXP 321613761355,121553156201,361622167600,533200001376
EXP 710670067006,135557435262,000600000000,601460115357
EXP 601671067006,751053747006,601153676016,742037763776
EXP 535700005301
>
SIZE=SIZE-^D4096
IFE SIZE,<
EXP 1212
EXP 740274027402,740274027402,000032124260,130077505237
EXP 221270405227,121276405230,121402741341,751022267750
EXP 562612140256,125732135230,007062010000,000060315262
EXP 603632141214,566060115270,601652650300,434370411215
EXP 740260326014,621412573213,760477001353,135232614226
EXP 531332151213,333612143376,426033554226,527543437420
EXP 533632161376,135512155315,620136162216,760053320000
EXP 137671067006,700613555743,526200060000,000060146011
EXP 535760167106,700675105374,700660115367,601674203776
EXP 337653570000,530100000000
>
SIZE=SIZE-^D4096
IFE SIZE,<
EXP 121274027402,740274027402,740200003212,426013007750
EXP 523722127040,522712127640,523012140274,134175102226
EXP 775056261214,025612573213,523000706201,000000006031
EXP 526260363214,121456606011,527060165265,030043437041
EXP 121574026032,601462141257,321376047700,135313523261
EXP 422653133215,121333361214,337642603355,422652754343
EXP 742053363216,137613551215,531562013616,221676005332
EXP 000013767106,700670061355,574352620006,000000006014
EXP 601153576016,710670067510,537470066011,536760167420
EXP 377633765357,000053010000
>
>
IFN PACK,<
CORE: BLOCK MEMSIZ-161
BIN: EXP 1212
EXP 7402,7402,7402,7402,7402,7402,0000,3212
EXP 4260,1300,7750,5237,2212,7040,5227,1212
EXP 7640,5230,1214,0274,1341,7510,2226,7750
EXP 5626,1214,0256,1257,3213,5230,0070,6201
EXP 0000,0000,6031,5262,6036,3214,1214,5660
EXP 6011,5270,6016,5265,0300,4343,7041,1215
EXP 7402,6032,6014,6214,1257,3213,7604,7700
EXP 1353,1352,3261,4226,5313,3215,1213,3336
EXP 1214,3376,4260,3355,4226,5275,4343,7420
EXP 5336,3216,1376,1355,1215,5315,6201,3616
EXP 2216,7600,5332,0000,1376,7106,7006,7006
EXP 1355,5743,5262,0006,0000,0000
RIM: EXP 6014,6011,5357,6016,7106,7006,7510,5374,7006
EXP 6011,5367,6016,7420,3776,3376,5357,0000,5301
>
ENTRY SMP,SPL,CMP
SMP: AOS PC ;<6101> SKIP IF MEMORY PARITY ERROR FLAG IS 0
POPJ PDP,
SPL: POPJ PDP, ;<6102> SKIP IF POWER IS LOW
CMP: POPJ PDP, ;<6104> CLEAR MEMORY PARITY ERROR FLAG
END