psiklin 1.9 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364
  1. # psiklin
  2. $location_type = 'public_outdoors'
  3. if $ARGS[0]='start':
  4. cla
  5. *clr
  6. $loc = 'psiklin'
  7. $metka = 'start'
  8. minut += 5
  9. gs'stat'
  10. '<center><H4>Elite settlement<H4></center>'
  11. '<left><img <<$set_imgh>> src="images/locations/city/suburb/settlement.jpg" ></left>'
  12. if hour >= 4 and hour <= 23:'The <a href="exec:gt ''metro'', ''start''">Metro</a> station is only a short walk from here from here.'
  13. if BDSMClub = 1 or BDSMmeet > 0:
  14. act 'BDSM-club':gt'BDSM_Club','start'
  15. end
  16. if placeMansion = 0:
  17. 'There is a vacant piece of land for sale where a large house could be constructed.'
  18. act 'Visit the land for sale': gt 'youplace'
  19. elseif placeMansion < 3:
  20. 'You mansion is partially built near here.'
  21. act 'Visit your mansion': gt 'youplace'
  22. else
  23. 'One of the most impressive buildings is your newly built mansion.'
  24. act 'Visit your mansion': gt 'youplace'
  25. end
  26. act 'View the insane asylum': gt 'psiklin', 'ps1'
  27. act 'View the creepy old building': gt 'psiklin', 'ps2'
  28. act 'Go to the main road':nroad = 1 & gt 'road'
  29. end
  30. if $ARGS[0]='ps1':
  31. cla
  32. *clr
  33. minut += 2
  34. gs'stat'
  35. '<center><H4>Insane asylum<H4></center>'
  36. 'The inscription on the sign by the road reads: "Closed to the public".'
  37. if psiklik = 0:'<center><img <<$set_imgh>> src="images/locations/city/suburb/asylum0.jpg" ></center>'
  38. if psiklik = 1:'<center><img <<$set_imgh>> src="images/locations/city/suburb/asylum1.jpg" ></center>'
  39. act 'Go':gt'psiklin','start'
  40. end
  41. if $ARGS[0]='ps2':
  42. cla
  43. *clr
  44. minut += 2
  45. gs'stat'
  46. '<center><H4>An old abandoned building<H4></center>'
  47. '<center><img <<$set_imgh>> src="images/locations/city/suburb/abandoned.jpg" ></center>'
  48. 'An abandoned building that spoils the local communities appearance and intimidates local residents.'
  49. act 'Go':gt'psiklin','start'
  50. end
  51. --- psiklin ---------------------------------