~rabbits/adelie

3aca95b23223c86349be9a4c293199ce3410aa6c — neauoire 5 months ago cc37e60
Added soft reboot
1 files changed, 10 insertions(+), 8 deletions(-)

M src/adelie.tal
M src/adelie.tal => src/adelie.tal +10 -8
@@ 24,10 24,12 @@
@on-reset ( -> )
	( | meta )
	;meta #06 DEO2
	( | detect soft reboot )
	.src LDZ ?on-soft
	( | startup )
	.Console/type DEI ?&>has-arg
	.Console/type DEI ?{
		;dict/usage <print-str>/
		#010f DEO &>has-arg
		#010f DEO }
	( | unlock )
	;&await-src .Console/vector DEO2
	BRK


@@ 46,7 48,9 @@
	( | center )
	.Screen/width DEI2 #01 SFT2 .center/x STZ2
	.Screen/height DEI2 #01 SFT2 .center/y STZ2
	( | unlock )
	( >> )

@on-soft ( -> )
	;on-button .Controller/vector DEO2
	;on-mouse .Mouse/vector DEO2
	;on-frame .Screen/vector DEO2


@@ 57,7 61,7 @@
	( name ) "Adelie 0a
	( details ) "A 20 "Slideshow 20 "Program 0a
	( author ) "By 20 "Hundred 20 "Rabbits 0a
	( date ) "July 20 "12, 20 "2023 00
	( date ) "Sep 20 "17, 20 "2023 00
	( > ) 02
	( icon ) 83 =appicon
	( mask ) 41 1705


@@ 794,15 798,13 @@
	&file-max "File-size 20 "Limit 20 "Exceeded 0a $1
	&file-missing "!! 20 "File 20 "missing: 20 $1

@op-tbl
	[
@op-tbl [
	=dict/null =dict/name =dict/goto =dict/pict
	=dict/head =dict/text =dict/move =dict/mode
	=dict/fill =dict/size =dict/link =dict/patt
	=dict/rect =dict/rgb4 =dict/stop =dict/wait ]

@fnc-tbl
	[
@fnc-tbl [
	=op-null =op-name =op-goto =op-pict
	=op-head =op-text =op-move =op-mode
	=op-fill =op-size =op-link =op-patt