Compare commits

...

6 Commits

Author SHA1 Message Date
gimulnautti 3142ad68d5 Korjattu typo äänestysnumero stringeissä, aiheutti ylivuotovirheen 2023-03-03 23:56:13 +02:00
gimulnautti 8fd6d7f5bd prg korjattu ruututyhjennys 2023-03-03 21:40:29 +02:00
gimulnautti f971fd84db korjaa ruudun tyhjennysrutiinit alussa 2023-03-03 21:39:29 +02:00
gimulnautti f4014523b9 exomize prg 2023-03-02 21:36:57 +02:00
gimulnautti fff6a748d1 muu maa äänestysnumerot 2023-03-02 21:14:09 +02:00
gimulnautti 95487c40b2 muu maa intro 2023-03-02 00:18:59 +02:00
9 changed files with 20 additions and 18 deletions

View File

@ -29,7 +29,7 @@ override_target_settings_org = $810
override_target_settings_ignore_sys = 0 override_target_settings_ignore_sys = 0
override_target_settings_ignore_prg = 0 override_target_settings_ignore_prg = 0
output_debug_symbols = 1 output_debug_symbols = 1
open_files = ,piraatti_intro.asm, resources/images/piraattinaamat-2.flf, resources/images/piraattinaamat-1.flf, piraatti_intro.ras open_files = ,resources/images/piraattinaamat-2.flf, resources/images/piraattinaamat-1.flf, piraatti_intro.ras
project_path = /Users/gimulnautti/piraattipuolue-github/c64-vaali-intro-2023/ project_path = /Users/gimulnautti/piraattipuolue-github/c64-vaali-intro-2023/
zeropage_colormemory = $fb zeropage_colormemory = $fb
dirart_flf_file = none dirart_flf_file = none
@ -40,7 +40,7 @@ remove_unused_symbols = 1
ignore_initial_jump = 0 ignore_initial_jump = 0
current_file = piraatti_intro.ras current_file = piraatti_intro.ras
output_type = prg output_type = prg
exomizer_toggle = 0 exomizer_toggle = 1
use_track_19 = 1 use_track_19 = 1
disable_compiler_comments = 0 disable_compiler_comments = 0
charset_ = :resources/character.rom charset_ = :resources/character.rom

Binary file not shown.

View File

