Data update
This commit is contained in:
parent
72eb4943cb
commit
4d5544505c
2347 changed files with 62432 additions and 16731 deletions
2
Task/Comments/OPL/comments.opl
Normal file
2
Task/Comments/OPL/comments.opl
Normal file
|
|
@ -0,0 +1,2 @@
|
|||
REM This is a comment.
|
||||
PAUSE 20 REM Can be placed behind statements, too.
|
||||
31
Task/Comments/Uxntal/comments.uxnatl
Normal file
31
Task/Comments/Uxntal/comments.uxnatl
Normal file
|
|
@ -0,0 +1,31 @@
|
|||
(
|
||||
Print a hex byte to decimal.
|
||||
)
|
||||
|
||||
( macros )
|
||||
%\n { 0a }
|
||||
%newline { [ LIT2 \n -Console/write ] DEO }
|
||||
|
||||
( devices )
|
||||
|10 @Console/vector $2 &read $1 ( &pad is unused ) &pad $5 &write $1 &error $1
|
||||
|
||||
( main program )
|
||||
|100
|
||||
|
||||
@on-reset ( -> )
|
||||
#42 print/dec newline
|
||||
BRK
|
||||
|
||||
( library )
|
||||
@print/dec ( dec -- )
|
||||
DUP #64 DIV /dec/try
|
||||
DUP #0a DIV /dec/try
|
||||
( >> )
|
||||
|
||||
&dec/num ( num -- )
|
||||
#0a DIVk MUL SUB [ LIT "0 ] ADD .Console/write DEO
|
||||
JMP2r
|
||||
|
||||
&dec/try ( num -- )
|
||||
DUP ?/dec/num
|
||||
POP JMP2r
|
||||
Loading…
Add table
Add a link
Reference in a new issue