1 files changed, 5 insertions(+), 2 deletions(-)

M src/left.tal

@@ 41,6 41,9 @@
 	.Screen/height DEI2
 		DUP2 #0020 SUB2 #04 SFT2 .textarea/lines STZ2
 		#0018 SUB2 .scrollbar/height STZ2
+	.Screen/height DEI2 #06 SFT2 NIP INC ;draw-textarea/height STA
+	.Screen/width DEI2 #0088 SUB2 #03 SFT2 NIP ;draw-textarea/width STA
+	( defaults )
 	#0001 .scroll/ratio STZ2
 	;text .scroll/addr STZ2
 	;text ;select-start JSR2


@@ 761,10 764,10 @@ JMP2
 	( fast clear )
 	#71 .Screen/auto DEO
 	#0020 .Screen/y DEO2
-	.Screen/height DEI2 #06 SFT2 NIP INC #00
+	[ LIT &height $1 ] #00
 	&h
 		#0088 .Screen/x DEO2
-		.Screen/width DEI2 #0088 SUB2 #03 SFT2 NIP #00
+		[ LIT &width $1 ] #00
 		&w
 			#00 .Screen/sprite DEO
 			INC GTHk ,&w JCN