https://mirror.atariki.pl/w/index.php?action=history&feed=atom&title=Brudnopis_Delyry 2026-10-03T10:42:37Z Historia wersji tej strony wiki MediaWiki 1.46.0 https://mirror.atariki.pl/w/index.php?title=Brudnopis_Delyry&diff=448&oldid=prev 2026-10-01T08:51:48Z

<p>Reconstructed from archived HTML; see provenance manifest</p> <p><b>Nowa strona</b></p><div>Zapis Hiscore.dat z wykorzystaniem dowolnego DOS.<br /> <br /> &lt;pre&gt;<br /> buflen = $4f<br /> <br /> org hiscores<br /> <br /> run_number dta 0,0,0<br /> org hiscores+$10<br /> tokens dta 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0<br /> hiscore dta 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0<br /> org hiscores+$40<br /> player_name dta d&#039;123456789a&#039;<br /> org hiscores+$4e<br /> checksum dta 0<br /> <br /> org code<br /> save_hiscore<br /> jsr find_free_IOCB<br /> jsr open_file<br /> jsr write_binary<br /> jsr close_file<br /> rts<br /> <br /> find_free_IOCB<br /> ldx #$00<br /> ldy #$01<br /> ?loop lda icchid,x<br /> cmp #$ff<br /> beq found<br /> txa<br /> clc<br /> adc #$10<br /> tax<br /> bpl ?loop<br /> ldy #-95<br /> found rts<br /> <br /> open_file<br /> lda #$03<br /> sta iccmd,x<br /> lda #&amp;lt;fname<br /> sta icbufa,x<br /> lda #&amp;gt;fname<br /> sta icbufa+1,x<br /> lda #$08<br /> sta icax1,x<br /> lda #$00<br /> sta icax2,x<br /> jsr ciov<br /> rts<br /> <br /> close_file<br /> lda #$0c<br /> sta iccmd,x<br /> jsr ciov<br /> rts<br /> <br /> write_binary<br /> lda #$0b<br /> sta iccmd,x<br /> lda #&amp;lt;hiscores<br /> sta icbufa,x<br /> lda #&amp;gt;hiscores<br /> sta icbufa+1,x<br /> lda #&amp;lt;buflen<br /> sta icbufl,x<br /> lda #&amp;gt;buflen<br /> sta icbufl+1,x<br /> jsr ciov<br /> rts<br /> <br /> fname dta c&#039;D:HISCORE.DAT&#039;,$9B<br /> &lt;/pre&gt;<br /> </div>

imported>Atariki recovery