home *** CD-ROM | disk | FTP | other *** search
- 0: 0: cflg 0
- 02: br 04
- 04: mov $0157000,sp
- 010: clr r4
- 012: mov sp,r5
- 014: cmp pc,r5
- 016: bcc 032
- 020: mov (r4)+,(r5)+
- 022: cmp r5,$0157777
- 026: bcs 020
- 030: jmp (sp)
- 032: clr (r4)+
- 034: cmp r4,sp
- 036: bcs 032
- 040: mov r0,0175566
- 044: mov r1,0175400
- 050: clr (r1)+
- 052: mov $04000,r5
- 056: mov $0157064,r4
- 062: br 074
- 064: bpl 066
- 066: bisb -(r4),sp
- 070: halt
- 072: wait
- 074: tst (r1)
- 076: bmi 076
- 0100: bit r5,(r1)
- 0102: beq 074
- 0104: mov (r4)+,(r1)
- 0106: asl r5
- 0110: bpl 074
- 0112: mov $044,0175502
- 0120: mov r0,0175512
- 0124: mov $011,0175516
- 0132: mov $0154406,r2
- 0136: mov $0154422,(r2)+
- 0142: mov r5,(r2)+
- 0144: mov $0154506,(r2)+
- 0150: mov r5,(r2)+
- 0152: mov 0177776(r1),r0
- 0156: tst 0175410
- 0162: bmi 0156
- 0164: mov 0175456,0175570
- 0172: mov 0175460,0175572
- 0200: br 0224
- 0202: movb $056,0764
- 0210: movb $0142,0765
- 0216: movb $0165,0766
- 0224: mov $0154574,r0
- 0230: clr (r0)+
- 0232: cmp r0,sp
- 0234: bcs 0230
- 0236: mov $0157760,r1
- 0242: mov $02,r0
- 0246: clr 0177674
- 0252: jsr pc,0430
- 0256: tstb (r1)
- 0260: beq 0342
- 0262: jsr pc,0512
- 0266: br 0202
- 0270: mov $0154574,r2
- 0274: mov r1,r3
- 0276: mov r2,r4
- 0300: add $020,r2
- 0304: tst (r4)+
- 0306: beq 0332
- 0310: cmpb (r3)+,(r4)+
- 0312: bne 0332
- 0314: cmp r4,r2
- 0316: bcs 0310
- 0320: mov 0177760(r2),r0
- 0324: add $016,r1
- 0330: br 0246
- 0332: cmp r2,$0156574
- 0336: bcs 0274
- 0340: br 0262
- 0342: clr r1
- 0344: jsr pc,0512
- 0350: br 0370
- 0352: mov $0154574,r2
- 0356: mov (r2)+,(r1)+
- 0360: cmp r2,$0156574
- 0364: bcs 0356
- 0366: br 0344
- 0370: mov 0175566,r0
- 0374: mov $02,r1
- 0400: mov 0175570,r2
- 0404: mov 0175572,r3
- 0410: mov 0175400,r4
- 0414: clr r5
- 0416: mov 020(r5),(r5)+
- 0422: cmp r5,sp
- 0424: bcs 0416
- 0426: clr pc
- 0430: add $037,r0
- 0434: mov r0,r5
- 0436: ash $0177774,r0
- 0442: bic $0170000,r0
- 0446: mov r0,0177676
- 0452: clr r0
- 0454: jsr pc,0650
- 0460: bic $0177760,r5
- 0464: mul $0100,r5
- 0470: add $0154574,r5
- 0474: mov $0156574,r4
- 0500: mov (r5)+,(r4)+
- 0502: cmp r4,$0156674
- 0506: bcs 0500
- 0510: rts pc
- 0512: add $02,(sp)
- 0516: mov 0177674,r0
- 0522: cmp r0,$04
- 0526: blt 0534
- 0530: mov $04,r0
- 0534: mov r0,-(sp)
- 0536: asl r0
- 0540: add (sp)+,r0
- 0542: add $0156611,r0
- 0546: movb (r0)+,0177676
- 0552: movb (r0)+,0177677
- 0556: movb 0177775(r0),r0
- 0562: bne 0572
- 0564: tst 0177676
- 0570: beq 0642
- 0572: jsr pc,0650
- 0576: mov 0177674,r0
- 0602: inc 0177674
- 0606: sub $04,r0
- 0612: blt 0646
- 0614: ash $02,r0
- 0620: mov 0154576(r0),0177676
- 0626: mov 0154574(r0),r0
- 0632: bne 0650
- 0634: tst 0177676
- 0640: bne 0650
- 0642: sub $02,(sp)
- 0646: rts pc
- 0650: mov r1,-(sp)
- 0652: mov 0177676,r1
- 0656: ashc $01,r0
- 0662: mov $041,0175516
- 0670: mov $02000,0175522
- 0676: mov $0154574,0175526
- 0704: mov r1,0175542
- 0710: mov (sp)+,r1
- 0712: mov r0,0175544
- 0716: mov $0100000,0175410
- 0724: mov $0100000,0175414
- 0732: mov *0175400,r0
- 0736: tst 0175410
- 0742: bmi 0736
- 0744: tstb 0175434
- 0750: beq 0756
- 0752: jmp 0200202
- 0756: rts pc
- 0760: add *072157(r5),-(r2)
- 0764: halt
- 0766: halt
- 0770: halt
- 0772: halt
- 0774: halt
- 0776: halt
- 01000:
- text address not found
-