home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er
/
64ER_CD.iso
/
sh1x
/
sh12a.d64
/
fast_slow.src
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-03-30
|
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