FUNCTIE T(38600)
FILE INFORMATION
FILENAME(S): FUNCTIE T(38600)
FILE TYPE(S): PRG
FILE SIZE: 930b
FIRST SEEN: 2025-11-30 21:23:18
APPEARS ON: 1 disk(s)
FILE HASH
b64786f3b04006c718c9af1cf186212aa50c3832955c64d34394afc9fbdb0aed
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 6 1 | FUNCTIE T(38600) | PRG | DuncanTwain | 8 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 18 08 0F 00 81 49 B2 33 38 36 30 30 A4 33 |.......I.38600.3|
00000010: 38 37 31 39 3A 87 44 24 00 37 08 10 00 48 B2 C6 |8719:.D$.7...H..|
00000020: 28 C8 28 44 24 2C 31 29 29 AB 34 38 3A 8B 48 B1 |(.(D$,1)).48:.H.|
00000030: 39 A7 48 B2 48 AB 37 00 56 08 11 00 45 B2 C6 28 |9.H.H.7.V...E..(|
00000040: C9 28 44 24 2C 31 29 29 AB 34 38 3A 8B 45 B1 39 |.(D$,1)).48:.E.9|
00000050: A7 45 B2 45 AB 37 00 6A 08 12 00 44 B2 48 AC 31 |.E.E.7.j...D.H.1|
00000060: 36 AA 45 3A 97 49 2C 44 3A 82 00 87 08 13 00 83 |6.E:.I,D:.......|
00000070: 37 38 2C 41 39 2C 44 43 2C 38 44 2C 31 34 2C 30 |78,A9,DC,8D,14,0|
00000080: 33 2C 41 39 2C 39 36 00 A4 08 14 00 83 38 44 2C |3,A9,96......8D,|
00000090: 31 35 2C 30 33 2C 35 38 2C 38 35 2C 33 38 2C 41 |15,03,58,85,38,A|
000000A0: 39 2C 30 30 00 C1 08 15 00 83 38 35 2C 33 37 2C |9,00......85,37,|
000000B0: 36 30 2C 45 41 2C 45 41 2C 34 38 2C 38 41 2C 34 |60,EA,EA,48,8A,4|
000000C0: 38 00 DE 08 16 00 83 39 38 2C 34 38 2C 41 35 2C |8......98,48,A5,|
000000D0: 43 35 2C 43 35 2C 46 42 2C 46 30 2C 34 45 00 FB |C5,C5,FB,F0,4E..|
000000E0: 08 17 00 83 38 35 2C 46 42 2C 45 41 2C 41 32 2C |....85,FB,EA,A2,|
000000F0: 30 30 2C 41 44 2C 38 44 2C 30 32 00 18 09 18 00 |00,AD,8D,02.....|
00000100: 83 41 38 2C 43 30 2C 30 30 2C 46 30 2C 30 39 2C |.A8,C0,00,F0,09,|
00000110: 38 41 2C 31 38 2C 36 39 00 35 09 19 00 83 32 30 |8A,18,69.5....20|
00000120: 2C 41 41 2C 38 38 2C 31 38 2C 39 30 2C 46 33 2C |,AA,88,18,90,F3,|
00000130: 45 30 2C 36 30 00 52 09 1A 00 83 33 30 2C 30 32 |E0,60.R....30,02|
00000140: 2C 41 32 2C 36 30 2C 45 41 2C 45 41 2C 41 35 2C |,A2,60,EA,EA,A5,|
00000150: 43 35 00 6F 09 1B 00 83 41 30 2C 30 33 2C 38 34 |C5.o....A0,03,84|
00000160: 2C 46 45 2C 43 35 2C 46 45 2C 46 30 2C 31 31 00 |,FE,C5,FE,F0,11.|
00000170: 8C 09 1C 00 83 43 38 2C 45 38 2C 45 38 2C 45 38 |.....C8,E8,E8,E8|
00000180: 2C 45 38 2C 45 38 2C 45 38 2C 45 38 00 A9 09 1D |,E8,E8,E8,E8....|
00000190: 00 83 45 38 2C 43 30 2C 30 37 2C 44 30 2C 45 44 |..E8,C0,07,D0,ED|
000001A0: 2C 34 43 2C 33 36 2C 39 37 00 C6 09 1E 00 83 45 |,4C,36,97......E|
000001B0: 41 2C 38 41 2C 38 35 2C 46 43 2C 41 39 2C 39 36 |A,8A,85,FC,A9,96|
000001C0: 2C 38 35 2C 46 44 00 E3 09 1F 00 83 41 30 2C 30 |,85,FD......A0,0|
000001D0: 30 2C 42 31 2C 46 43 2C 39 39 2C 37 37 2C 30 32 |0,B1,FC,99,77,02|
000001E0: 2C 43 38 00 00 0A 20 00 83 43 30 2C 30 38 2C 44 |,C8... ..C0,08,D|
000001F0: 30 2C 46 36 2C 38 34 2C 43 36 2C 36 38 2C 41 38 |0,F6,84,C6,68,A8|
00000200: 00 1D 0A 21 00 83 36 38 2C 41 41 2C 36 38 2C 34 |...!..68,AA,68,4|
00000210: 43 2C 33 31 2C 45 41 2C 30 30 2C 46 46 00 2D 0A |C,31,EA,00,FF.-.|
00000220: 22 00 81 58 B2 30 A4 31 35 3A 87 4E 24 00 5D 0A |"..X.0.15:.N$.].|
00000230: 23 00 4C B2 C3 28 4E 24 29 3A 8B 4C B1 38 A7 99 |#.L..(N$):.L.8..|
00000240: 58 3B 4E 24 3A 99 22 38 20 43 48 41 52 41 43 54 |X;N$:."8 CHARACT|
00000250: 45 52 53 20 4D 41 58 49 4D 55 4D 22 80 00 68 0A |ERS MAXIMUM"..h.|
00000260: 24 00 81 59 B2 31 A4 38 00 79 0A 25 00 8B 59 B1 |$..Y.1.8.y.%..Y.|
00000270: 4C A7 50 B2 30 3A 89 33 39 00 97 0A 26 00 50 B2 |L.P.0:.39...&.P.|
00000280: C6 28 CA 28 4E 24 2C 59 2C 31 29 29 3A 8B 50 B2 |.(.(N$,Y,1)):.P.|
00000290: 39 35 A7 50 B2 31 33 00 AF 0A 27 00 97 33 38 33 |95.P.13...'..383|
000002A0: 39 39 AA 59 AA 58 AC 38 2C 50 3A 82 59 2C 58 00 |99.Y.X.8,P:.Y,X.|
000002B0: D0 0A 28 00 99 22 93 20 46 55 4E 43 54 49 4F 4E |..(..". FUNCTION|
000002C0: 20 4B 45 59 53 20 44 45 46 49 4E 45 44 22 3A 9C | KEYS DEFINED":.|
000002D0: 00 FA 0A 29 00 99 22 12 20 50 52 45 53 53 20 52 |...)..". PRESS R|
000002E0: 45 54 55 52 4E 20 54 4F 20 45 4E 41 42 4C 45 20 |ETURN TO ENABLE |
000002F0: 4B 45 59 53 20 4E 4F 57 91 22 00 0F 0B 2A 00 99 |KEYS NOW."...*..|
00000300: 22 11 11 53 59 53 33 38 36 30 30 91 91 91 22 00 |"..SYS38600...".|
00000310: 15 0B 2B 00 A2 00 33 0B 30 00 83 22 46 4F 52 22 |..+...3.0.."FOR"|
00000320: 2C 22 49 46 22 2C 22 47 4F 54 4F 22 2C 22 50 4F |,"IF","GOTO","PO|
00000330: 4B 45 22 00 56 0B 35 00 83 22 4E 45 58 54 22 2C |KE".V.5.."NEXT",|
00000340: 22 54 48 45 4E 22 2C 22 47 4F 53 55 42 22 2C 22 |"THEN","GOSUB","|
00000350: 50 45 45 4B 28 22 00 7E 0B 3A 00 83 22 53 54 52 |PEEK(".~.:.."STR|
00000360: 24 28 22 2C 22 4C 45 46 54 24 28 22 2C 22 4D 49 |$(","LEFT$(","MI|
00000370: 44 24 28 22 2C 22 52 49 47 48 54 24 28 22 00 9F |D$(","RIGHT$("..|
00000380: 0B 3F 00 83 22 4C 49 53 54 22 2C 22 4C 4F 41 44 |.?.."LIST","LOAD|
00000390: 22 2C 22 53 41 56 45 22 2C 22 52 55 4E 5F 22 00 |","SAVE","RUN_".|
000003A0: 00 00 |.. |
.......I.38600.38719:.D$.7...H.F(H(D$,1)
).48:.H.9.H.H.7.V...E.F(I(D$,1)).48:.E.9
.E.E.7.J...D.H.16.E:.I,D:.......78,A9,DC
,8D,14,03,A9,96......8D,15,03,58,85,38,A
9,00.A....85,37,60,EA,EA,48,8A,48......9
8,48,A5,C5,C5,FB,F0,4E......85,FB,EA,A2,
00,AD,8D,02......A8,C0,00,F0,09,8A,18,69
.5....20,AA,88,18,90,F3,E0,60.R....30,02
,A2,60,EA,EA,A5,C5.O....A0,03,84,FE,C5,F
E,F0,11......C8,E8,E8,E8,E8,E8,E8,E8....
..E8,C0,07,D0,ED,4C,36,97.F....EA,8A,85,
FC,A9,96,85,FD......A0,00,B1,FC,99,77,02
,C8... ..C0,08,D0,F6,84,C6,68,A8...!..68
,AA,68,4C,31,EA,00,FF.-."..X.0.15:.N$.].
#.L.C(N$):.L.8..X;N$:."8 CHARACTERS MAXI
MUM"..H.$..Y.1.8.Y.%..Y.L.P.0:.39...&.P.
F(J(N$,Y,1)):.P.95.P.13...'..38399.Y.X.8
,P:.Y,X.P.(..". FUNCTION KEYS DEFINED":.
...)..". PRESS RETURN TO ENABLE KEYS NOW
."...*.."..SYS38600..."...+...3.0.."FOR"
,"IF","GOTO","POKE".V.5.."NEXT","THEN","
GOSUB","PEEK(".~.:.."STR$(","LEFT$(","MI
D$(","RIGHT$("...?.."LIST","LOAD","SAVE"
,"RUN_"...
> CLICK IMAGE PREVIEW FOR FULL MODAL