home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er Special 12
/
64er_Magazin_Sonderheft_12_86-12_1986_Markt__Technik_de_Side_A.d64
/
fast_slow.src
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
597b
|
35 lines
1000 ;********************************
1010 ;****** ******
1020 ;*** fast / slow ***
1030 ;****** ******
1040 ;********************************
1050 ;
1060 ; fuer den c-128 im 64'er-modus.
1070 ; (c) 3/86 by f.graef, plankstadt
1080 ;
1090 .ba $c000
1100 ;
1110 ; --- fast ---
1120 ;
1130 fast lda53265;scr aus
1140 and#239
1150 sta53265
1160 ;
1170 lda#1;2 mhz
1180 sta53296
1190 ;
1200 rts
1210 ;
1220 ; --- slow ---
1230 ;
1240 slow lda#0;1 mhz
1250 sta53296
1260 ;
1270 lda53265;scrn an
1280 ora#16
1290 sta53265
1300 ;
1310 rts
1320 ;
1330 ;programm-ende