-
Spin save dissembly problemHey Dunny and others Spin dudes! There seems to be a small problem with the save dissembly function from the dissembler in Spin. This is the exact o…
Problem with rotating procedureHi folks! I wrote a proc in z80 asm, based on: x' = x * cos (z) - y * sin (z) y' = x * sin (z) + y * cos (z) I used a precalculated table of sin a…
... hl,hl
rla
jr nc,fin21
add hl ... - wyzeruj
cp 3
jr nz,r1
ld a,l ...
cp $d0
jr nz,r1
ld hl,0 ...In Machine Code, what is the quickest way to sort bytes?I am playing around with some ordering of sprites, where I want to order them by vertical position. I used some Rodnay Zaks code to order some bytes…
... ascending order (Changing "jr nc,noswitch" to "jr c,noswitch" gets ... br /> cp e ; compare
jr nc,noswitch ; go to nowitch ... flag,h ; exchanged=1?
jr nz,again ; restart if flag=1 ...Screen LoaderCouple days ago i find very interesting loader routine in ex Yugoslavia magazine "Svet Kompjutera" from january 1987. Authors of article, calls this …
...
OR L
JR NZ,LFEF3
CALL LFF62
INC H
JR NZ,LFEFF
LFF0E LD B ... EX AF,AF'
JR NZ,LFF32
JR NC,LFF3C
LD ...
OR E
JR NZ,LFF28
LD A,H ... /> LFF68 DEC A
JR NZ,LFF68
AND A
Pixel Explosion CodeJust a little snippet to cause explosive effects. It uses table lookups for the screen address, and can handle up to 32 pixel particles. A particle…
... activeparticles)
cp 0
jr nz,lp1
ret
... we reached the counter
jr nz,madp_nx2 ; if not, check ... />
cp 192
jr nz,madp_nx1
ld ( ...tips on optimizing assemblyI wrote a small routine to rotate right a whole screen character line complete with attributes. This is my third ever assembly routine, so I guess i…
... , c
dec a
jr nz, buclebmp2 ; next iteration
dec a
jr nz, buclebmp1 ; next scanline.
dec a
jr nz, bucleattr2 ; next char.
Urgent Help needed to fix this: calling all machine code gurusI am currently trying to write tutorials on the amazing Orfeus music composer by Proxima which allows you to do multi channel music through the beepe…
... b
or c
jr nz,l88c9 ; (-13)
ld ... l8987: dec a
l8988: jr nz,l8987 ; (-3)
l898a: dec ... d
jr nz,l89a1 ; (20)
l898d:< ... br /> l8b72: dec e
jr nz,l8b5b ; (-26)
l8b75: ...Mode 2 Tile Editor SourceA Timex Mode 2 Tile Editor incorporating a byte mirror table. The compiled version is available in the CSSCGC 2008 collection from the WoS archive. …
... ; copying to the screen
jr _2nd_128 ; second 128 tiles
jr _2nd_128 ; second 128 tiles
jr nz,cp2b_a ;
ex de ... copying to the screen
jr nz,cp2b_b ;
ex ...RFC: 64 column font codeIn BASIC, type CLEAR 49999 then import the code at 50000. Then type RANDOMIZE USR 50000. This will create a new channel and attach stream #4 to it. A…
... /> dec c ; adjust counter
jr nz,ll_lp ; loop 8 times
dec c ; adjust counter
jr nz,rr_lp ; loop 8 times
dec c ; adjust counter
jr nz,lr_lp ; loop 8 times
dec c ; adjust counter
jr nz,rl_lp ; loop 8 times
Well I'm excited, but I guess you might not beHehe this is as far as I got today, a silly little border program: [PHP] ORG 32768 PROGGY: LD C,255 ; We loo…
... 16 ; Compare to 16
JR NZ,BORDERUP ; While not 16, loop ... ; Is it 1 yet?
JR NZ,OUTERLOOP; If not, go back ...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 ...IN 255 behaviour not emulated in Spectaculator and ZXSpinI'm not speaking about "normal" IN 255 behaviour. All of you know what I'm taking about: IN 255 can be used to "read" screen data as it's retrieved f…
... br /> call TestInFF
jr nz,NoPrint
... /> or l
jr nz,SigueTest
ret
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 ...Tutorial - learn machine code in 30mins[B][I]Message from the moderators[/I] - bigjon has requested that readers' attention be drawn to a better version of this tutorial, one which is easi…
... l
dontmove
'jr nz' stands for jump relative if ... br /> cp 255
jr nz, checkright
inc hl ... br /> or c
jr nz, wait
Save, assemble, ... br /> cp 255
jr nz, checkright
inc hl ... /> or c
jr nz, wait
jp principalloop ...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 ...
