Cave Navigator by loudscotsbloke

Правила конкурса: напишите игру, используя не более 10 строк кода,
не более 80* символов в каждой строке. Использование только стандартной мощности на встроенном
языке.

Моя система: Mattel Electronics Aquarius
Программист: Рой Темплман
Язык: BASIC v1.0

*Водолей поддерживает только 72 символа в строке!

CAVE NAVIGATOR – Исходный код
0?chr$(11):s=0:w=13:l=12348:r=l+880:q=.5:fora=0to19:?:next :"GO!"
1poker,246:poker+w,246:s=s+1:ifrnd(1)>qandr>13225thenr=r-1:z=z+1:b=4
2ifrnd(1)>qandr<13235-dthenr=r+1:k$=inkey$
3ifk$<>"z"andk$<>"x"then5:dataC,A,V,E, " ",N,A,V,I,G,A,T,O,R," ",2,1
4y=l:a$=k$:u=int(w*rnd(1 )+1):poker+u,79:ifk=79thensound(500,10):s=s+50
5y=l:ifa$="z"andy>12329theny=y-1:pokey-1 ,7
6ifa$="x"andy<12367theny=y+1:pokey+1,6:z=0
7ifpeek(y+40)=246orz>20orr-l>883orr-l< 865thensound(20,800):goto9
8?:pokey,25:pokey+1024,22:l=y:w=w-0.02:k=peek(y+80):goto1
9poke(y +80),209:?:"Мертв! Вы забили:";s:fori=0to4000:next:a$="":run

Правила и инструкции игры
Вас отправили на чужую планету
для исследования богатых месторождений «О»,
жизненно важного источника энергии для планетарной
защитной системы . Отложения находятся
глубоко под поверхностью, заключенные
в пещерах, спускающихся к
ядру чужой планеты. Вы должны перемещаться
по вашей капсуле шаттла с помощью клавиш «z» и «x»
, это активирует боковые
двигатели капсулы и переместит вас из sidв
сторону, но, начав движение, шаттл
продолжит двигаться в этом направлении!
Вы должны избегать ударов о стены пещеры,
пытаясь пройти дальше к «О»
депозиты. Это сложнее, чем кажется
однако, поскольку магнитные свойства
стен разрушают
двигатели шаттлов! Попытка добраться
к жизненно важным месторождениям «О»
чрезвычайно трудна, поскольку вы должны быть
точны, чтобы получить жизненную энергию.
Если вам удастся захватить «О», вы услышите подтверждающий звуковой сигнал, но
вы должны быть начеку! Успешное получение буквы «О» увеличит ваш счет на 50 очков!
Так что этим стоит заниматься. Удар о стены приведет к мгновенной смерти! И игра
начнётся заново. Однако будьте осторожны... стены пещеры становятся уже каждые 100 очков, и
количество букв «О» уменьшается по мере углубления. Постарайтесь остаться в живых как можно дольше
и собрать как можно больше энергии «О» на пути вниз! Так держать, командир!
И удачи!