home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er 1984 December
/
64er_Magazin_84-12_1984_Markt__Technik_de.d64
/
such.lader
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
4KB
|
70 lines
10 rem" basic-lader fuer kreuzwort-suchroutine
11 [143]" wichtig: vor dem 1.lauf abspeichern !
12 :
13 ad=12*4096 :rem" = $c000
14 :
15 [129] n[178]0 [164] 906: [135] by: [151] ad[170]n,by: su[178]su[170]by: [130]
16 [139] su[179][177]105962 [167] [153]" checksum - error" :[144]
17 :
20 [143]" such-routine abspeichern
22 :
24 poke 43, 0 :rem" vektor auf beginn
26 [151] 44,192 :[143]" der routine
28 :
30 poke 45,138 :rem" vektor auf ende
32 [151] 46,195 :[143]" der routine
34 :
36 save"such.obj",8
38 :
40 sys 64738
42 :
44 :
45 data120,32,139,192,240,9,32,188,192,32,240,192,76,21,192,32,15,193,32
46 data100,193,176,19,169,0,133,139,141,0,220,173,1,220,201,255,240,234
47 data160,1,76,135,192,165,140,240,6,32,21,194,76,55,192,32,95,194,176
48 data45,230,25,165,2,197,25,144,17,162,1,32,56,193,32,71,193,165,98,197
49 data26,144,234,76,42,192,165,20,208,11,165,21,208,5,160,2,76,135,192
50 data198,21,198,20,76,23,192,165,139,208,12,165,141,240,228,165,142,240
51 data4,165,143,240,220,238,248,7,32,146,194,160,3,173,248,7,201,255,208
52 data2,160,4,88,76,162,179,32,247,183,165,47,166,48,133,78,134,79,160
53 data0,132,139,169,7,24,101,78,144,2,230,79,133,78,169,162,162,4,133,80
54 data134,81,162,216,133,82,134,83,165,26,201,0,240,2,133,139,96,165,211
55 data133,28,165,214,133,29,24,105,4,133,214,32,108,229,165,209,133,87
56 data165,210,133,88,230,87,230,87,32,36,234,165,243,133,91,165,244,133
57 data92,230,91,230,91,165,51,166,52,133,101,134,102,96,164,28,177,91,41
58 data15,201,14,240,17,170,165,140,208,7,138,201,1,208,9,240,5,138,201
59 data7,208,2,56,96,24,96,169,0,133,140,165,2,32,88,193,133,25,165,78,133
60 data99,165,79,133,100,166,25,240,3,32,56,193,32,71,193,169,255,32,88
61 data193,201,128,144,2,133,140,96,169,3,24,101,99,144,2,230,100,133,99
62 data202,208,242,96,160,0,177,99,133,26,200,177,99,133,101,200,177,99
63 data133,102,96,133,97,173,27,212,197,97,240,2,176,247,96,162,19,134,31
64 data134,32,232,138,56,229,26,166,140,240,6,133,32,169,7,208,4,133,31
65 data169,1,133,33,165,31,32,88,193,133,28,165,32,32,88,193,133,29,165
66 data82,166,83,133,91,134,92,164,29,240,14,169,40,24,101,91,144,2,230
67 data92,133,91,136,208,242,164,28,177,91,41,15,201,14,240,26,197,33,240
68 data22,198,28,16,238,165,31,133,28,165,29,197,32,240,6,230,29,160,1,208
69 data208,24,96,165,80,166,81,133,87,134,88,164,29,240,14,169,40,24,101
70 data87,144,2,230,88,133,87,136,208,242,169,20,166,140,240,6,56,229,29
71 data76,244,193,56,229,28,133,98,56,96,169,0,133,141,133,143,133,27,165
72 data87,166,88,133,89,134,90,165,91,166,92,133,93,134,94,165,28,133,30
73 data96,32,248,193,164,30,177,89,201,160,240,8,164,27,209,101,208,53,164
74 data30,177,93,41,15,201,14,208,4,133,143,240,6,201,7,208,35,133,141,230
75 data27,165,27,197,26,240,27,169,40,24,101,89,144,2,230,90,133,89,169
76 data40,24,101,93,144,2,230,94,133,93,24,144,189,24,96,56,96,32,248,193
77 data164,30,177,89,201,160,240,8,164,27,209,101,208,32,164,30,177,93,41
78 data15,201,14,208,4,133,143,240,6,201,1,208,14,133,141,230,30,230,27
79 data165,27,197,26,208,212,56,96,24,96,32,248,193,164,27,177,101,164,30
80 data145,89,169,5,133,33,177,93,41,15,201,14,208,12,169,7,133,33,165,140
81 data240,4,169,1,133,33,165,33,145,93,230,27,165,27,197,26,240,34,165
82 data140,240,25,169,40,24,101,89,144,2,230,90,133,89,169,40,24,101,93
83 data144,2,230,94,133,93,76,149,194,230,30,76,149,194,169,0,162,196,133
84 data87,134,88,164,29,240,14,169,20,24,101,87,144,2,230,88,133,87,136
85 data208,242,133,89,165,88,133,90,164,28,177,89,166,140,240,4,9,64,208
86 data2,9,4,145,89,224,0,240,15,24,165,89,105,144,133,89,165,90,105,1,133
87 data90,208,13,24,165,89,105,32,133,89,165,90,105,3,133,90,173,248,7,145
88 data89,224,0,240,23,166,26,24,202,240,13,169,20,101,87,144,3,230,88,24
89 data133,87,144,240,169,16,208,8,152,24,101,26,168,136,169,1,17,87,145
90 data87,96,169,0,162,196,133,89,134,90,160,0,140,248,7,152,145,89,230
91 data89,208,250,230,90,165,90,201,201,208,241,169,255,141,14,212,141,15
92 data212,169,129,141,18,212,96,0