---- orig/lemonade.bas 2022-05-18 16:49:43.864568949 +1000
-+++ lemonade.bas 2022-05-18 16:50:22.500570506 +1000
+--- orig/lemonade.bas 2022-05-19 12:51:48.448005822 +1000
++++ lemonade.bas 2022-05-19 12:57:09.564018765 +1000
@@ -207,28 +207,46 @@
10110POKE782,208:POKE783,245:POKE784,174:POKE785,0:POKE786,3:POKE787,76:POKE788,2:POKE789,3:POKE790,96:POKE791,0:POKE792,0
10190RETURN
11530DATA96,16,85,4,128,4,96,4,76,4,128,4,96,16,0,0
11540DATA114,120,144,60,114,255,1,120,128,120,144,60,128,120,114,60,144,120,171,255,228,255,0,0
11550DATA152,180,152,120,152,60,144,120,152,60,171,120,192,60,152,255,0,0
+@@ -327,8 +351,9 @@
+ 15182IFSC=7THENHTAB15:PRINT" HOT AND DRY ";
+ 15184IFSC=10THENHTAB17:PRINT" CLOUDY ";
+ 15186IFSC=5THENHTAB14:PRINT" THUNDERSTORMS! ";:GOSUB17000
+-15200RESTORE
+-15210READA$:IFA$<>"*"THEN15210
++15200REM RESTORE
++15210REM READA$:IFA$<>"*"THEN15210
++15211RESTORE11530
+ 15220IFSC<>2THEN15300
+ 15230READI,J:IFJ=0THEN15500
+ 15240FORK=1TOJ:POKE768,I:POKE769,10:CALL770