4x1 scanline output debugged
This commit is contained in:
+5
-6
@@ -1,14 +1,12 @@
|
||||
~esop-lib.tal
|
||||
|
||||
|
||||
|0100
|
||||
;on-frame SETSCRVEC
|
||||
#10 #12
|
||||
BRK
|
||||
|
||||
@on-frame
|
||||
#0f ROT ROT DBGSHORT ;line4 JSR2
|
||||
DBGSHORT ( must be #10 12 )
|
||||
#0f ;line4 JSR2
|
||||
;&adv KP-A JMPKEY
|
||||
;&back KP-B JMPKEY
|
||||
BRK
|
||||
@@ -27,9 +25,9 @@ BRK
|
||||
%CHAR-TO-NF { #20 SUB ;nanofont ADD }
|
||||
|
||||
( 4x1 scanline output from the nibble )
|
||||
( nibble x y -- )
|
||||
( x y nibble -- x y )
|
||||
@line4
|
||||
ROT #04 ( x y nibble counter --)
|
||||
#04 ( x y nibble counter -- )
|
||||
&lp
|
||||
DEC ( first effective counter value is 3 )
|
||||
DUP2 ( x y nibble counter nibble counter -- )
|
||||
@@ -43,7 +41,8 @@ BRK
|
||||
INC ( increment x coord )
|
||||
SWP SWP2 ( x y nibble counter -- )
|
||||
DUP ,&lp JCN
|
||||
|
||||
POP2 ( x y nibble counter -- x y )
|
||||
SWP #04 SUB SWP
|
||||
JMP2r
|
||||
|
||||
( 4x4 sprite output from the memory )
|
||||
|
||||
+1
-1
@@ -24,7 +24,7 @@ html, body {
|
||||
<h1>Essential Stack-Operated Phone</h1>
|
||||
<canvas id=C width=84 height=48></canvas>
|
||||
<div>
|
||||
<input type=file id=appselect><br>
|
||||
<input type=file id=appselect accept=".eso"><br>
|
||||
<button type=button id=apprun>Run!</button>
|
||||
</div>
|
||||
<script src=uxncore.js></script>
|
||||
|
||||
Reference in New Issue
Block a user