crazyettin
/
Gidubba
1
0
Fork 0
Code Issues Pull Requests Projects Releases 2 Wiki Activity

Update to work with multiple-step shifts in Thingamajig v1.1-dev

This commit is contained in:
CrazyEttin 2022-09-11 19:49:48 +03:00
parent 339f117e58
commit 92b1c81162
2 changed files with 8 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
gidubba.asm
View File

@ -189,10 +189,7 @@ getarg: load r0, arg1
breq r0, r1, cmderr
xor r2, r2
xor r2, r0
shl r2
shl r2
shl r2
shl r2
shl r2, 4
;Second digit
load r0, arg1 + 1
cleq r0, r0, hex2n
@ -208,10 +205,7 @@ getarg: load r0, arg1
breq r0, r1, cmderr
xor r2, r2
xor r2, r0
shl r2
shl r2
shl r2
shl r2
shl r2, 4
;Fourth digit
load r0, arg1 + 3
cleq r0, r0, hex2n
@ -229,10 +223,7 @@ getarg: load r0, arg1
breq r0, r1, cmderr
xor r2, r2
xor r2, r0
shl r2
shl r2
shl r2
shl r2
shl r2, 4
;Second digit
load r0, arg2 + 1
cleq r0, r0, hex2n
@ -985,11 +976,11 @@ sumlop: xor r1, r1
xor r1, r1
xor r1, r2
;Shift the carry
shl r2
shl r2, 1
;Check for and store overflow if any
;Check
rol r1
rol r1, 1
breq r1, r2, nvrflw
;Store
load r1, #1
@ -1291,10 +1282,7 @@ bt2hex: xor r2, r2
xor r2, r1
;Convert the high nibble to a digit
ror r0
ror r0
ror r0
ror r0
ror r0, 4
cleq r0, r0, n2hex
;Load the digit of the low nibble to r1

4
readme.md
View File

@ -1,5 +1,5 @@
Gidubba v1.0
============
Gidubba v1.1-dev
================
Gidubba (Sumerian for 'stylus') is a simple line editor for the
Thingamajig computer architecture. Its git repository can be found at