Kirillza, Можно так.
150 drawgel hero$,x%,y%
160 if up(0) then hero$="up"
170 if down(0) then hero$="down"
180 repaint:cls:goto 150
как то так!

Выдает ошибку Random acces on line 40. Хотя на строке 40 все номр

Senderman, Тут ничего нет.

Fantastik, ой, опера глюканула.
ошибка на строке 40

Senderman, Если я правильно понял суть кода, тогда так писать намного проще и надежнее

Fantastik, нет. Так может и проще, но не лучше, ибо используется гото.

Kirillza, ты ведь бог, сотвори переменую хранит слова божьи, и назови её $persgel. Наполни её божьим смыслом, дабы мир не выдал ересь вроде NullPointerException. Задай наставление этой переменой, дабы при знаке свыше от юзера неведомого она наполнялась иными словами и выполняла волю божью. Вот пример наполнения, от знака свыше по ту сторону экрана:
  if up(0) then $persgel="persUPgel"
  ...
  А вот пример исполнения замысла божьего:
  dg $persgel
  И пусть только переменная попробует не идти по пути истиному - уничтожь.

Reaper, В чем разница этих двух способов?

Fantastik, гото берёт больше ресурсов и код с гото сложнее для понимания.

Ну так что со строкой не так?