@ -223,22 +223,22 @@ text : string = (@cmoveto, 6,10,
26, 12, 13, 12); 26, 12, 13, 12);
naamatNames : string = ( naamatNames : string = (
"TONI AITTONIEMI - UUSIMAA", @cpause,
"JUHO KARVINEN - PIRKANMAA", @cpause, "JUHO KARVINEN - PIRKANMAA", @cpause,
"RIIKKA NIEMINEN - UUSIMAA", @cpause, "TEEMU LINDROOS - PIRKANMAA", @cpause,
"ARTO TAMMENOKSA - PIRKANMAA", @cpause,
"KLAUS TORNKVIST - PIRKANMAA", @cpause,
"JARNO YLTAVA - PIRKANMAA", @cpause,
"LEINARD KOHONEN - HAME", @cpause,
"ALEKSI LOFGREN - SAVO-KARJALA", @cpause,
"PEKKA MUSTONEN - SAVO-KARJALA", @cpause,
"TIIA MUSTONEN - SAVO-KARJALA", @cpause,
"JARI NIKKINEN - SAVO-KARJALA", @cpause, "JARI NIKKINEN - SAVO-KARJALA", @cpause,
"SATU IMMONEN - HELSINKI", @cpause, "TAPANI PARKKINEN - KESKI-SUOMI", @cpause,
"PEKKA MUSTONEN - HELSINKI", @cpause, "CHRISTER WAREN - SATAKUNTA", @cpause, @cstop );
"REETTA OJALA - HELSINKI", @cpause, naamatNumbers : string = ( "113", "114", "115", "116", "117", "140",
"MAREK NETSHADA - HELSINKI", @cpause, "88 ", " 89", "90 ", " 91", "-2-", "-2-", @cstop);
"OLAVI KAUKAMIELI - HELSINKI", @cpause,
"JONI MAHLAMAKI - UUSIMAA", @cpause,
"KAUSTI RANTALAINEN - HELSINKI", @cpause,
"ARI-PEKKA PULKKIS - VAASA", @cpause, @cstop );
naamatNumbers : string = ( "123", "456", "789", " 10", "20 ", " 30",
" 40", "50 ", " 60", " 70", " 80", " 90", @cstop);
tab320 : array[25] of integer = buildtable("i*320"); tab320 : array[25] of integer = buildtable("i*320");
@ -341,7 +341,7 @@ text : string = (@cmoveto, 6,10,
rasterLineMainScroller : byte = 240; rasterLineMainScroller : byte = 240;
// TODO optimize spaces // TODO optimize spaces
scrollText : string = " YARRRR SAILORS WELCOME TO THE FINNISH PIRATE PARTY PARLIAMENTARY ELECTION 2023 INTRO --- VOTE FOR US --- WE ROCK THE WORLD IN 8 BITS AND BEYOND --- WRITTEN BY GIMLE IN TRSE --- MUSIC BY GIMLE WITH SIDFACTORY II --- MUCH LOVE AND GREETINGS TO THE C64 DEMOSCENE --- WE SALUTE SOME GROUNDBREAKING TECHNOLOGICAL PIRATES --- FINNISH GOLD - EXTEND - VIRTUAL DREAMS - FAIRLIGHT - BYTERAPERS - BLOODSUCKERS - ARTLINE DESIGNS - DEKADENCE - BOOZE DESIGN - ACCESSION - NOICE - PROXIMA - ORANGE - CNCD - KEWLERS - MFX - TPOLM - MATUREFURK - KATASTRO FI - SCOOPEX - TAAT - HEDELMAE - JUMALAUTA - KAITA FILMITUOTANTO - BRAINLEZ CODERS - SYMPTOM - GOTO 10 - DAMONES - DA JORMAS - WIDE LOAD - HIRMU - LEUAT "; scrollText : string = " YARRRR SAILORS WELCOME TO THE FINNISH PIRATE PARTY PARLIAMENTARY ELECTION 2023 INTRO --- VOTE FOR US --- WE ROCK THE WORLD IN 8 BITS AND BEYOND --- WRITTEN BY GIMLE IN TRSE --- MUSIC BY GIMLE WITH SIDFACTORY II --- MUCH LOVE AND GREETINGS TO THE C64 DEMOSCENE --- WE SALUTE SOME GROUNDBREAKING TECHNOLOGICAL PIRATES --- FINNISH GOLD - EXTEND - VIRTUAL DREAMS - FAIRLIGHT - BYTERAPERS - BLOODSUCKERS - ARTLINE DESIGNS - DEKADENCE - BOOZE DESIGN - ACCESSION - NOICE - PROXIMA - ORANGE - CNCD - KEWLERS - MFX - TPOLM - MATUREFURK - KATASTRO FI - PARALLAX - TAAT - HEDELMAE - JUMALAUTA - KAITA FILMITUOTANTO - BRAINLEZ CODERS - SYMPTOM - GOTO 10 - DAMONES - DA JORMAS - WIDE LOAD - HIRMU - LEUAT ";
scrollTextOffset : integer = 0; scrollTextOffset : integer = 0;
scrollTextLength : integer = 0; scrollTextLength : integer = 0;
scrollCurrent : byte = 0; scrollCurrent : byte = 0;
@ -1388,7 +1388,8 @@ begin
begin begin
fgColBefore := 0; fgColBefore := 0;
Fill(screen_char_loc, KEY_SPACE, 255); 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(); GoToPurpleBarRasterStart();
currentPartDone := true; currentPartDone := true;
screen_fg_col := 0; screen_fg_col := 0;
@ -1521,7 +1522,8 @@ begin
CreateAddressTable(#mainPartAddressTable, $4400, 40, 25); CreateAddressTable(#mainPartAddressTable, $4400, 40, 25);
CreateAddressTable(#colorAddressTable, $d800, 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]]; for i := 0 to 256 do fastPlasma[i] := textPlasmaLumi[textPlasmaX[i]];