Jeśli chcesz wziąć udział w dyskusjach na forum - zaloguj się. Jeżeli nie masz loginu - poproś o członkostwo.
Vanilla 1.1.4 jest produktem Lussumo. Więcej informacji: Dokumentacja, Forum.
pirx:
pomysł jest super fajny0xF:
Chybiony pomysł.sect zpg
v1 .ds 1
v2 .ds 2
.ends
.sect ram
procedurka:
... ;cos robimy
rts
.ends
.sect zpg
v10 .ds 20
.ends
zpg .defsect start=$0 size=$100
stack .defsect start=$100 size=$100
ram .defsect start=$2000 end=$bfff
scr .defsect start=(@ & $f000) size=$1000
dl .defsect start=(@ & $fc00) size=$400
xram .defsect start=$4000 size=$4000
chr128 .defsect start=(@ & $fc00) size=$400
chr64 .defsect start=(@ & $fe00) size=$200
pmg1 .defsect start=(@ & $f800) size=$800
pmg2 .defsect start=(@ & $fc00) size=$400
romram .defsect start=$c000 end=$cfff
romram .defsect start=$d800 end=$ffff
io .defsect start=$d000 end=$d7ff
testrom .defsect start=$5000 end=$57ff
devrom .defsect start=$d800 end=$dfff
pmg1 .defsect start=(@ & $f800 + $300) size=$500
pmg2 .defsect start=(@ & $fc00 + $180) size=$280
.segdef zpg $80 $80
.segdef ram $2000 $8000
.segdef zpg $80 $80 ;górna połówka zpg
.segdef main reloc ;blok relokowalny o nieznanym rozmiarze
.segdef work empty ;blok rezerowany na dane o nieznanym rozmiarze
.segdef data empty $100 ;blok rezerowany na dane o określonym z góry rozmiarze
.segdef init sparta $600 $100 ;blok stały $100 bajtów od $600
.segment init
sec
ror
bit *-1
rol
rts
.segment zpg
adr1 .ds 2
adr2 .ds 2
.segment main
ldy #0
@ lda (adr1),y
sta (adr2),y
iny
bne @-
rts
.segment work
cos .ds 1
.segment main
lda cos
pha
...
pla
sta cos
rts
Od 1 do 13 z 13