438_FSgame 1.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122
  1. # FSgame
  2. <<<<<<< 438_FSgame
  3. minut += 1
  4. gs 'stat'
  5. gs 'FSstat'
  6. '<center><B>Hotel room</B></center>'
  7. ''
  8. if FSmedkit > 0:
  9. 'First aid kits <<FSmedkit>> pieces'
  10. if FSHP < 100:
  11. act 'Treated':
  12. cls
  13. FShour += 1
  14. FSHP = 100
  15. FSmedkit -= 1
  16. minut += 1
  17. gs 'stat'
  18. 'You heal health through kits.'
  19. act 'Further': gt $curloc
  20. end
  21. end
  22. end
  23. act 'Laze':
  24. cls
  25. FShour += 1
  26. minut += 1
  27. gs 'stat'
  28. 'You lounged in the apartment, lounging on the couch and thinking how you vykruchivatsya of the situation.'
  29. act 'Further': gt $curloc
  30. end
  31. act 'Leave the room':
  32. cls
  33. FShour += 1
  34. minut += 1
  35. gs 'stat'
  36. !'You left the room.'
  37. gt 'FSroom'
  38. end
  39. =======
  40. minut+=1
  41. gs'stat'
  42. gs'FSstat'
  43. '<center><B>The room at the hotel</B></center>'
  44. ''
  45. if FSmedkit>0:
  46. 'kits <<FSmedkit>> pcs'
  47. if FSHP<100:
  48. act 'treated':
  49. cls
  50. FShour+=1
  51. FSHP=100
  52. FSmedkit-=1
  53. minut+=1
  54. gs'stat'
  55. 'You cured with the help of health kits.'
  56. act 'further':gt $curloc
  57. end
  58. end
  59. end
  60. act 'laze':
  61. cls
  62. FShour+=1
  63. minut+=1
  64. gs'stat'
  65. 'You lounged in the apartment, lounging on the couch and thinking, as you vykruchivatsya of the situation.'
  66. act 'further':gt $curloc
  67. end
  68. act 'Exit the room':
  69. cls
  70. FShour+=1
  71. minut+=1
  72. gs'stat'
  73. !'You left the room.'
  74. gt 'FSroom'
  75. end
  76. >>>>>>> 438_FSgame
  77. --- FSgame ---------------------------------