00000000: 01 5B 1F 5B 64 00 8F 20 43 31 32 38 20 28 36 34 |.[.[d.. C128 (64|
00000010: 29 20 4B 45 59 50 41 44 20 45 4E 41 42 4C 45 00 |) KEYPAD ENABLE.|
00000020: 3C 5B 6E 00 8F 20 20 20 20 20 20 2A 20 42 59 20 |<[n.. * BY |
00000030: 50 41 55 4C 20 44 45 4C 45 4F 20 2A 00 42 5B 74 |PAUL DELEO *.B[t|
00000040: 00 3A 00 8B 5B 78 00 8F 20 50 52 4F 47 52 41 4D |.:..[x.. PROGRAM|
00000050: 20 45 4E 41 42 4C 45 53 20 55 53 45 20 4F 46 20 | ENABLES USE OF |
00000060: 54 48 45 20 31 32 38 27 53 20 20 20 20 20 20 20 |THE 128'S |
00000070: 20 4E 55 4D 45 52 49 43 20 4B 45 59 50 41 44 20 | NUMERIC KEYPAD |
00000080: 49 4E 20 43 36 34 20 4D 4F 44 45 00 91 5B 79 00 |IN C64 MODE..[y.|
00000090: 3A 00 9B 5B 7D 00 42 B2 38 32 38 00 D1 5B 82 00 |:..[}.B.828..[..|
000000A0: 87 41 24 3A 41 B2 C5 28 41 24 29 3A 97 42 2C 41 |.A$:A..(A$):.B,A|
000000B0: 3A 42 B2 42 AA 31 3A 43 B2 43 AA 41 3A 8B 20 42 |:B.B.1:C.C.A:. B|
000000C0: B2 39 37 34 20 A7 20 42 B2 42 AA 31 3A 89 31 33 |.974 . B.B.1:.13|
000000D0: 30 00 E4 5B 8C 00 8B 20 42 B3 B1 39 38 39 20 A7 |0..[... B..989 .|
000000E0: 20 31 33 30 00 26 5C 96 00 8B 43 B2 31 38 35 31 | 130.&\...C.1851|
000000F0: 32 20 A7 20 9E 39 37 36 3A 20 99 22 93 4E 55 4D |2 . .976: .".NUM|
00000100: 45 52 49 43 20 4B 45 59 50 41 44 20 42 59 20 50 |ERIC KEYPAD BY P|
00000110: 41 55 4C 20 44 45 4C 45 4F 20 3C 3C 45 4E 41 42 |AUL DELEO <<ENAB|
00000120: 4C 45 44 3E 3E 22 00 4D 5C A0 00 99 22 11 44 45 |LED>>".M\...".DE|
00000130: 41 43 54 49 56 41 54 45 20 42 59 20 52 55 4E 2F |ACTIVATE BY RUN/|
00000140: 53 54 4F 50 2D 52 45 53 54 4F 52 45 22 00 6D 5C |STOP-RESTORE".m\|
00000150: AA 00 99 22 11 52 45 41 43 54 49 56 41 54 45 20 |...".REACTIVATE |
00000160: 42 59 20 53 59 53 20 39 37 36 22 3A A2 00 A0 5C |BY SYS 976":...\|
00000170: B4 00 99 22 93 45 52 52 4F 52 20 49 4E 20 44 41 |...".ERROR IN DA|
00000180: 54 41 20 53 54 41 54 45 4D 45 4E 54 53 20 21 20 |TA STATEMENTS ! |
00000190: 50 4C 45 41 53 45 20 43 48 45 43 4B 21 22 3A 80 |PLEASE CHECK!":.|
000001A0: 00 ED 5C F4 01 83 31 36 39 2C 33 2C 37 32 2C 31 |..\...169,3,72,1|
000001B0: 36 39 2C 37 35 2C 37 32 2C 38 2C 37 32 2C 31 36 |69,75,72,8,72,16|
000001C0: 35 2C 31 39 37 2C 37 32 2C 37 32 2C 37 36 2C 34 |5,197,72,72,76,4|
000001D0: 39 2C 32 33 34 2C 31 32 30 2C 31 36 30 2C 2C 31 |9,234,120,160,,1|
000001E0: 36 35 2C 32 30 33 2C 32 30 31 2C 36 34 00 3A 5D |65,203,201,64.:]|
000001F0: FE 01 83 32 30 38 2C 38 38 2C 31 36 39 2C 32 35 |...208,88,169,25|
00000200: 35 2C 31 34 31 2C 2C 32 32 30 2C 31 34 30 2C 34 |5,141,,220,140,4|
00000210: 37 2C 32 30 38 2C 31 37 33 2C 31 2C 32 32 30 2C |7,208,173,1,220,|
00000220: 32 30 31 2C 32 35 35 2C 32 34 30 2C 37 33 2C 31 |201,255,240,73,1|
00000230: 33 34 2C 31 39 37 2C 31 36 39 00 87 5D 08 02 83 |34,197,169..]...|
00000240: 32 35 34 2C 37 32 2C 31 36 32 2C 38 2C 31 34 31 |254,72,162,8,141|
00000250: 2C 34 37 2C 32 30 38 2C 31 37 33 2C 31 2C 32 32 |,47,208,173,1,22|
00000260: 30 2C 32 30 35 2C 31 2C 32 32 30 2C 32 30 38 2C |0,205,1,220,208,|
00000270: 32 34 38 2C 37 34 2C 31 37 36 2C 39 2C 37 32 2C |248,74,176,9,72,|
00000280: 31 38 35 2C 31 38 33 00 D2 5D 12 02 83 20 33 2C |185,183..]... 3,|
00000290: 32 34 30 2C 32 2C 31 33 33 2C 32 30 33 2C 31 30 |240,2,133,203,10|
000002A0: 34 2C 32 30 30 2C 32 30 32 2C 32 30 38 2C 32 34 |4,200,202,208,24|
000002B0: 30 2C 31 30 34 2C 35 36 2C 34 32 2C 31 39 32 2C |0,104,56,42,192,|
000002C0: 32 33 2C 31 34 34 2C 32 31 39 2C 31 36 35 2C 32 |23,144,219,165,2|
000002D0: 30 33 00 1E 5E 1C 02 83 20 32 30 31 2C 36 34 2C |03..^... 201,64,|
000002E0: 32 34 30 2C 32 36 2C 31 36 32 2C 31 32 39 2C 31 |240,26,162,129,1|
000002F0: 36 30 2C 2C 31 34 34 2C 38 2C 34 31 2C 31 32 37 |60,,144,8,41,127|
00000300: 2C 31 33 33 2C 32 30 33 2C 31 36 32 2C 31 39 34 |,133,203,162,194|
00000310: 2C 31 36 30 2C 31 2C 31 36 39 2C 32 33 35 00 69 |,160,1,169,235.i|
00000320: 5E 26 02 83 20 31 34 30 2C 31 34 31 2C 32 2C 31 |^&.. 140,141,2,1|
00000330: 33 34 2C 32 34 35 2C 31 33 33 2C 32 34 36 2C 33 |34,245,133,246,3|
00000340: 32 2C 32 32 34 2C 32 33 34 2C 31 36 39 2C 32 35 |2,224,234,169,25|
00000350: 35 2C 31 34 31 2C 34 37 2C 32 30 38 2C 33 32 2C |5,141,47,208,32,|
00000360: 36 36 2C 32 33 35 2C 37 36 00 B5 5E 30 02 83 20 |66,235,76..^0.. |
00000370: 31 32 39 2C 32 33 34 2C 2C 32 37 2C 31 36 2C 2C |129,234,,27,16,,|
00000380: 35 39 2C 31 31 2C 32 34 2C 35 36 2C 2C 34 30 2C |59,11,24,56,,40,|
00000390: 34 33 2C 2C 31 2C 31 39 2C 33 32 2C 38 2C 2C 33 |43,,1,19,32,8,,3|
000003A0: 35 2C 34 34 2C 31 33 35 2C 37 2C 31 33 30 2C 32 |5,44,135,7,130,2|
000003B0: 2C 2C 31 32 30 00 E0 5E 3A 02 83 20 31 36 39 2C |,,120..^:.. 169,|
000003C0: 36 30 2C 31 34 31 2C 32 30 2C 33 2C 31 36 39 2C |60,141,20,3,169,|
000003D0: 33 2C 31 34 31 2C 32 31 2C 33 2C 38 38 2C 39 36 |3,141,21,3,88,96|
000003E0: 00 00 00 |... |
.[.[D.. C128 (64) KEYPAD ENABLE.<[N..
* BY PAUL DELEO *.B[T.:..[X.. PROGRAM
ENABLES USE OF THE 128'S NUMERIC
KEYPAD IN C64 MODE..[Y.:..[}.B.828.Q[..
.A$:A.E(A$):.B,A:B.B.1:C.C.A:. B.974 . B
.B.1:.130..[... B..989 . 130.&\...C.1851
2 . .976: .".NUMERIC KEYPAD BY PAUL DELE
O <<ENABLED>>".M\ ..".DEACTIVATE BY RUN/
STOP-RESTORE".M\...".REACTIVATE BY SYS 9
76":.. \...".ERROR IN DATA STATEMENTS !
PLEASE CHECK!":...\...169,3,72,169,75,72
,8,72,165,197,72,72,76,49,234,120,160,,1
65,203,201,64.:]...208,88,169,255,141,,2
20,140,47,208,173,1,220,201,255,240,73,1
34,197,169..]...254,72,162,8,141,47,208,
173,1,220,205,1,220,208,248,74,176,9,72,
185,183.R]... 3,240,2,133,203,104,200,20
2,208,240,104,56,42,192,23,144,219,165,2
03..^... 201,64,240,26,162,129,160,,144,
8,41,127,133,203,162,194,160,1,169,235.I
^&.. 140,141,2,134,245,133,246,32,224,23
4,169,255,141,47,208,32,66,235,76..^0..
129,234,,27,16,,59,11,24,56,,40,43,,1,19
,32,8,,35,44,135,7,130,2,,120..^:.. 169,
60,141,20,3,169,3,141,21,3,88,96...