0 H%=0:REPEATMODE7:VDU28;24,39;:P%=&7C64:S%=0:REPEAT?P%=86:PRINT"|"TAB(RND(38))"*"TAB(39)"|"CHR$13;:P%=(P%+INKEY(-98)-INKEY(-67)-19)MOD38+&7C51:S%=S%+1:UNTIL?P%=42:H%=H%+(S%>H%)*(H%-S%):VDU7:PRINT'"SCORE:"S%'"HI:"H%'"PRESS SPACE";:REPEATUNTILGET=32:UNTIL0