Browse code

(wireworld.tal) Erase with mouse2

neauoire authored on 21/01/2022 23:23:02
Showing 1 changed files
... ...
@@ -108,7 +108,7 @@ BRK
108 108
 	#41 .Mouse/state DEI #00 ! + .timer/play LDZ + .Screen/sprite DEO
109 109
 	( paint )
110 110
 	.Mouse/state DEI #00 = ,&no-down JCN
111
-		( color ) .color LDZ
111
+		( color ) .color LDZ .Mouse/state DEI #01 > #00 = *
112 112
 		( cell* ) .Mouse/x DEI2 4// NIP .Mouse/y DEI2 4// NIP
113 113
 			;get-addr JSR2 STA
114 114
 		;redraw JSR2