luxferre/esop
1
0
Fork 0
Code Actions Activity

4x1 scanline output debugged

Browse Source
This commit is contained in:
Luxferre
2022-07-29 22:29:23 +03:00
parent 544bc355a5
commit d7d7b60b45
2 changed files with 6 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files
tal-lib/font.tal
+5 -6
View File
@@ -1,14 +1,12 @@
~esop-lib.tal ~esop-lib.tal
|0100 |0100
;on-frame SETSCRVEC ;on-frame SETSCRVEC
#10 #12 #10 #12
BRK BRK
@on-frame @on-frame
#0f ROT ROT DBGSHORT ;line4 JSR2 #0f ;line4 JSR2
DBGSHORT ( must be #10 12 )
;&adv KP-A JMPKEY ;&adv KP-A JMPKEY
;&back KP-B JMPKEY ;&back KP-B JMPKEY
BRK BRK
@@ -27,9 +25,9 @@ BRK
%CHAR-TO-NF { #20 SUB ;nanofont ADD } %CHAR-TO-NF { #20 SUB ;nanofont ADD }
( 4x1 scanline output from the nibble ) ( 4x1 scanline output from the nibble )
( nibble x y -- ) ( x y nibble -- x y )
@line4 @line4
ROT #04 ( x y nibble counter --) #04 ( x y nibble counter -- )
&lp &lp
DEC ( first effective counter value is 3 ) DEC ( first effective counter value is 3 )
DUP2 ( x y nibble counter nibble counter -- ) DUP2 ( x y nibble counter nibble counter -- )
@@ -43,7 +41,8 @@ BRK
INC ( increment x coord ) INC ( increment x coord )
SWP SWP2 ( x y nibble counter -- ) SWP SWP2 ( x y nibble counter -- )
DUP ,&lp JCN DUP ,&lp JCN
POP2 ( x y nibble counter -- x y )
SWP #04 SUB SWP
JMP2r JMP2r
( 4x4 sprite output from the memory ) ( 4x4 sprite output from the memory )
web/esop-web.html
+1 -1
View File
@@ -24,7 +24,7 @@ html, body {
<h1>Essential Stack-Operated Phone</h1> <h1>Essential Stack-Operated Phone</h1>
<canvas id=C width=84 height=48></canvas> <canvas id=C width=84 height=48></canvas>
<div> <div>
<input type=file id=appselect><br> <input type=file id=appselect accept=".eso"><br>
<button type=button id=apprun>Run!</button> <button type=button id=apprun>Run!</button>
</div> </div>
<script src=uxncore.js></script> <script src=uxncore.js></script>