1
0

lena.qsrc 1.2 KB

123456789101112131415161718192021222324252627282930313233343536373839
  1. # lena
  2. if $ARGS[0] = 'lena':
  3. cls
  4. minut += 5
  5. gs'stat'
  6. gs'ira'
  7. '<center><b><font color = maroon>Lena</font></b></center>'
  8. if $metka = 'party_gost':
  9. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_iralena_1_' + rand(1,5) + '.jpg"></center>'
  10. 'Ira and Lena are really getting into the spirit of the party.'
  11. else
  12. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/lena/lena.jpg"></center>'
  13. 'Walking up to Lena you talk and share a drink.'
  14. end
  15. 'Small and mobile Lena'
  16. act 'Move away':gt $loc,$metka
  17. if $metka = 'party_gost':
  18. 'Lena and Ira together clink cups. "<<$pcs_nickname>>, Lets party!" As they offer you a drink.'
  19. gs 'willpower', 'drink', 'resist', 'hard'
  20. if will_cost <= pcs_willpwr:
  21. act 'Drink (<<will_cost>> Willpower)':
  22. gs 'willpower', 'pay', 'self'
  23. gs 'stat'
  24. gt 'ira', 'drink'
  25. end
  26. else
  27. act 'Drink (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  28. end
  29. act 'Dance':gt 'ira', 'dance'
  30. else
  31. if alko < 6 and $metka = 'party_home': act 'Have a drink': gt'sbReksHome','party_drink'
  32. end
  33. end
  34. --- lena ---------------------------------