FSgame.qsrc 677 B

12345678910111213141516171819202122232425262728293031323334353637383940414243444546
  1. # FSgame
  2. minut += 1
  3. gs 'stat'
  4. gs 'FSstat'
  5. '<center><b>Hotel room</b></center>'
  6. ''
  7. if FSmedkit > 0:
  8. 'First aid kits <<FSmedkit>> pieces'
  9. if FSHP < 100:
  10. act 'Treated':
  11. cls
  12. FShour += 1
  13. FSHP = 100
  14. FSmedkit -= 1
  15. minut += 1
  16. gs 'stat'
  17. 'You heal health through kits.'
  18. act 'Further':gt $curloc
  19. end
  20. end
  21. end
  22. act 'Laze':
  23. cls
  24. FShour += 1
  25. minut += 1
  26. gs 'stat'
  27. 'You lounged in the apartment, lounging on the couch and thinking how you vykruchivatsya of the situation.'
  28. act 'Further':gt $curloc
  29. end
  30. act 'Leave the room':
  31. cls
  32. FShour += 1
  33. minut += 1
  34. gs 'stat'
  35. !!'You left the room.'
  36. gt 'FSroom'
  37. end
  38. --- FSgame ---------------------------------