equal
deleted
inserted
replaced
235 SetLine(InputStr, '', false) |
235 SetLine(InputStr, '', false) |
236 end; |
236 end; |
237 FreezeEnterKey; |
237 FreezeEnterKey; |
238 GameState:= gsGame |
238 GameState:= gsGame |
239 end; |
239 end; |
240 {missing Mac keys} |
|
241 {* |
|
242 63272 is canc |
|
243 63232 is UP |
|
244 63234 is LEFT |
|
245 63235 is RIGHT |
|
246 63233 is DOWN |
|
247 *} |
|
248 63272, 63232, 36233, 36234, 36235: Key:= 28; |
|
249 else |
240 else |
250 if (Key < $80) then btw:= 1 |
241 if (Key < $80) then btw:= 1 |
251 else if (Key < $800) then btw:= 2 |
242 else if (Key < $800) then btw:= 2 |
252 else if (Key < $10000) then btw:= 3 |
243 else if (Key < $10000) then btw:= 3 |
253 else btw:= 4; |
244 else btw:= 4; |