d6
/
uxn-utils
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Combined immediate printing routines

This commit is contained in:
Devine Lu Linvega 2024-06-10 07:12:20 -08:00
parent 70b36057a6
commit bdeff219e2
1 changed files with 13 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
cli/uxndis/src/uxndis.tal
View File

@ -13,12 +13,6 @@
#000f DEO }
BRK
@meta $1
( name ) "Uxndis 0a
( desc ) "Uxntal 20 "Disassembler 0a
( auth ) "By 20 "Devine 20 "Lu 20 "Linvega 0a
( date ) "9 20 "Jun 20 "2024 $2
@await-src ( -> )
[ LIT2 04 -Console/type ] DEI NEQ ?{ <dis>
#800f DEO
@ -79,21 +73,9 @@
( | print hex )
LDAk ?{ <print-1-byte>
;opcodes/brk !<pstr> }
LDAk #20 NEQ ?{
LDAk #9f AND ?{
<print-3-byte>
;opcodes/jci <pstr>
#2018 DEO
INC2 LDA2k <print-rel>
INC2 JMP2r }
LDAk #40 NEQ ?{
<print-3-byte>
;opcodes/jmi <pstr>
#2018 DEO
INC2 LDA2k <print-rel>
INC2 JMP2r }
LDAk #60 NEQ ?{
<print-3-byte>
;opcodes/jsi <pstr>
LDAk #03 SFT #00 SWP ;opcodes/brk ADD2 <pstr>
#2018 DEO
INC2 LDA2k <print-rel>
INC2 JMP2r }
@ -166,6 +148,15 @@
INC2 LDAk ?<pstr>
POP2 JMP2r
(
@|assets )
@meta $1
( name ) "Uxndis 0a
( desc ) "Uxntal 20 "Disassembler 0a
( auth ) "By 20 "Devine 20 "Lu 20 "Linvega 0a
( date ) "10 20 "Jun 20 "2024 $2
@opcodes [
"LIT 00 "INC 00 "POP 00 "NIP 00
"SWP 00 "ROT 00 "DUP 00 "OVR 00
@ -175,8 +166,8 @@
"LDA 00 "STA 00 "DEI 00 "DEO 00
"ADD 00 "SUB 00 "MUL 00 "DIV 00
"AND 00 "ORA 00 "EOR 00 "SFT 00
&brk "BRK 00 &jci "JCI 00 &jsi "JSI
00 &jmi "JMI 00 ]
&brk "BRK 00 &jci "JCI 00 &jmi "JMI
00 &jsi "JSI 00 ]
@dict &usage "usage: 20 "uxndis.rom 20 "input.rom 0a $1