-
My little first set of routines.Hi all, I just coded a little set of routines just to draw a screen on video mem and a fade out. I could have just copied the screen rendering rout…
...
or c
jr nz, DrawLine
... /> or c
jr nz,NextAttr ;Finished with this ... /> or a
jr nz,NextPass ;Finished with all ... -
Comments for small "sprite" routine wantedI have just written my first machine code program and I am quite happy (and proud) to get it working! :smile: As a child I never learned anything e…
... /> dec b ;decrease counter
jr nz,loadloop ;repeat 8 times
jr nz,loop1 ;repeat for all rows ... movements in one byte
jr nz, loop1 ;repeat 8 times, ... to move graphic
jr nz,loop1 ;repeat until d is ... -
Help hacking Split PersonalitiesI`ve been hacking away at Split Personalities for the purpose of putting new screens and graphics (items). The current screen is at 41187 and is 160…
... /> rra ; 54563 31
jr nz, 54599 ; 54564 32 33
ret nz ; 54616 192
nop ; 54617 ... /> nop ; 54619 0
jr l_d55e ; 54620 24 0
l_d55e: jr l_d560 ; 54622 24 0
Question on Z80 R/W cycles.Snipped from the complete spectrum ROM disassembly: [CODE] Now the memory is checked. 11DA RAM-CHECK LD H,D Transfer the value…
... 3FFF.
CP H
JR NZ,11DC,RAM-FILL
11E2 ... Update the pointer.
JR NC,11EF,RAM-DONE Jump ... 01 goes to +00.
JR Z,11E2,RAM-READ Step ...help sought with first foray into machine code - pixel scrolldownI have started to code my first machine code program, a simple roadrace game. I've based it around the pixel scrolldown routine in 40 Best Machine Co…
... reached line2 yet?
jr nz, nextbyte ;carry on if ... of 8 pixels
jr nz,nextblock ;if not, carry ... be copied to?
jr nz,subtract ;if not, carry ... cop[ied from?
jr nz,nextline ;if not, carry ... the top yet?
jr nz,nextline ;no, still some ...Probing the variables in 128K modeHello again! Briefly, I'm writing an m/c routine to read some BASIC variables. So, before I start, I try to get an idea for the structure of how var…
... BIT 5,A
JR Z,STRINGARRAY
SUB 128 ... /> ADD HL,DE
JR NEXTVAR
STRINGARRAY
... )
INC HL
JR PRINT
NEXTBIT
... /> BIT 7,A
JR NZ,LASTCHAR
RST $10
BIT 5,A
JR NZ,JUMP
ADD A,32 ...Speccy sound on tv show - againRemember the spectrum loading noise in two CSI shows? Well, fuzzix on c.s.s. has found what seems to be another clip of Speccy goodness: [url]http:/…
... LBITS CALL #5E3
130 JR NC,LBYTE
140 LD ... BIT 7,L
200 JR NZ,LBITS
210 LD A ...Spin send to assemblerIn the Spin (v0.666) debugger window, the view is something like this (with a symbols.txt file for labels/formating): [code][color=blue]LD_EDGE_2:[/…
... ]LD_DELAY:[/color] DEC A
JR NZ, [color=magenta][u]LD_DELAY[/u ...
l_05e9: dec a
jr nz, l_05e9[/code]
Without ... , $16
dec a
jr nz, ld_delay[/code]
Would ...Bresenhams circle algorithmI post here my final circle code to replace, if you want, the one in the ROM. It only uses integer math and runs very fast and is very compact. It is…
... l ;L é y
jr nc,end_circle ;While
exx
jr nz,fneg
; f positive ...So... you want to format your 3.5" as 720K eh?Well, i've been trying to get hold of an application to make proper use of my 3.5" +3 floppy disks but i haven't been able to find any. I stumbled up…
... on track 160 already?
JR NZ,FOR2 ; If not, keep formatting ... the data to disk
JR NC,FERR ; Jump if there ...New for 2009 - mc onelinersI found the limit of one line and one screen's worth of program really useful in (re-)learning BASIC, so I've decided to carry the format over into m…
... br /> cp 191
jr nz, moveright
inc l
cp 191
jr nz, dontmove
dec l< ... br /> cp 255
jr nz, checkright
inc hl
cp 21
jr nz, newroadposn
dec hl
or c
jr nz, wait
jp principalloop
So you want to make a cardgame......but you haven't got a good deck to display. Well here is a fully relocatable routine that will do the job for you. Place the code anywhere in me…
Thinking in Assembly (first efforts)The following is one small routine to educate myself on a few concepts (jumps, flow control, routines, CPI): [code]searchmem xor a …
... /> search: cpi ; a-(HL)
jr z, found
[COLOR=DimGray ... bc==0 here[/COLOR]
jr nz, search
[B]ret ; not ...Rainbow Generator for 48K Spectrum using PUSHThis is what I came up with from [B]gasman[/B]'s suggestions. It's stable in ZXSpin and ZX32 simulating a 48K Speccy. Anyone like to try it on the …
... ; address that was called.
JR NZ,interrupts_off
;Switch interrupts ... ;04t => 022t
jp nz,interrupt_delay_loop ;10t => 032t per ...FLASH EPROM programming on ZXExist any other software for rewriting FLASH EPROM or EEPROM chips on real ZX ? I know only: EEPROM flasher for original DivIDE [url]http://85.132.…
... /> and $1f ;
jr z, l_5cd7 ; wait for any ... 6, h ;
l_5ce5: jr nz, l_5cf9 ;
... ; verify byte
jr z, l_5ce2 ; continue in ...Z80 Machine Code Question...Hi Folks, I know not strictly a BASIC question but I have started to learn Z80 machine code - 25 years too late! :smile: I have been reading a book…
... have become stuck with the JR NZ instruction. My little test program ... ),FFh
DEC BC
JR NZ,F9h
RET[/FONT][/INDENT ... seems that [FONT="Courier New"]JR NZ[/FONT] is not recognising the ...Machine code issue...Hi Folks, My trials with MCODE continue and I am stuck. I wrote the following program in BASIC to simply POKE an attribute byte in to a "box" on th…
... C ;Next Character
2006 JR NZ,LOOP2 ;Goto LOOP2 if not ... B ;Next Line
201B JR NZ,LOOP1 ;Goto LOOP1 if not ...Optimization for this codeHello, I have done and submitted a small program for the CSS Crap Game Compo which involves a machine code routine. The z80 with BASIC and MC is av…
...
ld (hl),a
jr nz, kontroll2
inc h ...
ld (hl),a
jr nz, kontroll3
inc h ...
ld (hl),a
jr nz, kontroll4
inc h ...
ld (hl),a
jr nz, kontroll7
jp writetext ...Help needed with simple MCode routineI'm trying to code a routine to clear the screen and I can't figure out why it's not working: ld hl,16384 ld bc, 6144 loop:ld (hl),0 inc hl dec bc l…
Why doesn't my loop work?Can anyone help me understand why my loop doesn't work? Is it to do with how DEC HL affects the flags? [code] ; Read 32k bytes from port 191 as fa…
CrusoePlease add the following "known errors" description for game [URL="http://www.worldofspectrum.org/infoseekid.cgi?id=0002872"]Crusoe[/URL]: [QUOTE]Bu…
... $80E5 ; jump correction
JR $8149 ; 80E5 18 62
JR $8706 ; 8736 18 CE
JR NZ, PATCH ; B8FD 20 F7
(part of) screen to UDGHere is a routine to copy a Y,X-position on screen to a UDG. 0<=y<=23 0<=x<=31 144<=udg<=165 (UDG "A" to UDG "U") [code] ; start code with ; PRINT …
Here is a routine to copy a Y,X-position on screen to a UDG.
0Cobra (improved BUGFIX)This is an improved BUGFIX for game [URL="http://www.worldofspectrum.org/infoseekid.cgi?id=0000996"]Cobra[/URL], please replace the "known errors" de…
... /> 9604: cp b
9605: jr nc,$9601 ; repeat forever!
9604: nop
9605: jr nz,$9601
9607: ret[/CODE ...machine code loadercan someone have a look at this loader and break down what its actually doing and also how i can stop it from executing the 2 loads of headerless blo…
... /> 5B16 CP FF
5B18 JR NZ,5B11
5B1A LD IX ... /> 5B24 CALL 0556
5B27 JR NC,5B1A
5B29 LD ... /> 5B33 CALL 0556
5B36 JR NC,5B29
5B38 JP ...Keys redefine routine and key check.I have written some asm code which allows me to redefine keys (for a game etc.), and also allows me to be able to check any keypresses for the redefi…
...
and a
jr nz,do_the_redefine
; ok, lets ... go check next key
jr gk_exit
gk_key_is_pressed: set ... do it all again
jr get_defined_key
ret ; ...
or c
jr nz,d_loop
ret
...AND,XOR,OR,BIT,RES,SET,CPL,NEG,RLC,RRC,SLA,SRL,RL, RR,SRA for BASICAs this was drifting away from the original INKEY$ thread I thought that I'd create a new one. So here's a routine to provide all of the above mentio…
... check code
jp nz,ERRORA ;return on error
push bc
jr c,EVALOP ;1st 9 ... need no mod
jr nz,RESSET
ld ... br /> djnz SETBIT
jr LDOPC2
RESSET: sla ...
