mod_cherrypop_info.qsrc 1.3 KB

12345678910111213141516171819202122232425
  1. # mod_cherrypop_info
  2. if $ARGS[0] = "info":
  3. cls
  4. minut += 5
  5. gs 'stat'
  6. '<center><img <<$set_imgh>> src="images/pc/items/accessories/computer/agent.jpg"></center>'
  7. 'You click the button and get taken to the full job description.'
  8. '<i>An agency called CherryPop is looking for girls who are still virgins. The girl is supposed to supply pictures of her face, figure in underwear and affidavit saying she is still a virgin. The agency will mediate an auction where potential buyers will place their bids until the highest bidder wins. Agency claims part of the payment as a margin while the rest earns the girl. Before the auction the girl is bound to visit an independent doctor who confirms her virginity.</i>'
  9. act 'Read the small text bellow':
  10. cls
  11. minut += 5
  12. gs 'stat'
  13. '<center><img <<$set_imgh>> src="images/shared/accessories/computer/agent.jpg"></center>'
  14. 'You scroll down, reading the tiny text bellow the main article.'
  15. '<i>CherryPop is responsible only for mediation of the auction and payment. CherryPop is NOT responsible for anything else, regardless if such events happen in relation of this auction or payment.</i>'
  16. act 'Visit the website':CherryPopStory = 1 && gt 'mod_cherrypop_start', 'start'
  17. act 'Leave this website':gt 'komp','brows'
  18. end
  19. end
  20. --- mod_cherrypop_info ---------------------------------