/ Oakland CPM Archive / oakcpm.iso / cpm / sysutl / offctrlc.lbr

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 20 20 20 20 20 20 20 | 20 20 20 20 00 00 02 00 |.       |    ....|
|00000010| b9 a0 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 4f 46 46 43 54 52 4c | 43 41 53 4d 02 00 04 00 |.OFFCTRL|CASM....|
|00000030| 4d c3 50 0e 00 00 00 00 | 00 00 00 00 00 00 00 00 |M.P.....|........|
|00000040| 00 4f 46 46 43 54 52 4c | 43 42 41 53 06 00 06 00 |.OFFCTRL|CBAS....|
|00000050| 9d 08 50 0e 00 00 00 00 | 00 00 00 00 00 00 00 00 |..P.....|........|
|00000060| 00 4f 46 46 43 54 52 4c | 43 43 4f 4d 0c 00 01 00 |.OFFCTRL|CCOM....|
|00000070| d0 09 50 0e 00 00 00 00 | 00 00 00 00 00 00 00 00 |..P.....|........|
|00000080| 00 4f 46 46 43 54 52 4c | 43 44 4f 43 0d 00 08 00 |.OFFCTRL|CDOC....|
|00000090| 3c 14 50 0e 00 00 00 00 | 00 00 00 00 00 00 00 00 |<.P.....|........|
|000000a0| ff 20 20 20 20 20 20 20 | 20 20 20 20 00 00 00 00 |.       |    ....|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| ff 20 20 20 20 20 20 20 | 20 20 20 20 00 00 00 00 |.       |    ....|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| ff 20 20 20 20 20 20 20 | 20 20 20 20 00 00 00 00 |.       |    ....|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 46 52 45 4d 45 4d 20 20 | 45 51 55 20 38 48 0d 0a |FREMEM  |EQU 8H..|
|00000110| 4f 46 46 53 45 54 20 20 | 45 51 55 20 37 0d 0a 09 |OFFSET  |EQU 7...|
|00000120| 4f 52 47 20 31 30 30 48 | 0d 0a 09 4c 48 4c 44 09 |ORG 100H|...LHLD.|
|00000130| 31 0d 0a 09 4d 56 49 20 | 09 41 2c 4f 46 46 53 45 |1...MVI |.A,OFFSE|
|00000140| 54 0d 0a 09 41 44 44 09 | 4c 0d 0a 09 4d 4f 56 09 |T...ADD.|L...MOV.|
|00000150| 4c 2c 41 0d 0a 09 58 43 | 48 47 0d 0a 09 4c 44 41 |L,A...XC|HG...LDA|
|00000160| 58 09 44 0d 0a 09 53 54 | 41 09 46 52 45 4d 45 4d |X.D...ST|A.FREMEM|
|00000170| 2b 31 0d 0a 09 49 4e 58 | 09 44 0d 0a 09 4c 44 41 |+1...INX|.D...LDA|
|00000180| 58 09 44 0d 0a 09 53 54 | 41 09 46 52 45 4d 45 4d |X.D...ST|A.FREMEM|
|00000190| 2b 32 0d 0a 09 4d 56 49 | 09 41 2c 30 43 44 48 0d |+2...MVI|.A,0CDH.|
|000001a0| 0a 09 53 54 41 09 46 52 | 45 4d 45 4d 0d 0a 09 4d |..STA.FR|EMEM...M|
|000001b0| 56 49 09 41 2c 30 46 45 | 48 0d 0a 09 53 54 41 09 |VI.A,0FE|H...STA.|
|000001c0| 46 52 45 4d 45 4d 2b 33 | 0d 0a 09 4d 56 49 09 41 |FREMEM+3|...MVI.A|
|000001d0| 2c 33 48 0d 0a 09 53 54 | 41 09 46 52 45 4d 45 4d |,3H...ST|A.FREMEM|
|000001e0| 2b 34 0d 0a 09 4d 56 49 | 09 41 2c 30 43 32 48 0d |+4...MVI|.A,0C2H.|
|000001f0| 0a 09 53 54 41 09 46 52 | 45 4d 45 4d 2b 35 0d 0a |..STA.FR|EMEM+5..|
|00000200| 09 4d 56 49 09 41 2c 31 | 31 48 0d 0a 09 53 54 41 |.MVI.A,1|1H...STA|
|00000210| 09 46 52 45 4d 45 4d 2b | 36 0d 0a 09 53 55 42 09 |.FREMEM+|6...SUB.|
|00000220| 41 0d 0a 09 53 54 41 09 | 46 52 45 4d 45 4d 2b 37 |A...STA.|FREMEM+7|
|00000230| 0d 0a 09 4d 56 49 09 41 | 2c 39 37 48 0d 0a 09 53 |...MVI.A|,97H...S|
|00000240| 54 41 09 46 52 45 4d 45 | 4d 2b 38 0d 0a 09 4d 56 |TA.FREME|M+8...MV|
|00000250| 49 09 41 2c 30 43 39 48 | 0d 0a 09 53 54 41 09 46 |I.A,0C9H|...STA.F|
|00000260| 52 45 4d 45 4d 2b 39 0d | 0a 09 4c 48 4c 44 09 31 |REMEM+9.|..LHLD.1|
|00000270| 0d 0a 09 4d 56 49 09 41 | 2c 4f 46 46 53 45 54 0d |...MVI.A|,OFFSET.|
|00000280| 0a 09 41 44 44 09 4c 0d | 0a 09 4d 4f 56 09 4c 2c |..ADD.L.|..MOV.L,|
|00000290| 41 0d 0a 09 4c 58 49 09 | 44 2c 46 52 45 4d 45 4d |A...LXI.|D,FREMEM|
|000002a0| 0d 0a 09 4d 4f 56 09 41 | 2c 45 0d 0a 09 4d 4f 56 |...MOV.A|,E...MOV|
|000002b0| 09 4d 2c 41 0d 0a 09 49 | 4e 58 09 48 0d 0a 09 4d |.M,A...I|NX.H...M|
|000002c0| 4f 56 09 41 2c 44 0d 0a | 09 4d 4f 56 09 4d 2c 41 |OV.A,D..|.MOV.M,A|
|000002d0| 0d 0a 09 4a 4d 50 09 30 | 0d 0a 09 45 4e 44 0d 0a |...JMP.0|...END..|
|000002e0| 0d 0a 09 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|000002f0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000300| 31 30 20 20 52 45 4d 20 | 4f 46 46 43 54 52 4c 43 |10  REM |OFFCTRLC|
|00000310| 2e 42 41 53 0d 0a 32 30 | 20 20 52 45 4d 20 4a 41 |.BAS..20|  REM JA|
|00000320| 4e 55 41 52 59 20 31 39 | 38 38 20 0d 0a 33 30 20 |NUARY 19|88 ..30 |
|00000330| 20 52 45 4d 20 44 49 53 | 41 42 4c 45 53 20 22 43 | REM DIS|ABLES "C|
|00000340| 4f 4e 54 52 4f 4c 20 43 | 20 42 52 45 41 4b 22 0d |ONTROL C| BREAK".|
|00000350| 0a 34 30 20 20 52 45 4d | 20 54 4f 20 45 6e 61 62 |.40  REM| TO Enab|
|00000360| 6c 65 20 61 66 74 65 72 | 20 72 75 6e 6e 69 6e 67 |le after| running|
|00000370| 0d 0a 35 30 20 20 52 45 | 4d 20 74 68 69 73 20 72 |..50  RE|M this r|
|00000380| 6f 75 74 69 6e 65 20 50 | 4f 4b 45 20 31 31 2c 32 |outine P|OKE 11,2|
|00000390| 30 31 0d 0a 31 30 30 20 | 41 53 53 45 4d 42 4c 59 |01..100 |ASSEMBLY|
|000003a0| 20 3d 20 26 48 38 30 0d | 0a 32 30 30 20 58 20 3d | = &H80.|.200 X =|
|000003b0| 20 26 48 42 0d 0a 33 30 | 30 20 44 41 54 41 20 26 | &HB..30|0 DATA &|
|000003c0| 48 46 45 2c 26 48 30 33 | 2c 26 48 43 32 2c 26 48 |HFE,&H03|,&HC2,&H|
|000003d0| 31 31 2c 26 48 30 30 0d | 0a 33 31 30 20 44 41 54 |11,&H00.|.310 DAT|
|000003e0| 41 20 26 48 39 37 2c 26 | 48 43 39 2c 26 48 46 46 |A &H97,&|HC9,&HFF|
|000003f0| 0d 0a 34 30 30 20 52 45 | 41 44 20 41 0d 0a 35 30 |..400 RE|AD A..50|
|00000400| 30 20 49 46 20 41 20 3d | 20 26 48 46 46 20 47 4f |0 IF A =| &HFF GO|
|00000410| 54 4f 20 39 30 30 0d 0a | 36 30 30 20 50 4f 4b 45 |TO 900..|600 POKE|
|00000420| 20 58 2c 41 0d 0a 37 30 | 30 20 58 3d 58 2b 31 0d | X,A..70|0 X=X+1.|
|00000430| 0a 38 30 30 20 47 4f 54 | 4f 20 34 30 30 0d 0a 39 |.800 GOT|O 400..9|
|00000440| 30 30 20 50 4f 4b 45 20 | 26 48 38 2c 26 48 43 44 |00 POKE |&H8,&HCD|
|00000450| 0d 0a 31 30 30 30 20 58 | 3d 26 48 38 30 0d 0a 31 |..1000 X|=&H80..1|
|00000460| 31 30 30 20 44 41 54 41 | 20 26 48 32 41 2c 26 48 |100 DATA| &H2A,&H|
|00000470| 30 31 2c 26 48 30 30 2c | 26 48 33 45 2c 26 48 30 |01,&H00,|&H3E,&H0|
|00000480| 37 0d 0a 31 31 31 30 20 | 44 41 54 41 20 26 48 38 |7..1110 |DATA &H8|
|00000490| 35 2c 26 48 36 46 2c 26 | 48 45 42 2c 26 48 31 41 |5,&H6F,&|HEB,&H1A|
|000004a0| 2c 26 48 33 32 0d 0a 31 | 32 30 30 20 44 41 54 41 |,&H32..1|200 DATA|
|000004b0| 20 26 48 30 39 2c 26 48 | 30 30 2c 26 48 31 33 2c | &H09,&H|00,&H13,|
|000004c0| 26 48 31 41 2c 26 48 33 | 32 0d 0a 31 32 31 30 20 |&H1A,&H3|2..1210 |
|000004d0| 44 41 54 41 20 26 48 30 | 41 2c 26 48 30 30 2c 26 |DATA &H0|A,&H00,&|
|000004e0| 48 32 41 2c 26 48 30 31 | 2c 26 48 30 30 0d 0a 31 |H2A,&H01|,&H00..1|
|000004f0| 33 30 30 20 44 41 54 41 | 20 26 48 33 45 2c 26 48 |300 DATA| &H3E,&H|
|00000500| 30 37 2c 26 48 38 35 2c | 26 48 36 46 2c 26 48 33 |07,&H85,|&H6F,&H3|
|00000510| 45 0d 0a 31 33 31 30 20 | 44 41 54 41 20 26 48 30 |E..1310 |DATA &H0|
|00000520| 38 2c 26 48 37 37 2c 26 | 48 32 33 2c 26 48 33 45 |8,&H77,&|H23,&H3E|
|00000530| 2c 26 48 30 30 0d 0a 31 | 33 32 30 20 44 41 54 41 |,&H00..1|320 DATA|
|00000540| 20 26 48 37 37 2c 26 48 | 43 39 2c 26 48 46 46 0d | &H77,&H|C9,&HFF.|
|00000550| 0a 31 34 30 30 20 52 45 | 41 44 20 41 0d 0a 31 35 |.1400 RE|AD A..15|
|00000560| 30 30 20 49 46 20 41 20 | 3d 20 26 48 46 46 20 47 |00 IF A |= &HFF G|
|00000570| 4f 54 4f 20 31 39 30 30 | 0d 0a 31 36 30 30 20 50 |OTO 1900|..1600 P|
|00000580| 4f 4b 45 20 58 2c 41 0d | 0a 31 37 30 30 20 58 3d |OKE X,A.|.1700 X=|
|00000590| 58 2b 31 0d 0a 31 38 30 | 30 20 47 4f 54 4f 20 31 |X+1..180|0 GOTO 1|
|000005a0| 34 30 30 0d 0a 31 39 30 | 30 20 43 41 4c 4c 20 41 |400..190|0 CALL A|
|000005b0| 53 53 45 4d 42 4c 59 0d | 0a 32 30 30 30 20 45 4e |SSEMBLY.|.2000 EN|
|000005c0| 44 0d 0a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |D.......|........|
|000005d0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|000005e0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|000005f0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000600| 2a 01 00 3e 07 85 6f eb | 1a 32 09 00 13 1a 32 0a |*..>..o.|.2....2.|
|00000610| 00 3e cd 32 08 00 3e fe | 32 0b 00 3e 03 32 0c 00 |.>.2..>.|2..>.2..|
|00000620| 3e c2 32 0d 00 3e 11 32 | 0e 00 97 32 0f 00 3e 97 |>.2..>.2|...2..>.|
|00000630| 32 10 00 3e c9 32 11 00 | 2a 01 00 3e 07 85 6f 11 |2..>.2..|*..>..o.|
|00000640| 08 00 7b 77 23 7a 77 c3 | 00 00 00 00 00 00 00 00 |..{w#zw.|........|
|00000650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000680| 4f 46 46 43 54 52 4c 43 | 2e 44 4f 43 20 20 20 4a |OFFCTRLC|.DOC   J|
|00000690| 41 4e 55 41 52 59 20 31 | 39 38 38 20 42 79 20 50 |ANUARY 1|988 By P|
|000006a0| 68 69 6c 20 50 66 6c 61 | 67 65 72 0d 0a 0d 0a 46 |hil Pfla|ger....F|
|000006b0| 4f 52 3a 20 20 20 20 20 | 20 43 50 4d 2f 38 30 0d |OR:     | CPM/80.|
|000006c0| 0a 20 20 20 20 20 20 20 | 20 20 20 57 72 69 74 74 |.       |   Writt|
|000006d0| 65 6e 20 66 6f 72 20 4f | 73 62 6f 72 6e 65 31 20 |en for O|sborne1 |
|000006e0| 62 75 74 20 73 6f 75 6c | 64 20 72 75 6e 20 20 20 |but soul|d run   |
|000006f0| 20 20 20 20 20 20 20 0d | 0a 20 20 20 20 20 20 20 |       .|.       |
|00000700| 20 20 20 6f 6e 20 61 6e | 79 20 63 6f 6d 70 75 74 |   on an|y comput|
|00000710| 65 72 20 75 73 69 6e 67 | 20 43 50 4d 2f 38 30 2e |er using| CPM/80.|
|00000720| 0d 0a 20 20 20 20 20 0d | 0a 50 55 52 50 4f 53 45 |..     .|.PURPOSE|
|00000730| 3a 20 20 44 69 73 61 62 | 6c 65 73 20 22 63 6f 6e |:  Disab|les "con|
|00000740| 74 72 6f 6c 20 43 22 20 | 62 72 65 61 6b 2e 20 55 |trol C" |break. U|
|00000750| 73 65 64 0d 0a 20 20 20 | 20 20 20 20 20 20 20 77 |sed..   |       w|
|00000760| 69 74 68 20 70 72 6f 67 | 72 61 6d 73 20 77 68 69 |ith prog|rams whi|
|00000770| 63 68 20 73 74 6f 70 20 | 6f 72 20 6c 6f 73 65 20 |ch stop |or lose |
|00000780| 0d 0a 20 20 20 20 20 20 | 20 20 20 20 64 61 74 61 |..      |    data|
|00000790| 20 77 68 65 6e 20 5e 43 | 20 69 73 20 68 69 74 20 | when ^C| is hit |
|000007a0| 61 63 63 69 64 65 6e 74 | 61 6c 6c 79 2e 20 0d 0a |accident|ally. ..|
|000007b0| 0d 0a 0d 0a 55 53 45 3a | 20 20 20 20 20 20 20 0d |....USE:|       .|
|000007c0| 0a 20 20 20 20 20 4f 46 | 46 43 54 52 4c 43 2e 43 |.     OF|FCTRLC.C|
|000007d0| 4f 4d 0d 0a 20 20 20 20 | 20 52 75 6e 20 62 65 66 |OM..    | Run bef|
|000007e0| 6f 72 65 20 6c 6f 61 64 | 69 6e 67 20 42 61 73 69 |ore load|ing Basi|
|000007f0| 63 20 6f 72 20 74 68 65 | 20 70 72 6f 67 72 61 6d |c or the| program|
|00000800| 20 0d 0a 20 20 20 20 20 | 79 6f 75 20 69 6e 74 65 | ..     |you inte|
|00000810| 6e 64 20 74 6f 20 75 73 | 65 2e 0d 0a 0d 0a 20 20 |nd to us|e.....  |
|00000820| 20 20 20 4f 46 46 43 54 | 52 4c 43 2e 42 41 53 0d |   OFFCT|RLC.BAS.|
|00000830| 0a 20 20 20 20 20 4c 6f | 61 64 20 42 61 73 69 63 |.     Lo|ad Basic|
|00000840| 20 61 6e 64 20 72 75 6e | 20 74 68 65 20 72 6f 75 | and run| the rou|
|00000850| 74 69 6e 65 2e 20 43 6f | 6e 74 72 6f 6c 20 0d 0a |tine. Co|ntrol ..|
|00000860| 43 20 20 77 69 6c 6c 20 | 20 62 65 20 20 64 69 73 |C  will | be  dis|
|00000870| 61 62 6c 65 64 20 75 6e | 74 69 6c 20 20 79 6f 75 |abled un|til  you|
|00000880| 20 20 72 65 73 65 74 20 | 20 74 68 65 20 0d 0a 63 |  reset | the ..c|
|00000890| 6f 6d 70 75 74 65 72 20 | 6f 72 20 72 75 6e 20 74 |omputer |or run t|
|000008a0| 68 65 20 66 6f 6c 6c 6f | 77 69 6e 67 20 72 6f 75 |he follo|wing rou|
|000008b0| 74 69 6e 65 3a 0d 0a 0d | 0a 31 30 20 50 4f 4b 45 |tine:...|.10 POKE|
|000008c0| 20 31 31 2c 32 30 31 0d | 0a 32 30 20 45 4e 44 0d | 11,201.|.20 END.|
|000008d0| 0a 0d 0a 4f 66 66 63 74 | 72 6c 2e 62 61 73 20 20 |...Offct|rl.bas  |
|000008e0| 77 69 6c 6c 20 6e 6f 74 | 20 77 6f 72 6b 20 77 69 |will not| work wi|
|000008f0| 74 68 20 76 65 72 73 69 | 6f 6e 73 20 20 6f 66 20 |th versi|ons  of |
|00000900| 0d 0a 42 61 73 69 63 20 | 74 68 61 74 20 72 65 6c |..Basic |that rel|
|00000910| 6f 63 61 74 65 20 74 68 | 65 20 62 69 6f 73 20 6a |ocate th|e bios j|
|00000920| 75 6d 70 20 74 61 62 6c | 65 2e 0d 0a 0d 0a 0d 0a |ump tabl|e.......|
|00000930| 44 49 53 41 44 56 41 4e | 54 41 47 45 53 3a 20 20 |DISADVAN|TAGES:  |
|00000940| 4e 6f 74 20 70 6f 73 73 | 69 62 6c 65 20 74 6f 20 |Not poss|ible to |
|00000950| 72 65 73 65 74 20 64 72 | 69 76 65 73 20 0d 0a 74 |reset dr|ives ..t|
|00000960| 6f 20 63 68 61 6e 67 65 | 20 64 69 73 6b 73 2e 20 |o change| disks. |
|00000970| 20 48 6f 77 65 76 65 72 | 20 69 66 20 79 6f 75 20 | However| if you |
|00000980| 61 72 65 20 72 75 6e 6e | 69 6e 67 20 0d 0a 61 20 |are runn|ing ..a |
|00000990| 20 70 72 6f 67 72 61 6d | 20 20 74 68 61 74 20 6c | program|  that l|
|000009a0| 6f 67 73 20 6f 6e 74 6f | 20 61 6e 6f 74 68 65 72 |ogs onto| another|
|000009b0| 20 64 69 72 76 65 20 20 | 62 79 20 0d 0a 62 69 74 | dirve  |by ..bit|
|000009c0| 73 65 6c 66 20 74 68 69 | 73 20 69 73 20 6e 6f 74 |self thi|s is not|
|000009d0| 20 61 20 70 72 6f 62 6c | 65 6d 2e 20 20 49 66 20 | a probl|em.  If |
|000009e0| 79 6f 75 20 6d 61 6e 61 | 67 65 20 0d 0a 74 6f 20 |you mana|ge ..to |
|000009f0| 20 67 65 74 20 20 69 6e | 74 6f 20 20 61 6e 20 65 | get  in|to  an e|
|00000a00| 6e 64 6c 65 73 73 20 6c | 6f 6f 70 20 20 69 6e 20 |ndless l|oop  in |
|00000a10| 20 61 20 20 62 61 73 69 | 63 20 0d 0a 70 72 6f 67 | a  basi|c ..prog|
|00000a20| 72 61 6d 20 20 69 74 20 | 77 69 6c 6c 20 62 65 20 |ram  it |will be |
|00000a30| 6e 65 63 65 73 73 61 72 | 79 20 74 6f 20 20 72 65 |necessar|y to  re|
|00000a40| 73 65 74 20 20 74 68 65 | 20 0d 0a 63 6f 6d 70 75 |set  the| ..compu|
|00000a50| 74 65 72 20 74 6f 20 73 | 74 6f 70 20 69 74 2e 0d |ter to s|top it..|
|00000a60| 0a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000a70| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
+--------+-------------------------+-------------------------+--------+--------+