382_obekt 733 B

123456789101112131415161718192021222324252627282930313233
  1. # obekt
  2. '<center><h4>An object</h4></center>'
  3. '<center><img src="images/etogame/obekt.jpg"></center>'
  4. 'Construction at the site is stopped and the territory silence, only the guard walks.'
  5. clr
  6. gs 'stat'
  7. gs 'time'
  8. if car > 0 and cardrive = 12:
  9. set cardrive = 12
  10. 'In the parking stands <a href="exec:GS ''carF'', ''start''">your <<$car>></a>.'
  11. end
  12. act 'Penetrate to the construction site':
  13. cls
  14. minut += 5
  15. gs 'stat'
  16. if ObjektOpen = 0:
  17. if ObjektBil = 0:ObjektBil = 1
  18. 'Construction guarded very carefully, just not be able to enter.'
  19. act 'Leave':gt $curloc
  20. else
  21. gt 'obekt2'
  22. end
  23. end
  24. !!if ObjektBil = 1:end
  25. act 'Go on the road':minut += 15 & nroad = 16 & gt 'road'
  26. --- obekt ---------------------------------