(notepad) Starting text wrapping
This commit is contained in:
Devine Lu Linvega
parent
69e3760ce5
commit
87ad933e56
Binary file not shown.
|
|
@ -19,6 +19,7 @@
|
|||
;on-mouse-body .Mouse/vector DEO2
|
||||
|
||||
draw-header
|
||||
draw-note
|
||||
draw-footer
|
||||
|
||||
BRK
|
||||
|
|
@ -159,6 +160,14 @@ JMP2r
|
|||
|
||||
JMP2r
|
||||
|
||||
@draw-note ( -- )
|
||||
|
||||
#0008 .Screen/x DEO2
|
||||
#0018 .Screen/y DEO2
|
||||
;mem draw-uf2
|
||||
|
||||
JMP2r
|
||||
|
||||
@draw-footer ( -- )
|
||||
|
||||
#26 .Screen/auto DEO
|
||||
|
|
@ -178,6 +187,43 @@ JMP2r
|
|||
|
||||
JMP2r
|
||||
|
||||
@walk-uf2 ( text* -- )
|
||||
|
||||
JMP2r
|
||||
|
||||
@draw-uf2 ( text* -- )
|
||||
|
||||
#15 .Screen/auto DEO
|
||||
&while
|
||||
( wrap )
|
||||
LDAk #20 NEQ ?&no-wrap
|
||||
DUP2 word-length .Screen/x DEI2 ADD2 #00d0 LTH2 ?&no-wrap
|
||||
#0008 .Screen/x DEO2
|
||||
.Screen/y DEI2k #0010 ADD2 ROT DEO2
|
||||
INC2 LDAk ?&while
|
||||
&no-wrap
|
||||
|
||||
LDAk #20 SUB #00 SWP
|
||||
DUP2 #50 SFT2 ;font/glyphs ADD2 .Screen/addr DEO2
|
||||
;font ADD2 LDA #00 SWP .Screen/x DEI2 ADD2
|
||||
#01 .Screen/sprite DEOk DEO
|
||||
.Screen/x DEO2
|
||||
INC2 LDAk ?&while
|
||||
POP2
|
||||
|
||||
JMP2r
|
||||
|
||||
@word-length ( str* -- length* )
|
||||
|
||||
[ LIT2r 0000 ]
|
||||
&while
|
||||
LDAk #20 SUB #00 SWP ;font ADD2 LDA #00 SWP STH2 ADD2r
|
||||
INC2 LDAk #20 GTH ?&while
|
||||
POP2
|
||||
STH2r
|
||||
|
||||
JMP2r
|
||||
|
||||
@phex ( short* -- ) SWP phex/b &b ( byte -- ) DUP #04 SFT phex/c &c ( char -- ) #0f AND DUP #09 GTH #27 MUL ADD #30 ADD #18 DEO JMP2r
|
||||
|
||||
(
|
||||
|
|
@ -222,4 +268,146 @@ JMP2r
|
|||
ff00 ff00 ff00 ffff ]
|
||||
@line-icn [
|
||||
00ff 0000 0000 0000 ]
|
||||
@font ( newyork12 ) [
|
||||
0404 0508 0709 0a03 0505 0606 0306 0307 0808 0808 0808 0808 0808 0303 0507 0507
|
||||
0a0a 0807 0807 0708 0906 0508 080c 0908 0808 0807 0809 0a0d 0808 0604 0704 0407
|
||||
0407 0806 0807 0507 0804 0408 040c 0807 0808 0606 0508 080b 0708 0605 0305 0601
|
||||
0a0a 0707 0908 0907 0707 0707 0706 0707 0707 0404 0404 0807 0707 0707 0808 0808
|
||||
0405 0708 0708 0907 0909 0904 0400 0c08 0000 0000 0800 0000 0000 0007 0600 0a07
|
||||
0704 0000 0000 0007 0709 080a 0a08 0c0b 0509 0505 0303 0009 080a 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 00ff 0000 0000 0000 0000 ffff ffff ffff ffff
|
||||
&glyphs
|
||||
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0020 2020 2020 2020 0020 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0050 5000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0014 7e28 fc50 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 1038 5450 3010 1814 5438 1000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 003e 494a 3408 1629 4946 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0018 2428 1029 4542 4539 0000 0000 0000 0000 0000 0080 0000 0080 0000 0000
|
||||
0000 0040 4000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 1020 2040 4040 4040 2020 1000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 4020 2010 1010 1010 2020 4000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 20a8 7070 a820 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 2020 f820 2000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0040 4080 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 7800 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0040 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0004 0408 0810 1020 2040 4000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0018 2442 4242 4242 2418 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0008 1808 0808 0808 081c 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0038 4404 0408 1020 447c 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0018 2404 0818 0402 0202 4438 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0004 0810 2444 7e04 040e 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 007c 4040 7804 0202 0204 0870 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 1820 4058 6442 4242 2418 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 007e 4204 0408 0810 1010 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0018 2424 1824 4242 4224 1800 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0018 2442 4242 261a 0204 1800 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 4000 0000 0040 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 4000 0000 0040 4080 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 1020 4020 1000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 007c 007c 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 4020 1020 4000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0038 4404 0408 1010 0010 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 001e 214c 5252 4d20 1e00 0000 0000 0000 0000 0080 8080 0000 0000 0000
|
||||
0000 0008 0814 1422 3e41 41e3 0000 0000 0000 0000 0000 0000 0000 0080 0000 0000
|
||||
0000 00f8 4444 7844 4242 44f8 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0038 4480 8080 8080 4438 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 00f8 4442 4242 4242 44f8 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 00fc 4440 4878 4840 44fc 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 00fc 4440 4878 4840 40e0 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 003c 4480 808e 8484 4438 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 00e7 4242 427e 4242 42e7 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0070 2020 2020 2020 2070 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0070 2020 2020 2020 2020 2020 c000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 00ee 4448 5060 5048 44ee 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0070 2020 2020 2020 227e 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 00e0 6060 5151 4a4a 44e4 0000 0000 0000 00e0 c0c0 4040 4040 40e0 0000 0000
|
||||
0000 00e7 6252 524a 4a46 46e2 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0038 4482 8282 8282 4438 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 00f8 4442 4244 7840 40e0 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0038 4482 8282 8282 4438 100c 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 00f8 4444 4478 5048 44e6 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 003c 4440 2010 0804 4478 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 00fe 9210 1010 1010 1038 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 00e7 4242 4242 4242 2418 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 00e3 4141 2222 1414 0808 0000 0000 0000 0080 0000 0000 0000 0000 0000 0000
|
||||
0000 0077 2222 1515 1508 0808 0000 0000 0000 0070 2020 4040 4080 8080 0000 0000
|
||||
0000 00ee 4428 2810 2828 44ee 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 00ee 4428 2810 1010 1038 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 00f8 8810 1020 4040 88f8 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 6040 4040 4040 4040 4040 6000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0040 4020 2010 1008 0804 0400 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 6020 2020 2020 2020 2020 6000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0040 a000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 00fe 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0080 4020 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0070 8818 6888 8874 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0040 c058 6442 4242 6458 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0030 4880 8080 4830 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 000c 0434 4c84 8484 4e34 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0030 4884 fc80 4830 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0030 40e0 4040 4040 40e0 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0074 8888 8870 8078 8484 7800 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0040 c058 6444 4444 44ee 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0040 0040 c040 4040 40e0 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0040 0040 c040 4040 4040 4040 8000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0040 c04c 4850 6050 48ee 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0040 c040 4040 4040 40e0 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0059 e644 4444 44ee 0000 0000 0000 0000 0080 4040 4040 40e0 0000 0000
|
||||
0000 0000 0058 e444 4444 44ee 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0030 4884 8484 4830 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 00f8 4442 4242 6458 4040 e000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0034 4c84 8484 4c34 0404 0e00 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0058 e040 4040 40e0 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0070 8880 7008 8870 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0040 40f0 4040 4040 4830 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 00cc 4444 4444 443a 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 00ee 4444 2828 1010 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 00e0 4444 2a2a 1111 0000 0000 0000 0000 00e0 4040 8080 0000 0000 0000
|
||||
0000 0000 00ee 4428 1028 44ee 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 00ee 4444 2828 1010 2060 4000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 00f8 8810 2040 88f8 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0010 2020 2020 2040 2020 2020 2010 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0040 4040 4040 4040 4040 4040 4040 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0040 2020 2020 2010 2020 2020 2040 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0068 b000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
|
||||
0000 0000 0000 0000 0000 0000 0000 00ff 0000 0000 0000 0000 ffff ffff ffff ffff ]
|
||||
|
||||
@mem
|
||||
"Keep 20 "up 20 "to 20 "eight 20 "pages 20 "of 20 "notes 20 "in 20 "the 20 "Note 20 "Pad. 20
|
||||
"Click 20 "on 20 "the 20 "dog-ear 20 "to 20 "turn 20 "to 20 "to 20 "the 20 "next 20 "following 20 "page. 20
|
||||
"Click 20 "in 20 "the 20 "lower 20 "left 20 "corner 20 "to 20 "turn 20 "to 20 "the 20 "next 20 "previous 20 "page.
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue