~rabbits/adelie

827aaa76f01ca86effb62d596cd89b68e76ca122 — Devine Lu Linvega 11 months ago f0c1c54
Increased erase region for interface
2 files changed, 2 insertions(+), 23 deletions(-)

D slides2
M src/adelie.tal
D slides2 => slides2 +0 -21
@@ 1,21 0,0 @@
SIZE 30,1c

( test )

NAME slide1
FILL 03
MODE 0c
HEAD Slide1


NAME slide2
FILL 03
MODE 0c
HEAD Slide2
WAIT 10

NAME slide3
FILL 03
MODE 0c
HEAD Slide3


M src/adelie.tal => src/adelie.tal +2 -2
@@ 222,7 222,7 @@
	;on-mouse-brush ;on-mouse STHr [ JMP SWP2 POP2 ] .Mouse/vector DEO2
	( | clear )
	#0000 .Screen/x DEO2
	#0020 .Screen/y DEO2
	#0030 .Screen/y DEO2
	[ LIT2 a3 -Screen/pixel ] DEO
	.slide LDZ2 view-slide !<draw-interface>



@@ 451,7 451,7 @@
		JMP2r &>continue
	( | clear )
	#0000 .Screen/x DEO2
	#0020 .Screen/y DEO2
	#0030 .Screen/y DEO2
	[ LIT2 a3 -Screen/pixel ] DEO
	( pop ) .pen/mode LDZ
	( temp ) [ LIT2 05 -pen/mode ] STZ