414_Mariya1 1.5 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192
  1. # Mariya1
  2. '- How can I help you?'
  3. act 'Move away': gt 'rack'
  4. if nom_1 = 0:
  5. act 'Ask about plans for the evening':
  6. cla
  7. '- What are you doing tonight?'
  8. '- Meeting with her husband. Anything else?'
  9. act 'Move away': gt 'rack'
  10. end
  11. if tobiQW = 2000:
  12. act 'Why in the hotel so crowded?':
  13. cla
  14. tobiQW = 2001
  15. '- Why so crowded in the hotel?'
  16. '- Then stop members of Congress rare languages, as they call themselves quack.'
  17. act 'Move away': gt 'rack'
  18. end
  19. end
  20. end
  21. if nomer = 0:
  22. *clear
  23. act 'Stay':
  24. '- I would like to stay'
  25. '- Well, what would you like?'
  26. cla
  27. act 'Cheap room':
  28. '- Cheap room'
  29. nomer = 1
  30. nom_1 = 1
  31. gt 'mariya1'
  32. end
  33. act 'Standard Room':
  34. '- Standard Room'
  35. nomer = 2
  36. nom_1 = 1
  37. gt 'mariya1'
  38. end
  39. act 'Suite':
  40. '- Suite'
  41. nomer = 3
  42. nom_1 = 1
  43. gt 'mariya1'
  44. end
  45. act 'Presidential Suite':
  46. '- Presidential Suite'
  47. nomer = 4
  48. nom_1 = 1
  49. gt 'mariya1'
  50. end
  51. end
  52. end
  53. if nom_1 = 1 and flag = 0:
  54. *clear
  55. cla
  56. '- You shoot a room for one night.'
  57. sto_nom = nom_o[nomer]
  58. '- It will cost <<sto_nom>>'
  59. cla
  60. act 'Pay':
  61. if sto_nom > money:
  62. msg 'Not enough money'
  63. srokarend = 0
  64. nomer = 0
  65. nom_1 = 0
  66. gt 'mariya1'
  67. end
  68. money = money - sto_nom
  69. flag = 1
  70. nom_1 = 0
  71. nom_nom = rand(1,1000)
  72. 'Thank you for using our services'
  73. 'Your room <<nom_nom>>'
  74. cla
  75. act 'Goodbye':
  76. gt 'rack'
  77. end
  78. end
  79. act 'Change Your Mind':
  80. nomer = 0
  81. nom_1 = 0
  82. gt 'mariya1'
  83. end
  84. end
  85. if nom_1 = 0:
  86. act 'Move away':
  87. gt 'rack'
  88. end
  89. end
  90. --- Mariya1 ---------------------------------