~rabbits/potato

10418d82b2744bf7b578d468ca3698e7ce31569c — neauoire 3 months ago a94da16
Improved app info display
3 files changed, 8 insertions(+), 6 deletions(-)

M src/apps.tal
M src/assets.tal
M src/potato.tal
M src/apps.tal => src/apps.tal +5 -3
@@ 355,15 355,17 @@ JMP2r
		DEOk DEOk DEOk DEOk
		DEOk DEOk DEOk DEO

	.Screen/y DEI2k #0034 SUB2 ROT DEO2
	.Screen/y DEI2k #0030 SUB2 ROT DEO2
	.Screen/x DEI2k #0050 ADD2 ROT DEO2

	.Screen/x DEI2 STH2
	;get-meta/buffer
	;draw-str JSR2
	.Screen/x DEI2k #0010 ADD2 ROT DEO2
	#05 ;draw-chr/color STA
	;draw-str JSR2 ;draw-lb JSR2
	STH2kr .Screen/x DEO2
	;draw-str JSR2 ;draw-lb JSR2
	STH2kr .Screen/x DEO2
	#0a ;draw-chr/color STA
	;draw-str JSR2 ;draw-lb JSR2
	STH2kr .Screen/x DEO2
	;draw-str JSR2 ;draw-lb JSR2

M src/assets.tal => src/assets.tal +1 -1
@@ 101,7 101,7 @@ c060 3018 0c06 0300 3c0c 0c0c 0c0c 3c00
0000 663c 183c 6600 0000 6666 663e 067c
0000 7e0c 1830 7e00 1c30 3060 3030 1c00
1818 1818 1818 1818 380c 0c06 0c0c 3800
0000 60f2 9e0c 0000 0018 1834 3462 7e00
0000 60f2 9e0c 0000 3c42 9985 8599 423c

@input-icns
	00ff 8080 8080 8080 8080 8080 8080 ff00

M src/potato.tal => src/potato.tal +2 -2
@@ 30,7 30,7 @@

	( 800x520 | 64:41 )
	#0320 .Screen/width DEO2
	#01f0 ( #0208 ) .Screen/height DEO2
	#0208 .Screen/height DEO2

	#ff .drag STZ
	#ff .sel/win STZ


@@ 311,7 311,7 @@ JMP2r

@open-hexa ( file* -- )

	#0005 ADD2 ;app-info #200a #0010 #0008 ;add-win JSR2
	#0005 ADD2 ;app-info #240a #0010 #0008 ;add-win JSR2

JMP2r