Commodore Disc 51/Commodore_Disc_51_19xx_-_de.d64/rezeptmanager.64

Commodore BASIC | 2022-10-26 | 7KB | 219 lines

10 rem rezeptmanager===========64
20 rem (p) commodore disc      ==
30 rem ==========================
40 rem (c) by                  ==
50 rem     jens wellhausen     ==
60 rem     martin radetzki     ==
70 rem version 2.0   40z./ascii==
80 rem  c-64  floppy           ==
90 rem ==========================
100 fori=50000to51220
110 reada:pokei,a:next
120 printchr$(147)"l[207]"chr$(34)"main"chr$(34)",8":print"run"
130 poke631,19:poke632,13:poke633,19:poke634,17:poke635,13:poke198,5:end
140 data 108,098,098,098,098,098
150 data 098,098,098,098,098,098
160 data 098,098,098,098,123,225
170 data 204,193,196,197,206,160
180 data 160,160,160,160,160,160
190 data 160,160,160,097,225,226
200 data 226,226,226,226,226,226
210 data 226,226,226,226,226,226
220 data 226,226,097,225,032,032
230 data 032,032,032,032,032,032
240 data 032,032,032,032,032,032
250 data 032,097,225,032,032,032
260 data 032,032,032,032,032,032
270 data 032,032,032,032,032,032
280 data 097,225,032,032,032,032
290 data 032,032,032,032,032,032
300 data 032,032,032,032,032,097
310 data 225,032,032,032,032,032
320 data 032,032,032,032,032,032
330 data 032,032,032,032,097,225
340 data 032,032,032,032,032,032
350 data 032,032,032,032,032,032
360 data 032,032,032,097,225,032
370 data 032,032,032,032,032,032
380 data 032,032,032,032,032,032
390 data 032,032,097,225,032,032
400 data 032,032,032,032,032,032
410 data 032,032,032,032,032,032
420 data 032,097,225,032,032,032
430 data 032,032,032,032,032,032
440 data 032,032,032,032,032,032
450 data 097,225,032,032,032,032
460 data 032,032,032,032,032,032
470 data 032,032,032,032,032,097
480 data 225,032,032,032,032,032
490 data 032,032,032,032,032,032
500 data 032,032,032,032,097,225
510 data 098,098,098,098,098,098
520 data 098,098,098,098,098,098
530 data 098,098,098,097,170,170
540 data 108,098,098,098,098,098
550 data 098,098,098,098,098,098
560 data 098,098,098,098,123,225
570 data 211,208,197,201,195,200
580 data 197,210,206,160,160,160
590 data 160,160,160,097,225,226
600 data 226,226,226,226,226,226
610 data 226,226,226,226,226,226
620 data 226,226,097,225,032,032
630 data 032,032,032,032,032,032
640 data 032,032,032,032,032,032
650 data 032,097,225,032,032,032
660 data 032,032,032,032,032,032
670 data 032,032,032,032,032,032
680 data 097,225,032,032,032,032
690 data 032,032,032,032,032,032
700 data 032,032,032,032,032,097
710 data 225,032,032,032,032,032
720 data 032,032,032,032,032,032
730 data 032,032,032,032,097,225
740 data 098,098,098,098,098,098
750 data 098,098,098,098,098,098
760 data 098,098,098,097,170,170
770 data 170,170,108,098,098,098
780 data 098,098,098,098,098,098
790 data 098,098,098,098,098,098
800 data 123,225,211,195,200,210
810 data 197,201,194,197,206,160
820 data 160,160,160,160,160,097
830 data 225,226,226,226,226,226
840 data 226,226,226,226,226,226
850 data 226,226,226,226,097,225
860 data 032,032,032,032,032,032
870 data 032,032,032,032,032,032
880 data 032,032,032,097,225,032
890 data 032,032,032,032,032,032
900 data 032,032,032,032,032,032
910 data 032,032,097,225,098,098
920 data 098,098,098,098,098,098
930 data 098,098,098,098,098,098
940 data 098,097,170,170,170,170
950 data 170,170,170,170,108,098
960 data 098,098,098,098,098,098
970 data 098,098,098,098,098,098
980 data 098,098,098,123,225,196
990 data 210,213,195,203,160,160
1000 data 160,160,160,160,160,160
1010 data 160,160,160,097,225,226
1020 data 226,226,226,226,226,226
1030 data 226,226,226,226,226,226
1040 data 226,226,226,097,225,066
1050 data 005,018,005,009,020,005
1060 data 014,032,083,009,005,032
1070 data 004,005,014,097,225,068
1080 data 018,021,003,011,005,018
1090 data 032,022,015,018,032,032
1100 data 021,014,004,097,225,032
1110 data 032,004,018,021,005,003
1120 data 011,005,014,032,083,009
1130 data 005,032,032,097,225,032
1140 data 032,032,032,032,082,069
1150 data 084,085,082,078,032,032
1160 data 032,032,032,097,225,098
1170 data 098,098,098,098,098,098
1180 data 098,098,098,098,098,098
1190 data 098,098,098,097,170,170
1200 data 170,170,170,170,108,098
1210 data 098,098,098,098,098,098
1220 data 098,098,098,098,098,098
1230 data 098,098,123,225,196,201
1240 data 197,206,211,212,160,160
1250 data 160,160,160,160,160,160
1260 data 160,097,225,226,226,226
1270 data 226,226,226,226,226,226
1280 data 226,226,226,226,226,226
1290 data 097,225,068,009,019,011
1300 data 005,020,020,005,014,009
1310 data 014,008,001,012,020,097
1320 data 225,082,005,026,005,016
1330 data 020,032,012,015,005,019
1340 data 003,008,005,014,097,225
1350 data 082,005,026,046,032,021
1360 data 013,002,005,014,005,014
1370 data 014,005,014,097,225,032
1380 data 032,032,032,032,069,078
1390 data 068,069,032,032,032,032
1400 data 032,032,097,225,098,098
1410 data 098,098,098,098,098,098
1420 data 098,098,098,098,098,098
1430 data 098,097,170,170,170,170
1440 data 108,098,098,098,098,098
1450 data 098,098,098,098,098,098
1460 data 098,098,098,098,123,225
1470 data 210,197,218,197,208,212
1480 data 160,204,207,197,211,195
1490 data 200,197,206,097,225,226
1500 data 226,226,226,226,226,226
1510 data 226,226,226,226,226,226
1520 data 226,226,097,225,032,032
1530 data 032,032,032,032,032,032
1540 data 032,032,032,032,032,032
1550 data 032,097,225,032,032,032
1560 data 032,032,032,032,032,032
1570 data 032,032,032,032,032,032
1580 data 097,225,032,032,032,032
1590 data 032,032,032,032,032,032
1600 data 032,032,032,032,032,097
1610 data 225,032,032,032,032,032
1620 data 032,032,032,032,032,032
1630 data 032,032,032,032,097,225
1640 data 098,098,098,098,098,098
1650 data 098,098,098,098,098,098
1660 data 098,098,098,097,170,170
1670 data 170,170,108,098,098,098
1680 data 098,098,098,098,098,098
1690 data 098,098,098,098,098,098
1700 data 123,225,210,197,218,174
1710 data 160,213,205,194,197,206
1720 data 197,206,206,197,206,097
1730 data 225,226,226,226,226,226
1740 data 226,226,226,226,226,226
1750 data 226,226,226,226,097,225
1760 data 032,032,032,032,032,032
1770 data 032,032,032,032,032,032
1780 data 032,032,032,097,225,032
1790 data 032,032,032,032,032,032
1800 data 032,032,032,032,032,032
1810 data 032,032,097,225,032,032
1820 data 032,032,032,032,032,032
1830 data 032,032,032,032,032,032
1840 data 032,097,225,032,032,032
1850 data 032,032,032,032,032,032
1860 data 032,032,032,032,032,032
1870 data 097,225,032,032,032,032
1880 data 032,032,032,032,032,032
1890 data 032,032,032,032,032,097
1900 data 225,032,032,032,032,032
1910 data 032,032,032,032,032,032
1920 data 032,032,032,032,097,225
1930 data 032,032,032,032,032,032
1940 data 032,032,032,032,032,032
1950 data 032,032,032,097,225,098
1960 data 098,098,098,098,098,098
1970 data 098,098,098,098,098,098
1980 data 098,098,097,255,033,255
1990 data 108,098,098,098,098,098
2000 data 098,098,098,098,098,098
2010 data 098,098,098,098,123,225
2020 data 197,206,196,197,160,160
2030 data 160,160,160,160,160,160
2040 data 160,160,160,097,225,226
2050 data 226,226,226,226,226,226
2060 data 226,226,226,226,226,226
2070 data 226,226,097,225,019,009
2080 data 014,004,032,083,009,005
2090 data 032,019,009,003,008,005
2100 data 018,097,225,040,010,047
2110 data 014,041,032,063,032,032
2120 data 032,032,032,032,032,032
2130 data 097,225,098,098,098,098
2140 data 098,098,098,098,098,098
2150 data 098,098,098,098,098,097
2160 data 179,128,255,000,255,000
2170 data 251,162,000
60000 rem ende