SAVE/RCL VAR.
FILE INFORMATION
FILENAME(S): SAVE/RCL VAR.
FILE TYPE(S): PRG
FILE SIZE: 2.6K
FIRST SEEN: 2025-11-30 21:26:03
APPEARS ON: 1 disk(s)
FILE HASH
0b6df9dda73df8547ff8273a596ec1c11cebcce5128e10b97d8203e954369956
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITIES 64 2 | SAVE/RCL VAR. | PRG | DuncanTwain | 16 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2F 08 64 00 99 22 93 22 3A 99 3A 99 22 53 |../.d..".":.:."S| 00000010: 41 56 45 2F 52 45 43 41 4C 4C 20 56 41 52 49 41 |AVE/RECALL VARIA| 00000020: 42 45 4C 45 4E 20 43 2E 36 34 2F 31 32 38 22 00 |BELEN C.64/128".| 00000030: 35 08 69 00 99 00 5C 08 6E 00 99 22 2D 2D 2D 2D |5.i...\.n.."----| 00000040: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000050: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 62 08 73 |-----------".b.s| 00000060: 00 99 00 9B 08 78 00 99 22 54 4F 45 54 53 20 27 |.....x.."TOETS '| 00000070: 55 27 20 56 4F 4F 52 20 55 49 54 4C 45 47 22 3A |U' VOOR UITLEG":| 00000080: 99 3A 99 22 41 4E 44 45 52 45 20 54 4F 45 54 53 |.:."ANDERE TOETS| 00000090: 20 3D 20 56 45 52 56 4F 4C 47 22 00 B6 08 7D 00 | = VERVOLG"...}.| 000000A0: A1 F9 20 41 24 3A 8B 20 41 24 B2 22 55 22 20 A7 |.. A$:. A$."U" .| 000000B0: 20 8D 20 35 30 30 00 CD 08 82 00 41 B2 34 39 31 | . 500.....A.491| 000000C0: 35 32 3A 43 48 45 43 4B 53 55 4D B2 30 00 FB 08 |52:CHECKSUM.0...| 000000D0: 8C 00 81 20 49 B2 30 A4 31 39 30 3A 87 43 3A 97 |... I.0.190:.C:.| 000000E0: 41 AA 49 2C 43 3A 43 48 45 43 4B 53 55 4D B2 43 |A.I,C:CHECKSUM.C| 000000F0: 48 45 43 4B 53 55 4D AA 43 3A 82 00 1E 09 96 00 |HECKSUM.C:......| 00000100: 42 B2 41 AA 31 37 37 3A 8D 32 38 30 3A 97 20 41 |B.A.177:.280:. A| 00000110: AA 35 2C 43 3A 20 20 97 20 41 AA 36 2C 44 00 56 |.5,C: . A.6,D.V| 00000120: 09 A0 00 42 B2 41 AA 31 37 39 3A 8D 32 38 30 3A |...B.A.179:.280:| 00000130: 97 20 41 AA 31 32 31 2C 43 3A 97 20 41 AA 31 32 |. A.121,C:. A.12| 00000140: 32 2C 44 3A 97 20 41 AA 31 35 31 2C 43 3A 97 41 |2,D:. A.151,C:.A| 00000150: AA 31 35 32 2C 44 00 8E 09 AA 00 42 B2 42 AA 31 |.152,D.....B.B.1| 00000160: 3A 20 20 8D 32 38 30 3A 97 20 41 AA 31 32 39 2C |: .280:. A.129,| 00000170: 43 3A 97 20 41 AA 31 33 30 2C 44 3A 97 20 41 AA |C:. A.130,D:. A.| 00000180: 31 35 39 2C 43 3A 97 41 AA 31 36 30 2C 44 00 B3 |159,C:.A.160,D..| 00000190: 09 B4 00 42 B2 42 AA 31 3A 20 20 8D 32 38 30 3A |...B.B.1: .280:| 000001A0: 97 20 41 AA 31 31 38 2C 43 3A 97 20 41 AA 31 31 |. A.118,C:. A.11| 000001B0: 39 2C 44 00 D8 09 BE 00 42 B2 42 AA 31 3A 20 20 |9,D.....B.B.1: | 000001C0: 8D 32 38 30 3A 97 20 41 AA 31 32 36 2C 43 3A 97 |.280:. A.126,C:.| 000001D0: 20 41 AA 31 32 37 2C 44 00 FD 09 C8 00 42 B2 42 | A.127,D.....B.B| 000001E0: AA 31 3A 20 20 8D 32 38 30 3A 97 20 41 AA 31 34 |.1: .280:. A.14| 000001F0: 38 2C 43 3A 97 20 41 AA 31 34 39 2C 44 00 22 0A |8,C:. A.149,D.".| 00000200: D2 00 42 B2 42 AA 31 3A 20 20 8D 32 38 30 3A 97 |..B.B.1: .280:.| 00000210: 20 41 AA 31 35 36 2C 43 3A 97 20 41 AA 31 35 37 | A.156,C:. A.157| 00000220: 2C 44 00 5A 0A DC 00 42 B2 42 AA 31 3A 20 20 8D |,D.Z...B.B.1: .| 00000230: 32 38 30 3A 97 20 41 AA 37 35 2C 43 20 3A 97 20 |280:. A.75,C :. | 00000240: 41 AA 37 36 2C 44 3A 97 20 41 AA 31 30 39 2C 43 |A.76,D:. A.109,C| 00000250: 3A 97 20 41 AA 31 31 30 2C 44 00 7D 0A E6 00 42 |:. A.110,D.}...B| 00000260: B2 42 AA 31 3A 20 20 8D 32 38 30 3A 97 20 41 AA |.B.1: .280:. A.| 00000270: 38 32 2C 43 3A 97 20 41 AA 38 33 2C 44 00 A4 0A |82,C:. A.83,D...| 00000280: F0 00 8B 43 48 45 43 4B 53 55 4D AB 32 32 39 30 |...CHECKSUM.2290| 00000290: 34 A7 20 99 22 46 4F 55 54 20 49 4E 20 44 41 54 |4. ."FOUT IN DAT| 000002A0: 41 22 3A 80 00 AA 0A F5 00 99 00 D4 0A FA 00 99 |A":.............| 000002B0: 22 53 41 56 45 20 56 41 52 49 41 42 45 4C 45 4E |"SAVE VARIABELEN| 000002C0: 20 5B 53 41 56 45 56 41 52 5D 20 3D 20 53 59 53 | [SAVEVAR] = SYS| 000002D0: 22 41 3A 99 00 FF 0A 04 01 99 22 52 45 43 41 4C |"A:......."RECAL| 000002E0: 4C 20 56 41 52 49 41 42 45 4C 45 4E 20 5B 52 43 |L VARIABELEN [RC| 000002F0: 4C 56 41 52 5D 3D 20 53 59 53 22 41 AA 35 34 00 |LVAR]= SYS"A.54.| 00000300: 05 0B 0E 01 A2 00 20 0B 18 01 44 B2 B5 28 42 AD |...... ...D..(B.| 00000310: 32 35 36 29 3A 43 B2 42 AB 32 35 36 AC 44 3A 8E |256):C.B.256.D:.| 00000320: 00 6A 0B 22 01 83 20 31 36 32 2C 30 31 33 2C 31 |.j.".. 162,013,1| 00000330: 38 31 2C 30 34 33 2C 31 35 37 2C 31 37 37 2C 31 |81,043,157,177,1| 00000340: 34 34 2C 32 30 32 2C 30 31 36 2C 32 34 38 2C 30 |44,202,016,248,0| 00000350: 35 36 2C 31 36 35 2C 30 35 31 2C 32 33 33 2C 30 |56,165,051,233,0| 00000360: 30 31 2C 31 33 33 2C 30 38 38 00 B4 0B 2C 01 83 |01,133,088...,..| 00000370: 20 31 36 35 2C 30 35 32 2C 32 33 33 2C 30 30 30 | 165,052,233,000| 00000380: 2C 31 33 33 2C 30 38 39 2C 31 36 35 2C 30 34 35 |,133,089,165,045| 00000390: 2C 31 33 33 2C 30 39 35 2C 31 36 35 2C 30 34 36 |,133,095,165,046| 000003A0: 2C 31 33 33 2C 30 39 36 2C 31 36 35 2C 30 34 39 |,133,096,165,049| 000003B0: 2C 31 33 33 00 FE 0B 36 01 83 20 30 39 30 2C 31 |,133...6.. 090,1| 000003C0: 36 35 2C 30 35 30 2C 31 33 33 2C 30 39 31 2C 30 |65,050,133,091,0| 000003D0: 33 32 2C 31 39 31 2C 31 36 33 2C 31 36 35 2C 30 |32,191,163,165,0| 000003E0: 38 38 2C 31 33 33 2C 30 35 35 2C 31 36 36 2C 30 |88,133,055,166,0| 000003F0: 38 39 2C 32 33 32 2C 31 33 34 2C 30 35 36 00 48 |89,232,134,056.H| 00000400: 0C 40 01 83 20 30 39 36 2C 32 33 34 2C 32 33 34 |.@.. 096,234,234| 00000410: 2C 31 36 35 2C 30 35 35 2C 31 33 33 2C 30 38 38 |,165,055,133,088| 00000420: 2C 31 36 35 2C 30 35 36 2C 31 33 33 2C 30 38 39 |,165,056,133,089| 00000430: 2C 31 36 35 2C 30 34 35 2C 31 33 33 2C 30 39 30 |,165,045,133,090| 00000440: 2C 31 36 35 2C 30 34 36 00 92 0C 4A 01 83 20 31 |,165,046...J.. 1| 00000450: 33 33 2C 30 39 31 2C 31 36 30 2C 30 30 30 2C 31 |33,091,160,000,1| 00000460: 36 35 2C 30 38 38 2C 32 30 35 2C 31 38 35 2C 31 |65,088,205,185,1| 00000470: 34 34 2C 32 30 38 2C 30 30 37 2C 31 36 35 2C 30 |44,208,007,165,0| 00000480: 38 39 2C 32 30 35 2C 31 38 36 2C 31 34 34 2C 32 |89,205,186,144,2| 00000490: 34 30 00 DC 0C 54 01 83 20 30 32 30 2C 31 37 37 |40...T.. 020,177| 000004A0: 2C 30 38 38 2C 31 34 35 2C 30 39 30 2C 32 33 30 |,088,145,090,230| 000004B0: 2C 30 38 38 2C 32 30 38 2C 30 30 32 2C 32 33 30 |,088,208,002,230| 000004C0: 2C 30 38 39 2C 32 33 30 2C 30 39 30 2C 32 30 38 |,089,230,090,208| 000004D0: 2C 32 32 38 2C 32 33 30 2C 30 39 31 00 26 0D 5E |,228,230,091.&.^| 000004E0: 01 83 20 32 30 38 2C 32 32 34 2C 32 34 30 2C 32 |.. 208,224,240,2| 000004F0: 32 32 2C 31 36 32 2C 30 30 35 2C 31 38 39 2C 31 |22,162,005,189,1| 00000500: 38 35 2C 31 34 34 2C 31 34 39 2C 30 35 31 2C 32 |85,144,149,051,2| 00000510: 30 32 2C 30 31 36 2C 32 34 38 2C 30 35 36 2C 31 |02,016,248,056,1| 00000520: 37 33 2C 31 38 31 00 70 0D 68 01 83 20 31 34 34 |73,181.p.h.. 144| 00000530: 2C 32 33 37 2C 31 37 39 2C 31 34 34 2C 31 33 33 |,237,179,144,133| 00000540: 2C 30 38 38 2C 31 37 33 2C 31 38 32 2C 31 34 34 |,088,173,182,144| 00000550: 2C 32 33 37 2C 31 38 30 2C 31 34 34 2C 31 33 33 |,237,180,144,133| 00000560: 2C 30 38 39 2C 30 32 34 2C 31 36 35 2C 30 34 35 |,089,024,165,045| 00000570: 00 BA 0D 72 01 83 20 31 30 31 2C 30 38 38 2C 31 |...r.. 101,088,1| 00000580: 33 33 2C 30 34 37 2C 31 36 35 2C 30 34 36 2C 31 |33,047,165,046,1| 00000590: 30 31 2C 30 38 39 2C 31 33 33 2C 30 34 38 2C 30 |01,089,133,048,0| 000005A0: 35 36 2C 31 37 33 2C 31 38 33 2C 31 34 34 2C 32 |56,173,183,144,2| 000005B0: 33 37 2C 31 37 39 2C 31 34 34 00 04 0E 7C 01 83 |37,179,144...|..| 000005C0: 20 31 33 33 2C 30 38 38 2C 31 37 33 2C 31 38 34 | 133,088,173,184| 000005D0: 2C 31 34 34 2C 32 33 37 2C 31 38 30 2C 31 34 34 |,144,237,180,144| 000005E0: 2C 31 33 33 2C 30 38 39 2C 30 32 34 2C 31 36 35 |,133,089,024,165| 000005F0: 2C 30 34 35 2C 31 30 31 2C 30 38 38 2C 31 33 33 |,045,101,088,133| 00000600: 2C 30 34 39 00 4E 0E 86 01 83 20 31 36 35 2C 30 |,049.N.... 165,0| 00000610: 34 36 2C 31 30 31 2C 30 38 39 2C 31 33 33 2C 30 |46,101,089,133,0| 00000620: 35 30 2C 30 39 36 2C 30 30 30 2C 30 30 30 2C 30 |50,096,000,000,0| 00000630: 30 30 2C 30 30 30 2C 30 30 30 2C 30 30 30 2C 30 |00,000,000,000,0| 00000640: 30 30 2C 30 30 30 2C 30 30 30 2C 30 30 30 00 64 |00,000,000,000.d| 00000650: 0E 90 01 83 20 30 30 30 2C 30 30 30 2C 30 30 30 |.... 000,000,000| 00000660: 2C 30 30 30 00 6D 0E F4 01 99 22 93 22 00 7C 0E |,000.m....".".|.| 00000670: F5 01 99 22 55 49 54 4C 45 47 3A 22 00 8B 0E F9 |..."UITLEG:"....| 00000680: 01 99 22 2D 2D 2D 2D 2D 2D 2D 22 00 91 0E FA 01 |.."-------".....| 00000690: 99 00 BD 0E FE 01 99 22 48 45 54 20 42 45 53 54 |......."HET BEST| 000006A0: 41 4E 44 20 57 4F 52 44 54 20 56 45 49 4C 49 47 |AND WORDT VEILIG| 000006B0: 20 47 45 53 54 45 4C 44 20 4D 45 54 22 00 EC 0E | GESTELD MET"...| 000006C0: 00 02 99 22 53 59 53 20 41 2C 20 57 41 41 52 42 |..."SYS A, WAARB| 000006D0: 49 4A 20 41 20 48 45 54 20 47 45 4B 4F 5A 45 4E |IJ A HET GEKOZEN| 000006E0: 20 53 54 41 52 54 41 44 52 45 53 22 00 06 0F 02 | STARTADRES"....| 000006F0: 02 99 22 49 4E 20 48 45 54 20 47 45 48 45 55 47 |.."IN HET GEHEUG| 00000700: 45 4E 20 49 53 22 00 1D 0F 04 02 99 22 4E 55 20 |EN IS"......"NU | 00000710: 49 53 20 44 49 54 20 34 39 31 35 32 22 00 23 0F |IS DIT 49152".#.| 00000720: 05 02 99 00 52 0F 06 02 99 22 4E 41 20 4C 41 44 |....R...."NA LAD| 00000730: 45 4E 20 56 41 4E 20 48 45 54 20 4E 49 45 55 57 |EN VAN HET NIEUW| 00000740: 45 20 50 52 4F 47 52 41 4D 4D 41 20 54 45 52 55 |E PROGRAMMA TERU| 00000750: 47 22 00 7E 0F 08 02 99 22 48 41 4C 45 4E 20 4D |G".~...."HALEN M| 00000760: 45 54 20 53 59 53 20 41 2B 35 34 20 45 4E 20 44 |ET SYS A+54 EN D| 00000770: 41 41 52 4E 41 20 53 54 41 52 54 45 4E 22 00 AA |AARNA STARTEN"..| 00000780: 0F 0A 02 99 22 4D 45 54 20 47 4F 54 4F 20 58 58 |...."MET GOTO XX| 00000790: 58 58 58 20 28 20 44 55 53 20 4E 49 45 54 20 4D |XXX ( DUS NIET M| 000007A0: 45 52 20 27 52 55 4E 27 29 22 00 B0 0F 0B 02 99 |ER 'RUN')"......| 000007B0: 00 D6 0F 0C 02 99 22 44 45 20 45 45 52 53 54 45 |......"DE EERSTE| 000007C0: 20 52 45 47 45 4C 20 56 41 4E 20 48 45 54 20 4E | REGEL VAN HET N| 000007D0: 49 45 55 57 45 22 00 02 10 0E 02 99 22 50 52 4F |IEUWE"......"PRO| 000007E0: 47 52 41 4D 4D 41 20 44 49 45 4E 54 20 41 4C 53 |GRAMMA DIENT ALS| 000007F0: 20 56 4F 4C 47 54 20 54 45 20 4C 55 49 44 45 4E | VOLGT TE LUIDEN| 00000800: 3A 22 00 08 10 0F 02 99 00 33 10 10 02 99 22 50 |:".......3...."P| 00000810: 4F 4B 45 20 34 36 2C 50 45 45 4B 28 31 37 34 29 |OKE 46,PEEK(174)| 00000820: 3A 50 4F 4B 45 20 34 36 2C 50 45 45 4B 28 31 37 |:POKE 46,PEEK(17| 00000830: 35 29 3A 00 47 10 12 02 99 22 53 59 53 20 41 2B |5):.G...."SYS A+| 00000840: 35 34 22 3A 99 3A 99 00 63 10 13 02 99 3A 99 22 |54":.:..c....:."| 00000850: 3C 54 4F 45 54 53 3E 22 3A A1 F9 20 41 24 3A 99 |<TOETS>":.. A$:.| 00000860: 22 93 22 00 69 10 14 02 99 00 93 10 16 02 99 22 |".".i.........."| 00000870: 56 41 4E 20 53 54 52 49 4E 47 53 2C 20 44 49 45 |VAN STRINGS, DIE| 00000880: 20 4F 4F 4B 20 49 4E 20 48 45 54 20 4E 49 45 55 | OOK IN HET NIEU| 00000890: 57 45 22 00 BE 10 18 02 99 22 50 52 4F 47 52 41 |WE"......"PROGRA| 000008A0: 4D 4D 41 20 57 4F 52 44 45 4E 20 47 45 42 52 55 |MMA WORDEN GEBRU| 000008B0: 49 4B 54 20 44 49 45 4E 54 20 45 45 4E 22 00 EC |IKT DIENT EEN"..| 000008C0: 10 1A 02 99 22 4C 45 47 45 20 53 50 41 54 49 45 |...."LEGE SPATIE| 000008D0: 20 54 45 20 57 4F 52 44 45 4E 20 54 4F 45 47 45 | TE WORDEN TOEGE| 000008E0: 56 4F 45 47 44 20 49 4E 20 44 45 22 00 FD 10 1C |VOEGD IN DE"....| 000008F0: 02 99 22 56 4F 52 4D 20 56 41 4E 3A 22 00 29 11 |.."VORM VAN:".).| 00000900: 1E 02 99 22 44 24 3D 27 27 56 4F 4F 52 20 56 45 |..."D$=''VOOR VE| 00000910: 52 56 4F 4C 47 20 44 52 55 4B 20 53 50 41 54 49 |RVOLG DRUK SPATI| 00000920: 45 42 41 4C 4B 27 27 2B 22 00 45 11 20 02 99 22 |EBALK''+".E. .."| 00000930: 54 57 45 45 20 4D 41 41 4C 20 51 55 4F 54 45 20 |TWEE MAAL QUOTE | 00000940: 27 27 27 27 22 00 4B 11 21 02 99 00 78 11 22 02 |''''".K.!...x.".| 00000950: 99 22 44 49 54 20 47 45 4C 44 54 20 4F 4F 4B 20 |."DIT GELDT OOK | 00000960: 56 4F 4F 52 20 53 54 52 49 4E 47 41 52 52 41 59 |VOOR STRINGARRAY| 00000970: 27 53 2C 20 44 49 45 22 00 9E 11 24 02 99 22 4E |'S, DIE"...$.."N| 00000980: 49 45 54 20 4D 45 54 20 49 4E 50 55 54 20 23 20 |IET MET INPUT # | 00000990: 4F 46 20 49 4E 50 55 54 20 5A 49 4A 4E 22 00 BD |OF INPUT ZIJN"..| 000009A0: 11 26 02 99 22 42 49 4E 4E 45 4E 47 45 48 41 41 |.&.."BINNENGEHAA| 000009B0: 4C 44 2C 20 44 55 53 20 44 41 4E 3A 22 00 C3 11 |LD, DUS DAN:"...| 000009C0: 27 02 99 00 DB 11 28 02 99 22 31 30 20 42 24 28 |'.....(.."10 B$(| 000009D0: 31 29 3D 27 27 41 41 50 27 27 22 00 F4 11 2A 02 |1)=''AAP''"...*.| 000009E0: 99 22 32 30 20 42 24 28 32 29 3D 27 27 4E 4F 4F |."20 B$(2)=''NOO| 000009F0: 54 27 27 22 00 1C 12 2C 02 99 22 33 30 20 46 4F |T''"...,.."30 FO| 00000A00: 52 20 41 3D 31 20 54 4F 20 32 3A 42 24 28 41 29 |R A=1 TO 2:B$(A)| 00000A10: 3D 42 24 28 41 29 2B 27 27 27 27 22 00 28 12 30 |=B$(A)+''''".(.0| 00000A20: 02 99 3A 99 3A 99 3A 99 00 46 12 35 02 99 22 28 |..:.:.:..F.5.."(| 00000A30: 20 54 4F 45 54 53 20 3D 3E 20 50 52 4F 47 52 41 | TOETS => PROGRA| 00000A40: 4D 4D 41 20 29 22 00 50 12 3A 02 A1 F9 20 41 24 |MMA )".P.:... A$| 00000A50: 00 59 12 3F 02 99 22 93 22 00 5F 12 58 02 8E 00 |.Y.?.."."._.X...| 00000A60: 00 00 |.. |
../.D..".":.:."SAVE/RECALL VARIABELEN C. 64/128".5.I...\.N.."-------------------- -----------".B.S.....X.."TOETS 'U' VOOR UITLEG":.:."ANDERE TOETS = VERVOLG"...}. .. A$:. A$."U" . . 500.M...A.49152:CHECK SUM.0...... I.0.190:.C:.A.I,C:CHECKSUM.C HECKSUM.C:......B.A.177:.280:. A.5,C: . A.6,D.V. .B.A.179:.280:. A.121,C:. A.12 2,D:. A.151,C:.A.152,D.....B.B.1: .280: . A.129,C:. A.130,D:. A.159,C:.A.160,D.. ...B.B.1: .280:. A.118,C:. A.119,D.X... B.B.1: .280:. A.126,C:. A.127,D...H.B.B .1: .280:. A.148,C:. A.149,D.".R.B.B.1: .280:. A.156,C:. A.157,D.Z...B.B.1: . 280:. A.75,C :. A.76,D:. A.109,C:. A.110 ,D.}...B.B.1: .280:. A.82,C:. A.83,D... ...CHECKSUM.22904. ."FOUT IN DATA":..... ...T...."SAVE VARIABELEN [SAVEVAR] = SYS "A:......."RECALL VARIABELEN [RCLVAR]= S YS"A.54....... ...D..(B.256):C.B.256.D:. .J.".. 162,013,181,043,157,177,144,202,0 16,248,056,165,051,233,001,133,088...,.. 165,052,233,000,133,089,165,045,133,095 ,165,046,133,096,165,049,133...6.. 090,1 65,050,133,091,032,191,163,165,088,133,0 55,166,089,232,134,056.H.@.. 096,234,234 ,165,055,133,088,165,056,133,089,165,045 ,133,090,165,046...J.. 133,091,160,000,1 65,088,205,185,144,208,007,165,089,205,1 86,144,240...T.. 020,177,088,145,090,230 ,088,208,002,230,089,230,090,208,228,230 ,091.&.^.. 208,224,240,222,162,005,189,1 85,144,149,051,202,016,248,056,173,181.P .H.. 144,237,179,144,133,088,173,182,144 ,237,180,144,133,089,024,165,045...R.. 1 01,088,133,047,165,046,101,089,133,048,0 56,173,183,144,237,179,144...|.. 133,088 ,173,184,144,237,180,144,133,089,024,165 ,045,101,088,133,049.N.... 165,046,101,0 89,133,050,096,000,000,000,000,000,000,0 00,000,000,000.D.... 000,000,000,000.M.. ..".".|...."UITLEG:"......"-------"..... ......."HET BESTAND WORDT VEILIG GESTELD MET"......"SYS A, WAARBIJ A HET GEKOZEN STARTADRES"......"IN HET GEHEUGEN IS".. ...."NU IS DIT 49152".#.....R...."NA LAD EN VAN HET NIEUWE PROGRAMMA TERUG".~.... "HALEN MET SYS A+54 EN DAARNA STARTEN".. ...."MET GOTO XXXXX ( DUS NIET MER 'RUN' )".......V...."DE EERSTE REGEL VAN HET N IEUWE"......"PROGRAMMA DIENT ALS VOLGT T E LUIDEN:".......3...."POKE 46,PEEK(174) :POKE 46,PEEK(175):.G...."SYS A+54":.:.. C....:."<TOETS>":.. A$:.".".I.........." VAN STRINGS, DIE OOK IN HET NIEUWE"..... ."PROGRAMMA WORDEN GEBRUIKT DIENT EEN".. ...."LEGE SPATIE TE WORDEN TOEGEVOEGD IN DE"......"VORM VAN:".)...."D$=''VOOR VE RVOLG DRUK SPATIEBALK''+".E. .."TWEE MAA L QUOTE ''''".K.!...X.".."DIT GELDT OOK VOOR STRINGARRAY'S, DIE"...$.."NIET MET INPUT # OF INPUT ZIJN"...&.."BINNENGEHAA LD, DUS DAN:".C.'.....(.."10 B$(1)=''AAP ''"...*.."20 B$(2)=''NOOT''"...,.."30 FO R A=1 TO 2:B$(A)=B$(A)+''''".(.0..:.:.:. .F.5.."( TOETS => PROGRAMMA )".P.:... A$ .Y.?.."."._.X.....
> CLICK IMAGE PREVIEW FOR FULL MODAL