korjaa ruudun tyhjennysrutiinit alussa
This commit is contained in:
parent
f4014523b9
commit
f971fd84db
|
@ -1388,7 +1388,8 @@ begin
|
|||
begin
|
||||
fgColBefore := 0;
|
||||
Fill(screen_char_loc, KEY_SPACE, 255);
|
||||
FillFast(screen_char_loc + 256, KEY_SPACE, 127);
|
||||
FillFast(screen_char_loc + 255, KEY_SPACE, 127);
|
||||
Fill(^$06F8, KEY_SPACE, 240);
|
||||
GoToPurpleBarRasterStart();
|
||||
currentPartDone := true;
|
||||
screen_fg_col := 0;
|
||||
|
@ -1521,7 +1522,8 @@ begin
|
|||
CreateAddressTable(#mainPartAddressTable, $4400, 40, 25);
|
||||
CreateAddressTable(#colorAddressTable, $d800, 40, 25);
|
||||
|
||||
Fill(^$0528, KEY_SPACE, 240);
|
||||
Fill(^$0518, KEY_SPACE, 240);
|
||||
Fill(^$0608, KEY_SPACE, 80);
|
||||
|
||||
for i := 0 to 256 do fastPlasma[i] := textPlasmaLumi[textPlasmaX[i]];
|
||||
|
||||
|
|
Loading…
Reference in New Issue