liamelkafe.qsrc 1.4 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152
  1. # liamelkafe
  2. if $ARGS[0] = 'start':
  3. $menu_loc = 'liamelkafe'
  4. $menu_arg = 'start'
  5. menu_off = 0
  6. $location_type = 'indoors'
  7. gs 'stat'
  8. '<center><B><font color=maroon>Tiny Cafe</font></B></center>'
  9. *nl
  10. '<center><img <<$set_imgh>> src="images/locations/oldtown/cafe/larek.jpg" ></center>'
  11. 'You enter a tiny cafe, consisting of very little floor space packed with small tables.'
  12. if hour > 11 and hour < 13:
  13. 'The cafe is packed with people eating their afternoon meal.'
  14. if stallionQ = 1: stallionQ = 2
  15. elseif hour > 16 and hour < 18:
  16. 'The cafe is packed with people eating their evening meal.'
  17. if stallionQ = 1: stallionQ = 2
  18. end
  19. if money > 45:
  20. act 'Sit down for a meal': money -= 45 & gt 'liamelkafe', 'food'
  21. end
  22. act 'Leave':gt 'liames'
  23. end
  24. if $ARGS[0] = 'food':
  25. $metka = 'food'
  26. $loc = 'liamelkafe'
  27. $menu_loc = 'liamelkafe'
  28. $menu_arg = 'food'
  29. menu_off = 0
  30. '<center><B><font color=maroon>Tiny Cafe</font></B></center>'
  31. *nl
  32. '<center><img <<$set_imgh>> src="images/locations/oldtown/cafe/larek.jpg" ></center>'
  33. act 'See the menu':gs 'food_menu'
  34. if stallionQ = 2:
  35. if FocH > (Foch_Max - 10):
  36. stallionQ = 3
  37. FocH = Foch_Max
  38. EggRH += 300
  39. elseif ovulate > 12:
  40. stallionQ = 3
  41. end
  42. end
  43. 'The tiny cafe is wonderfully situated and you enjoy the beautiful scenery as you eat.'
  44. if stallionQ = 0: StallionQ = 1
  45. act 'Leave the table':gt 'liamelkafe', 'start'
  46. end
  47. --- liamelkafe ---------------------------------