kutuzka 464 B

123456789101112131415161718192021
  1. # kutuzka
  2. gs 'stat'
  3. 'You sit in a small cell, where there is no toilet, no shell, is only a wooden plank. All you have to sit <<kutime>> hours.'
  4. if kutime > 0:
  5. act 'sit':
  6. cls
  7. minut += 60
  8. kutime -= 1
  9. gs 'stat'
  10. 'You sit on hard wooden planks.'
  11. act 'further':gt $curloc
  12. end
  13. elseif kutime <= 0:
  14. 'Finally the time of his release over and you have been released.'
  15. act 'Leave':minut += 1 & gt $curloc
  16. end
  17. --- kutuzka ---------------------------------