-
Textured Scanline Flood Fill for ZX Spectrum 48KPity that it's quite hard to contribute code to WoS in a straightforward manner. Recently, I have created a textured/hatched fill M/C routine for the…
... have created a textured/hatched fill M/C routine for the ... ZX Spectrum 48K. It was for a ... Unfortunately, I can't attach a ZIP archive here, so ... /> 9010 LET a=63488
9020 READ a$: PRINT "{AT ...
9060 POKE a,v: LET a=a+1
9070 ... -
line routineWondered if anyone can help me out. I have been programming a 3d graphics library for the spectrum, in Machine code. The line routine that I have i…
... /> ld a,d
sub 8
ld d,a
ld a,e
add a ... ,#20
ld e,a
jr nz,filltab
ld a,d ...
add a,8
ld d,a
cp ... -
Machine Code ChallengeHere's a challenge for all you Z80 programmers. Points to be awarded for elegance and brevity. (I haven't got the solution either) HL addresses the …
... for the next iteration
......ld a,c
......or (hl) ;now change ...
......ld (hl),a
nextbyte: dec b ;here starts the main loop
......rra
......ld c,a
......ex af,af'
......ld a,c
......or (hl ... -
Machine Code ChallengeHere's a challenge for all you Z80 programmers. Points to be awarded for elegance and brevity. (I haven't got the solution either) HL addresses the …
... number in E.
LD A,B
OR A ; Load zero flag.
EXX
LD C,B ; Set LSB of BC to B.
XOR A ; Set MSB ... of BC to 0.
LD B,A
CPL ; Set A ... -
Machine Code ChallengeHere's a challenge for all you Z80 programmers. Points to be awarded for elegance and brevity. (I haven't got the solution either) HL addresses the …
... .
8005 78 4 LD A,B
8006 B7 4 ... LD C,B ; Set LSB of BC to B.
800D AF 4 XOR A ... ; Set MSB of BC to 0.
800E 47 4 LD B,A ... -
ZX81 and ZX80 emulator on Spectrum 128KA couple of weeks ago we were talking about a new ZX81 emulator for the 128K. Someone beat me. More details at [url="http://www.fruitcake.plus.com/S…
... /> ;; TRAILER
L0388: LD B,$1A ; counter to twenty six ... br /> LD A,E ;
JR C,L0388 ; loop back with ... carry flag
RL C ;
JR NC,L034E ... -
help in byte mirroring.I need some help. What is the best way to mirror the byte? (for ex. 10010011 -> 11001001) I mean, if there is a simple way to do it (may be with OR, …
... if b6 != b1 { reg=reg xor 66 }
etc..., ... />
LD B,normalbyte ; gonna mirror this
LD A,B
AND 129 ... XOR 129 ; swap bits
LD C,A ; storing it here
nxt0 LD A,B
XOR 66 ; swap bits
OR C
LD C,A
... -
16k/48k Sound FXI am now moving on from graphiocs to trying to build up a library of sound fx to be used with a 16k/48k Spectrum. Does anyone have any example m/cod…
... br />
WhiteNoise: ld b,0
ld c,15
noise1: call ... ld e,a
ld a,l
xor d
xor e
srl a ... -
Pixel setting / general speccy codingi just started doing some cross-coding with the [url="http://www.bigfatpanda.fsnet.co.uk/z80.html"]Z80 SNA assembler[/url] and an emulator, and this …
... [code]
LD B,Y-coor
LD C,X-coor
LD A,B
CALL ... LD A,(HL) ; get pixelpointer
EX DE,HL ; get address
XOR ... (HL) ; reset pixel
LD (HL),A ; put back ... -
Pixel setting / general speccy codingi just started doing some cross-coding with the [url="http://www.bigfatpanda.fsnet.co.uk/z80.html"]Z80 SNA assembler[/url] and an emulator, and this …
... /> So if c contains your x coord and b holds the y ... H
LD H,(HL)
LD L,A
LD A,C
AND ... 7
LD DE,PIXELTAB ... A,E
LD E,A
LD A,(DE)
XOR (HL)
LD (HL),A
need help with speed optimization. this procedure draws a sprite with mask from memory onto the screen with x-coordinate in pixels. it doesn't shift sprites in realtime, it just uses …
... pairs
LD IXH,A ;IXh is the loop counter
LD A,(SPRXLEN) ;get ... width of sprite
DEC A
LD ... retriving
LD L,C ;sprite data: C - Mask, B - Sprite
LD A,(HL) ;left ...need help with speed optimization. this procedure draws a sprite with mask from memory onto the screen with x-coordinate in pixels. it doesn't shift sprites in realtime, it just uses …
... in pairs
LD IXH,A ; IXH is loop counter for height of ... /> LD B,0
SHIFTLOOP1 PUSH BC
LD C,8
LD A,B
LD B ... ,0
SHIFTLOOP2 LD (HL),A
Interrupts details questionSuppose I am writing a game and I want to use interrupts to measure time, draw the screen without flicker, maybe to poll keyboard etc. What kinds of …
... /> loop:
ld a, (hl)
xor 255 ; mark this screen location
ld (hl), a ... a
srl a
ld b, a
ld a, h
sla a
sla a
sla a
sla a ...IM2 Machine Code Sprites Example Code Using Char Based SystemFurther to my earlier post, here are sprites running using char method with IM2 driving it Note, for 48k spectrum using TASM [code] ; ***********…
... to sprite data
LD B,TOTALSPRITES ; And loop for the total number ... /> LD A,(IX+1)
LD B,A
LD C,(IX+0)
INC C
LD A,C
Smooth Screen ScrollingHi Everyone, Any suggestions on what is the best way to do horizontal scrolling ie. in Zynaps fashion. I am working on a routine at the moment, whi…
... be with a routine like this:
ld hl,winend ... bc ; loop counter.
ld a,b ; high byte of counter.
or c ; ... "rolling" out the loop would achieve a huge speed increase, but ...the happiest days of your life-pt2hello,again i have come up with 2 solutions to the problem of solving this game:- 1.the more people that try to solve this game (by combining diffe…
... /> #DB6D LD B, (IX+#00) ; First held item
#DB70 LD C, (IX+#02 ... CP #60
#DB92 JR C, #DB82
#DB94 JR NZ ... Z, #DBBE
#DBBE LD A, B ; Look at our first carried ... Lines
#DBC7 ADD A, C
#DBC8 XOR #9A ; Check we have ...Key Redefine RoutineAnyone written a nice key redefine code snippet?
... ,A
LD A,H
XOR 255
CALL COUNN
LD D,A
LD A ... /> JR C,COU_E
INC B
JR COU_L
COU_E LD A,B
Quickest Assembly to find if point in rectangleWhat is the fastest way to see if a point is in a rectangle. e.g rectangle is 10,10 100,10 100,40 10,40 how do i know if a point (e.g 20,20) is in…
... ld hl,(y1x1)
ld de,(y2x2)
ld bc,(yx)
ld a,b ...
cp h
ret c
loop, otherwise you won't elimate ...Programming MC challengeIn the 80-ies I got the following assignment for a programming course. 2 16-bit values stored in #8000 and #8002 must be added together and stored i…
... a,(hl)
jr c loop
jmp loop1
loop ld a,0
ld (hl),a ...
jr loop2
loop1 ld(hl),a
ld a,0 should be xor a
as it is a byte less then ld a ...Programming MC challengeIn the 80-ies I got the following assignment for a programming course. 2 16-bit values stored in #8000 and #8002 must be added together and stored i…
... /> add a,(hl)
ld c,a
inc l
ld a,b
adc a,(hl ... )
jr nc,inrange
xor a
ld c,a
inrange:
ld (hl),a
dec ...After roughly 22 years can you help?Hi, A long one this but here goes. Roughly 22 years ago (i was 14 if i remember right) i got a 48K speccy for christmas of my dad it was awesome an…
... exercise was to enter a program to display each ... LD C,26
LD A,65
LOOP: LD B,A
RST 16
LD A,B
INC A ...
DEC C ...
JR NZ,LOOP:
After roughly 22 years can you help?Hi, A long one this but here goes. Roughly 22 years ago (i was 14 if i remember right) i got a 48K speccy for christmas of my dad it was awesome an…
... exercise was to enter a program to display each ... LD C,26
LD A,65
LOOP: LD B,A
RST 16
LD A,B
INC A ...
DEC C ...
JR NZ,LOOP:
Timex 80 column display driverI subsequently wrote an 80 column font driver for 512x192 mode.
...
xor a
ld (xcoord),a
ld a,(ycoord)
inc a
cp ... 24
jr c, yok
xor a ... = destination dfile address
ld b,8 ; char height counter used ...Sprite adviceHello. So, I'm slowly getting to grips with Z80 assembly - currently equal parts frustration and enjoyment. Now looking for some advice to help shift…
... , a
ld a, b
and 7
add a, h
ld h, a
ld a, c ... .
Draw the sprite using XOR in the NEW position, then ... draw the sprite using XOR in the old positiion to ...Checksum RoutinesHi there everybody, Does anyone have an 'off the shelf' assembler routine for generating checksums? Thanks Jim
... the most significant byte.
ld a,(hl) ; Load it into ... ; Decrement the counter.
ld a,b ; Check to see if we ... c
jr nz, checksumsub ; If there's more to do, loop ...
