Find Exit: FIND EX.B

  0 REM :S/ RETURN  THEN CHR$ =*]/##"]/>o2SQR /<>
  10 CLEAR 49999: RANDOMIZE USR (PEEK 23635+256*PEEK 23636+5): REM : LOAD "chr"CODE VAL "50000"
  20 BORDER 0: PAPER 0: INK 7: CLS : POKE 23606,80: POKE 23607,194
  25 PRINT AT 2,1;"dobro povalowatx w nebolx{u`"
  30 PRINT AT 3,1;"adwent`rnu` igru FIND EXIT "
  40 PRINT AT 4,1;"napisannu` s pomo}x` programmy "
  50 PRINT AT 5,1;"A.B.S. (T.D. FROST + inforkom)"
  60 PRINT AT 10,1; INK 3;     "  wy o~nulisx w strannoj        zabro{ennoj ba{ne posredi       dvunglej i ne pomnq kak wy      zdesx okazalisx.   zada~a -     najti wyhod i wernutxsq domoj."
  70 PRINT AT 19,2;"COPYRIGHT BY PAUL MOSCOW  "
  80 PRINT AT 20,8;"qroslawlx 1997"
  100 GO TO 100+PEEK 23635
  200 PRINT #0;TAB 3;"navmite l`bu` klawi{u dlq": PRINT #1;TAB 8;"zagruzki igry": PAUSE 0: INPUT ;: RANDOMIZE USR 15619: REM : LOAD "fcode"
  900 RANDOMIZE USR (PEEK 23635+256*PEEK 23636+5): REM : SAVE "FIND EX" LINE VAL "10"