github.com/wfjm.w11
1
0
Fork 0
mirror of https://github.com/wfjm/w11.git synced 2026-04-27 12:39:59 +00:00
Code Issues Releases Wiki Activity

cosmetics

Browse Source
This commit is contained in:
wfjm
2019-04-26 10:54:22 +02:00
parent 4c5bcf5521
commit ee23d18f87
3 changed files with 6 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
tools/mcode/sys/blink.mac
View File

@@ -1,4 +1,4 @@
; $Id: blink.mac 1135 2019-04-23 12:56:23Z mueller $
; $Id: blink.mac 1138 2019-04-26 08:14:56Z mueller $
; Copyright 2019- by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
; License disclaimer see License.txt in $RETROBASE directory
;
@@ -91,7 +91,7 @@ nultsk: mov curspd,r5 ; load speed
jsr pc,randzp ; get random number
mov r0,r1
clr r0
div #nstyle,r0 ; do rand % %nstyle
div #nstyle,r0 ; calculate: rand % nstyle
mov r1,cursty ; reminder is new style index
asl r1 ; index to offset
jsr pc,@initbl(r1) ; call initializer
@@ -224,7 +224,6 @@ hdlrr: jsr pc,randzp
; code imports
;
.include |lib/randzp.mac|
;
; data area ------------------------------------------------
;