obekt.qsrc 988 B

12345678910111213141516171819202122232425262728293031323334353637383940
  1. # obekt
  2. $menu_loc = 'obekt'
  3. $menu_arg = ''
  4. menu_off = 0
  5. clr
  6. gs 'stat'
  7. $location_type = 'secluded'
  8. '<center><h4>An object</h4></center>'
  9. '<center><img <<$set_imgh>> src="images/locations/construction/obekt.jpg"></center>'
  10. 'The construction work has stopped and there is complete silence, the only person there is the guard walking around.'
  11. if car > 0 and cardrive = 12:
  12. cardrive = 12
  13. 'The <a href="exec:gs ''carF'', ''start''"> <<$car>></a> is standing in the parking.'
  14. end
  15. act 'Sneak into the construction site':
  16. cls
  17. minut += 5
  18. menu_off = 1
  19. gs 'stat'
  20. if ObjektOpen = 0:
  21. if ObjektBil = 0:ObjektBil = 1
  22. 'Before you''re able to enter, you hear a voice asking you what you''re doing. It''s the guard that caught you. He points towards the direction you should be heading instead.'
  23. act 'Leave':gt $curloc
  24. else
  25. gt 'obekt2'
  26. end
  27. end
  28. !!if ObjektBil = 1:end
  29. act 'Go on the road':minut += 15 & nroad = 16 & gt 'road'
  30. end
  31. --- obekt ---------------------------------