gadmarket.qsrc 2.1 KB

1234567891011121314151617181920212223242526272829303132333435363738
  1. # gadmarket
  2. $location_type = 'public_indoors'
  3. frost = 0
  4. set minut += 5
  5. *pl '<center><h1><font color="maroon">Village Shop</font></h1></center>'
  6. *pl '<center><img <<$set_imgh>> src="images/locations/gadukino/village/market.jpg"></center>'
  7. 'You walk into the small shop with four narrow aisles with chest high shelves crammed full of food and other household goods. There is little variety in the selections, just the most essential products.'
  8. 'Slowly you browse the aisles looking for something to buy.'
  9. *nl
  10. 'As you approach the teller, you notice a rack full of magazines, cigarettes, and a few hygienic items.'
  11. *nl
  12. $gadmarkettab = '<center><table align="center">'
  13. $gadmarkettab += FUNC ('$stock_item', 10, 'Package of tea biscuits', 400, 'pranik', 'gadmarket')
  14. $gadmarkettab += FUNC ('$stock_item', 20, 'Cigarettes', 150, 'siga', 'gadmarket')
  15. $gadmarkettab += FUNC ('$single_stock_item', 1, 'Fashion magazine', 450, 'fashmag', 'gadmarket')
  16. $gadmarkettab += FUNC ('$single_stock_item', 1, 'Computer magazine', 450, 'compmag', 'gadmarket')
  17. $gadmarkettab += FUNC ('$single_stock_item', 1, 'Biographical magazine', 450, 'biomag', 'gadmarket')
  18. $gadmarkettab += FUNC ('$single_stock_item', 1, 'Cooking magazine', 450, 'cookmag', 'gadmarket')
  19. $gadmarkettab += FUNC ('$single_stock_item', 1, 'Knitting magazine', 450, 'knitmag', 'gadmarket')
  20. $gadmarkettab += FUNC ('$stock_item', 5, 'Condoms', 600, 'prezikcount', 'gadmarket')
  21. $gadmarkettab += FUNC ('$stock_item', 20, 'Tampons', 250, 'tampon', 'gadmarket')
  22. $gadmarkettab += FUNC ('$stock_item', 40, 'Razors', 700, 'stanok', 'gadmarket')
  23. $gadmarkettab += FUNC ('$single_stock_item', 1, 'Bottle of water', 100, 'bottle', 'gadmarket', '', iif(bag > 0, 0, 1), 'You need a handbag')
  24. $gadmarkettab += FUNC ('$single_stock_item', 1, 'Sandwich', 100, 'buterbrod', 'gadmarket', '', iif(bag > 0, 0, 1), 'You need a handbag')
  25. $gadmarkettab += FUNC ('$single_stock_item', 1, 'Cheap Bottle of wine', 200, 'wine', 'gadmarket', '', iif(bag > 0, 0, 1), 'You need a handbag')
  26. $gadmarkettab += '</table></center>'
  27. *pl $gadmarkettab
  28. killvar '$gadmarkettab'
  29. gs 'stat'
  30. act 'Leave the market': gt $loc
  31. --- gadmarket ---------------------------------