home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er 1987 November
/
64er_Magazin_87-11_1987_Markt__Technik_de.d64
/
stimme#4
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
552b
|
16 lines
1 data169,21,141,24,3,169,192,141,25,3,169,129,141,13,221,169,17,141,14,221,96
2 data72,138,72,152,72,173,13,221,41,1,208,3,76,86,254,165,2,208,8,169,15
3 data141,24,212,76,188,254,169,15,73,4,141,24,212,141,49,192,76,188,254
4 data169,71,141,24,3,169,254,141,25,3,96
9 print"> stimme #4 < ":a=0
10 forb=0to71:readq:poke49152+b,q:a=a+q:next
11 ifa<>7897thenprint"> fehler !! <":end
12 print"> aktiviert <":sys49152
13 poke56581,7:forb=0to2:poke2,1:fora=0to50:nexta:poke2,0:fora=0to20:nexta,b
14 sys49213
15 rem
16 rem stimme #4 version 1.0
17 rem von
18 rem christoph joch
19 rem