Search results
I ask help for handle routine assembler for PAINT from BASIC
Score: 166.8 %,
Type: Forum topic , Comments: 13 comments
A ; LOG I-OP: PSET
CALL PSET
PAINT0:
CALL GET.Q
RET C
INC H
CALL NZ,PAINT.SUB
DEC H
JP ... NZ,GET.Q0
SCF
RET
GET.Q0:
LD HL,(Q.BTM)
LD BC,Q.BUF+Q.LENGTH+1
OR A
PUSH HL
SBC HL,BC
POP HL
JP ...
;----------------------------------------------------------------------------
BRDATR equ 0xFCB2
ATRBYT equ 0xFCB2
SCRMOD equ 0xFCAF
EXTROM equ 0x015F
CALBAS equ ...
I need of an INTERRUPT TIME hook for a sound SFX in assembler
Score: 164.01 %,
Type: Forum topic , Comments: 18 comments
LD E,$02
CALL $93 ;sound
LD A,$08
LD E,$0F
CALL $93
; ... to LOOP1
SOUND:
LD E,$16
LOOP2:
LD A,E
CP $00
RET Z ;exit if A=0
LD ... DEFUSR=&HE000:END
200 DATA 3E,01,1E,02,CD,93,00,3E
210 DATA 08,1E,0F,CD,93,00,1C,7B
220 DATA FE,00,28,53,3E,00,CD,93 ...
