mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-20 22:28:05 +11:00
e18f9b53a9
Allows for the ".fill x-$" pattern.
31 lines
398 B
NASM
31 lines
398 B
NASM
; comment
|
|
add a, b ; comment
|
|
label1:
|
|
inc a ; comment
|
|
ld hl, label2
|
|
.dw label2
|
|
; comment
|
|
.db 42, 54
|
|
label2: .dw 0x42
|
|
.dw 3742, 0xffff
|
|
.dw 0x3742
|
|
ld a, (label1)
|
|
rla \ rla
|
|
.equ foo 0x1234
|
|
.equ bar foo
|
|
ld hl, bar
|
|
ld ix, 1234
|
|
ld iy, 2345
|
|
ld (ix+1), l
|
|
ld l, (ix+1)
|
|
ld hl, 0x100
|
|
.equ baz 0x20
|
|
; accept space before comma
|
|
ld b , baz-3
|
|
rl d
|
|
rr e
|
|
rlc c
|
|
cp '-'
|
|
sbc hl, de
|
|
.fill 0x50-$
|