2 files changed, 39 insertions(+), 22 deletions(-)

M src/assets.tal
M src/noodle.tal

@@ 65,22 65,38 @@
 	2020 20b8 7c7c 3838
 
 @appicon
-0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
-0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
-0000 0000 0000 0000 0000 0000 0000 0001 0003 0408 0808 c830 00c1 2210 1812 1410 
-00f8 0404 0407 0404 0000 0000 f008 0402 0000 0000 0000 0000 0000 0000 0000 0000 
-0000 0000 0000 0001 0202 0202 023c c101 0500 0a12 2040 4080 0fe0 0000 0000 0000 
-08e0 1804 0300 0000 0202 0204 0887 1060 0000 0000 0080 4020 0000 0000 0000 0000 
-0101 0101 0100 0000 0102 0204 0484 2410 0000 0000 0000 0000 0000 0000 0000 0000 
-0000 0000 0010 0000 0808 0402 0201 0101 1010 1010 1038 4402 0000 0000 0000 0000 
-0000 0102 0101 0000 4888 0808 0808 8884 0004 0000 0000 0000 0000 0000 0000 030c 
-0000 0000 0000 fe01 0000 0000 0001 0101 8281 8181 8202 0418 0000 0000 0000 0000 
-0000 0000 0000 0000 847f 0405 0408 0808 0000 0001 8060 1806 3040 8000 0000 0000 
-0000 0000 0000 0018 c304 0810 2040 8000 e080 4040 4040 4040 0000 0000 0000 0000 
-0000 0000 0000 0000 0804 0403 0000 0000 0910 30d0 1008 0403 e01f 0404 0508 10e0 
-e205 0404 38c0 0000 00f3 0c00 0000 0000 8000 0000 0000 0000 0000 0000 0000 0000 
-0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
-0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
+0000 0000 0000 0000 0000 0000 0000 0000
+0000 0000 0000 0304 0000 0000 00e0 1008 
+0000 0000 0000 0000 0000 0000 0000 0000
+0000 0000 0000 0000 0000 0000 0000 0000
+0000 0000 0000 0000 0000 0000 0000 0000
+0e01 0000 0000 0000 0884 4222 1109 7884
+0000 0000 0078 8788 0000 0000 0000 f00c
+0000 0000 0000 0000 0000 0000 0000 0000
+0000 0000 0000 0000 0000 0000 0102 0204
+010f 30c0 0000 0000 02fa 0601 0000 0000
+90a0 8080 8080 0000 0201 0000 0000 0000
+0000 8040 2020 1010 0000 0000 0000 0000 
+0000 0000 0000 0000 0408 0808 0808 0808
+c000 4080 0040 4000 0000 0000 0001 0307
+0000 0000 c0f0 fcfe 0000 0000 0000 0000
+1008 0808 0808 0808 0000 0000 0000 0000
+0000 0000 0000 0000 0808 0404 0202 0101
+0000 0000 0000 0020 0f1e 1e3e 3e1f 0703
+1f4f efef 4f1e fcfb 0080 8000 0100 7880
+0808 1028 c808 0808  0000 0000 0000 0000
+0000 0000 0000 0000 0000 0000 0000 0000
+9f80 4040 2010 1008 dc00 0000 0000 0000
+7000 0000 0000 0000 0001 0100 0202 0800
+1010 1020 2020 4040 0000 0000 0000 0000
+0000 0000 0000 0000 0000 0000 0000 0000
+0402 0100 0000 0000 0000 0080 601c 0300
+0000 0406 0930 c000 0000 0106 f800 0000
+8080 0000 0000 0000 0000 0000 0000 0000
+0000 0000 0000 0000 0000 0000 0000 0000
+0000 0000 0000 0000 0000 0000 0000 0000
+0000 0000 0000 0000 0000 0000 0000 0000
+0000 0000 0000 0000 0000 0000 0000 0000
 
 @font ( atari8 )
 0000 0000 0000 0000 6060 6060 6000 6000

@@ 969,9 969,9 @@ JMP2
 	( icon )
 	STH2kr .Screen/y DEO2
 	OVR2r STH2r .Screen/x DEO2
-	#08 #0876 ;appicon ;draw-fill-fast JSR2
+	#08 #0e76 ;appicon ;draw-fill-fast JSR2
 	( text )
-	STH2r #0008 ADD2 .Screen/y DEO2
+	STH2r #000c ADD2 .Screen/y DEO2
 	LIT2r 0048 ADD2r
 	#01 .Screen/auto DEO
 	STH2kr .Screen/x DEO2


@@ 979,7 979,8 @@ JMP2
 	&w
 		;draw-str JSR2
 		STH2kr .Screen/x DEO2
-		.Screen/y DEI2k #000c ADD2 ROT DEO2
+		;draw-lb JSR2
+		;draw-lb JSR2
 		LDAk ,&w JCN
 	POP2
 	POP2r


@@ 1195,9 1196,9 @@ JMP2r
 
 	( tools )
 	,draw-toolpane JSR
-	.panel/x LDZ2 INC2 .panel/x2 LDZ2 .panel/y LDZ2 #0026 ADD2 #02 ,line-hor JSR
+	.panel/x LDZ2 INC2 .panel/x2 LDZ2 .panel/y LDZ2 #0026 ADD2 #02 ,draw-lineh JSR
 	,draw-pattpane JSR
-	.panel/x LDZ2 INC2 .panel/x2 LDZ2 .panel/y LDZ2 #0058 ADD2 #02 ,line-hor JSR
+	.panel/x LDZ2 INC2 .panel/x2 LDZ2 .panel/y LDZ2 #0058 ADD2 #02 ,draw-lineh JSR
 	,draw-sizepane JSR
 
 JMP2r


@@ 1211,7 1212,7 @@ JMP2r
 
 JMP2
 
-@line-hor ( x0* x1* y* color -- )
+@draw-lineh ( x0* x1* y* color -- )
 
 	STH .Screen/y DEO2 SWP2
 	&loop