[Tuto] Swap the D_File in BASIC...
Posted: Wed Jun 22, 2022 6:12 am
Hi,
If you had to print a screen in BASIC, you had to wait, and all characters are printed character by character.
You can use the FAST command, but you had to display a black screen.
In case a D_File swap process, the BASIC is not faster, but the whole screen appear at the same time...
If you had to print a screen in BASIC, you had to wait, and all characters are printed character by character.
You can use the FAST command, but you had to display a black screen.
In case a D_File swap process, the BASIC is not faster, but the whole screen appear at the same time...
Code: Select all
1 REM xxxxxxxxxxxxx GET READY...xxxxxxxxxxxxx
10 FOR A=16514 TO 16527
12 POKE A,118
14 POKE A+34,118
16 NEXT A
20 LET D1=PEEK 16396
22 LET D2=PEEK 16397
30 GOSUB 1000
40 POKE 16396,129
45 POKE 16397,64
48 GOSUB 2000
50 POKE 16396,D1
55 POKE 16397,D2
56 FOR A=1 TO 75
57 NEXT A
59 CLS
60 GOTO 30
1000 REM
1010 PRINT AT 0,0;
1020 LET F$="\
***SCREEN FILL***screen«fill’’’ "
1030 FOR A=1 TO 22
1040 PRINT F$
1050 NEXT A
1100 RETURN
2000 REM
2010 PRINT AT 0,0;
2020 LET F$="\
screen«fill’’’***SCREEN FILL*** "
2030 FOR A=1 TO 22
2040 PRINT F$
2050 NEXT A
2100 RETURN