123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315 |
- :: purses
- <<set $here = 'purses'>>
- <<set $ARGS = $location_var[$here]>>
- <!-- !!2021/04/15-->
- <<if $location_var[$here][0] == 'view_purse_list'>>
- <<set $menu_off = 1>>
- <!-- !! ARGS 0 - view_purse_list-->
- <<if $location_var[$here][1] == 'wardrobe'>>
- <<set $ploc = 0>>
- <</if>>
- <<if $location_var[$here][1] == 'store'>>
- <<set $ploc = 1>>
- <</if>>
- <<if $location_var[$here][1] == 'unwanted'>>
- <<set $ploc = 2>>
- <</if>>
- <<actCLA 'Return'>>
- <<gt 'wardrobe' 'main'>>
- <</actCLA>>
- <<set $clothing_header = '<center><table border=1>'>>
- <<if $location_var[$here][1] != 'wardrobe'>>
- <<set $clothing_header += '<TH><<link "Switch to wardrobe list">><<gt 'purses' 'view_purse_list' 'wardrobe'>><</link>></TH>'>>
- <</if>>
- <<if $location_var[$here][1] != 'store'>>
- <<set $clothing_header += '<TH><<link "Switch to stored clothing list">><<gt 'purses' 'view_purse_list' 'store'>><</link>></TH>'>>
- <</if>>
- <<if $location_var[$here][1] != 'unwanted'>>
- <<set $clothing_header += '<TH><<link "Switch to unwanted clothing list">><<gt 'purses' 'view_purse_list' 'unwanted'>><</link>></TH></table></center>'>>
- <</if>>
- <<$clothing_header>>
- <<if $location_var[$here][1] == 'wardrobe'>>
- <h3><h2>Wardrobe list</h2></h3>
- <<elseif $location_var[$here][1] == 'store'>>
- <h3><h2>Stored purses list</h2></h3>
- <<elseif $location_var[$here][1] == 'unwanted'>>
- <h3><h2>Unwanted purses list</h2></h3>
- <<elseif $location_var[$here][1] == 'sell'>>
- <h3><h2>Choose an item to sell</h2></h3>
- <</if>>
- <<image `'locations/city/island/dolls/shop_name.png'`>>
- <<set $i = 1>>
- <<warn 'JUMP MARKER ENCOUNTERED: :loopdollspurses'>>
- <<if getvar("$dolls_purses["+$i+"]") == 1 and $dolls_pursesS[$i] == $ploc>>
- *p '<<link '<img src="images/pc/items/dolls/purses/<<i>>.jpg" height="300" />'>><<gt 'purses' 'view_purse_item' '<<$ARGS[1]>>' 'dolls' <<i>>>><</link>>'
- <</if>>
- <<set $i += 1>>
- <<if $i <= ARRSIZE('dolls_purses')>>
- <<warn 'JUMP COMMAND ENCOUNTERED: jump loopdollspurses'>>
- <</if>>
- <<image `'locations/pushkin/bomba/shop_name.png'`>>
- <<set $i = 1>>
- <<warn 'JUMP MARKER ENCOUNTERED: :loopbomba_purses'>>
- <<if getvar("$bomba_purses["+$i+"]") == 1 and $bomba_pursesS[$i] == $ploc>>
- *p '<<link '<img src="images/pc/items/bomba/purses/<<i>>.jpg" height="300" />'>><<gt 'purses' 'view_purse_item' '<<$ARGS[1]>>' 'bomba' <<i>>>><</link>>'
- <</if>>
- <<set $i += 1>>
- <<if $i <= ARRSIZE('bomba_purses')>>
- <<warn 'JUMP COMMAND ENCOUNTERED: jump loopbomba_purses'>>
- <</if>>
- <<image `'locations/city/citycenter/mall/fashionista.png'`>>
- <<set $i = 1>>
- <<warn 'JUMP MARKER ENCOUNTERED: :loopfashionistapurses'>>
- <<if getvar("$fashionista_purses["+$i+"]") == 1 and $fashionista_pursesS[$i] == $ploc>>
- *p '<<link '<img src="images/pc/items/fashionista/purses/<<i>>.jpg" height="300" />'>><<gt 'purses' 'view_purse_item' '<<$ARGS[1]>>' 'fashionista' <<i>>>><</link>>'
- <</if>>
- <<set $i += 1>>
- <<if $i <= ARRSIZE('fashionista_purses')>>
- <<warn 'JUMP COMMAND ENCOUNTERED: jump loopfashionistapurses'>>
- <</if>>
- <<image `'locations/city/citycenter/mall/gm.png'`>>
- <<set $i = 1>>
- <<warn 'JUMP MARKER ENCOUNTERED: :loopgmpurses'>>
- <<if getvar("$gm_purses["+$i+"]") == 1 and $gm_pursesS[$i] == $ploc>>
- *p '<<link '<img src="images/pc/items/gm/purses/<<i>>.jpg" height="300" />'>><<gt 'purses' 'view_purse_item' '<<$ARGS[1]>>' 'gm' <<i>>>><</link>>'
- <</if>>
- <<set $i += 1>>
- <<if $i <= ARRSIZE('gm_purses')>>
- <<warn 'JUMP COMMAND ENCOUNTERED: jump loopgmpurses'>>
- <</if>>
- <<image `'locations/city/citycenter/mall/pussycat.png'`>>
- <<set $i = 1>>
- <<warn 'JUMP MARKER ENCOUNTERED: :loop_cats_purses'>>
- <<if getvar("$cats_purses["+$i+"]") == 1 and $cats_pursesS[$i] == $ploc>>
- *p '<<link '<img src="images/pc/items/cats/purses/<<i>>.jpg" height="300" />'>><<gt 'purses' 'view_purse_item' '<<$ARGS[1]>>' 'cats' <<i>>>><</link>>'
- <</if>>
- <<set $i += 1>>
- <<if $i <= ARRSIZE('cats_purses')>>
- <<warn 'JUMP COMMAND ENCOUNTERED: jump loop_cats_purses'>>
- <</if>>
- <<image `'locations/pavlovsk/coco/shop_name.png'`>>
- <<set $i = 1>>
- <<warn 'JUMP MARKER ENCOUNTERED: :loop_coco_purses'>>
- <<if getvar("$coco_purses["+$i+"]") == 1 and $coco_pursesS[$i] == $ploc>>
- *p '<<link '<img src="images/pc/items/coco/purses/<<i>>.jpg" height="300" />'>><<gt 'purses' 'view_purse_item' '<<$ARGS[1]>>' 'coco' <<i>>>><</link>>'
- <</if>>
- <<set $i += 1>>
- <<if $i <= ARRSIZE('coco_purses')>>
- <<warn 'JUMP COMMAND ENCOUNTERED: jump loop_coco_purses'>>
- <</if>>
- <<image `'locations/city/island/flamingos/shop_name.png'`>>
- <<set $i = 1>>
- <<warn 'JUMP MARKER ENCOUNTERED: :loop_flamingos_purses'>>
- <<if getvar("$flamingos_purses["+$i+"]") == 1 and $flamingos_pursesS[$i] == $ploc>>
- *p '<<link '<img src="images/pc/items/flamingos/purses/<<i>>.jpg" height="300" />'>><<gt 'purses' 'view_purse_item' '<<$ARGS[1]>>' 'flamingos' <<i>>>><</link>>'
- <</if>>
- <<set $i += 1>>
- <<if $i <= ARRSIZE('flamingos_purses')>>
- <<warn 'JUMP COMMAND ENCOUNTERED: jump loop_flamingos_purses'>>
- <</if>>
- <<image `'locations/city/island/nerdvana/shop_name.png'`>>
- <<set $i = 1>>
- <<warn 'JUMP MARKER ENCOUNTERED: :loop_nerdvana_purses'>>
- <<if getvar("$nerdvana_purses["+$i+"]") == 1 and $nerdvana_pursesS[$i] == $ploc>>
- *p '<<link '<img src="images/pc/items/nerdvana/purses/<<i>>.jpg" height="300" />'>><<gt 'purses' 'view_purse_item' '<<$ARGS[1]>>' 'nerdvana' <<i>>>><</link>>'
- <</if>>
- <<set $i += 1>>
- <<if $i <= ARRSIZE('nerdvana_purses')>>
- <<warn 'JUMP COMMAND ENCOUNTERED: jump loop_nerdvana_purses'>>
- <</if>>
- <<image `'locations/city/citycenter/mall/sports.png'`>>
- <<set $i = 1>>
- <<warn 'JUMP MARKER ENCOUNTERED: :loop_danilovich_purses'>>
- <<if getvar("$danilovich_purses["+$i+"]") == 1 and $danilovich_pursesS[$i] == $ploc>>
- *p '<<link '<img src="images/pc/items/danilovich/purses/<<i>>.jpg" height="300" />'>><<gt 'purses' 'view_purse_item' '<<$ARGS[1]>>' 'danilovich' <<i>>>><</link>>'
- <</if>>
- <<set $i += 1>>
- <<if $i <= ARRSIZE('danilovich_purses')>>
- <<warn 'JUMP COMMAND ENCOUNTERED: jump loop_danilovich_purses'>>
- <</if>>
- <<image `'locations/city/citycenter/mall/moncheri.png'`>>
- <<set $i = 1>>
- <<warn 'JUMP MARKER ENCOUNTERED: :loop_moncheri_purses'>>
- <<if getvar("$moncheri_purses["+$i+"]") == 1 and $moncheri_pursesS[$i] == $ploc>>
- *p '<<link '<img src="images/pc/items/moncheri/purses/<<i>>.jpg" height="300" />'>><<gt 'purses' 'view_purse_item' '<<$ARGS[1]>>' 'moncheri' <<i>>>><</link>>'
- <</if>>
- <<set $i += 1>>
- <<if $i <= ARRSIZE('moncheri_purses')>>
- <<warn 'JUMP COMMAND ENCOUNTERED: jump loop_moncheri_purses'>>
- <</if>>
- <</if>>
- <<if $location_var[$here][0] == 'view_purse_item'>>
- <<set $menu_off = 1>>
- <!-- !! ARGS 0 - view_purse_item-->
- <!-- !! ARGS 1 = action type (home, shop)-->
- <!-- !! ARGS 2 - purse type-->
- <!-- !! ARGS 3 - purse index-->
- <!-- !! ARGS 4 - price for shop-->
- <center><img src="<<FUNC(''$purse_image'', $ARGS[2], ARGS[3])>>"></center>
- <<gs 'purses' 'descriptions' $location_var[$here][2]>>
- <<if $location_var[$here][1] == 'shop'>>
- <<if State.getVar('$'+$ARGS[2]+'_purses['+$ARGS[3]+']') == 1>>
- You already own this purse.
- <<actCLA 'Leave'>>
- <<gt $location>>
- <</actCLA>>
- <<else>>
- <<set $price = $ARGS[4]>>
- <p>Price: ARGS[4] <b>₽</b></p>
- <<actCLA 'Leave'>>
- <<gt $location>>
- <</actCLA>>
- <<if $finances.cash >= $price>>
- <<actCLA 'Buy (cash)'>>
- <<set $finances.cash -= $price>>
- <!-- FAILED TO CONVERT
- dynamic $ARGS[2] + '_purses[<<ARGS[3]>>] = 1'
- -----
- <<set dynamic $ARGS[2] + '_purses[$ERROR: FAILED TO CONVERT LITERAL: """<<ARGS[3]>>"""] = 1'>>
- -->
- <<warn "CONVERSION ERROR 414f5f1c465dda273a854fc2cf06ca4a">>
- <<if $wardrobe.purseEquipped == 0>>
-
- <<set $currentpursetype = $location_var[$here][2]>>
- <<set $currentpursenumber = $ARGS[3]>>
- <</if>>
- <<gt $location>>
- <</actCLA>>
- <<else>>
- You do not have enough cash to buy this purse.
- <</if>>
- <<if $finances.bankAvailable >= $price>>
- <<actCLA 'Buy (card)'>>
- <<set $finances.bank -= $price>>
- <!-- FAILED TO CONVERT
- dynamic $ARGS[2] + '_purses[<<ARGS[3]>>] = 1'
- -----
- <<set dynamic $ARGS[2] + '_purses[$ERROR: FAILED TO CONVERT LITERAL: """<<ARGS[3]>>"""] = 1'>>
- -->
- <<warn "CONVERSION ERROR 414f5f1c465dda273a854fc2cf06ca4a">>
- <<if $wardrobe.purseEquipped == 0>>
-
- <<set $currentpursetype = $location_var[$here][2]>>
- <<set $currentpursenumber = $ARGS[3]>>
- <</if>>
- <<gt $location>>
- <</actCLA>>
- <<else>>
- You do not have enough money in your bank to buy this purse.
- <</if>>
- <</if>>
- <<else>>
- <<actCLA 'Return'>>
- <<gt 'purses' 'view_purse_list' $location_var[$here][1]>>
- <</actCLA>>
- <<if $currentpursetype == $location_var[$here][2] and $currentpursenumber == $ARGS[3]>>
- You are using this purse.
- <<else>>
- <<if getvar("$ploc") == 0>>
- This purse is in your wardrobe.
- <<actCLA 'Use this purse'>>
- <<set $currentpursetype = $location_var[$here][2]>>
- <<set $currentpursenumber = $ARGS[3]>>
-
- <<gt 'wardrobe' 'main'>>
- <</actCLA>>
- <<elseif getvar("$ploc") == 1>>
- This purse is in storage.
- <<elseif getvar("$ploc") == 2>>
- This purse is unwanted.
- <</if>>
- <<if getvar("$ploc") != 1>>
- <<sets $result += 'Move this purse to <<link "Storage">><<gt 'purses' 'dest1' '$ARGS[1]' '$ARGS[2]' $ARGS[3]>><</link>><BR>'>>
- <</if>>
- <<if getvar("$ploc") != 0>>
- <<sets $result += 'Move this purse to <<link "Wardrobe">><<gt 'purses' 'dest0' '$ARGS[1]' '$ARGS[2]' $ARGS[3]>><</link>><BR>'>>
- <</if>>
- <<if getvar("$ploc") != 2>>
- <<sets $result += 'Move this purse to <<link "Unwanted">><<gt 'purses' 'dest2' '$ARGS[1]' '$ARGS[2]' $ARGS[3]>><</link>>'>>
- <</if>>
- <<if $location_var[$here][1] != 'store'>>
- <<actCLA 'Move to storage'>>
- <<gt 'purses' 'dest1' $location_var[$here][1] $location_var[$here][2] $ARGS[3]>>
- <</actCLA>>
- <</if>>
- <<if $location_var[$here][1] != 'unwanted'>>
- <<actCLA 'Move to unwanted'>>
- <<gt 'purses' 'dest2' $location_var[$here][1] $location_var[$here][2] $ARGS[3]>>
- <</actCLA>>
- <</if>>
- <<if $location_var[$here][1] != 'wardrobe'>>
- <<actCLA 'Move to wardrobe'>>
- <<gt 'purses' 'dest0' $location_var[$here][1] $location_var[$here][2] $ARGS[3]>>
- <</actCLA>>
- <</if>>
- <</if>>
- <</if>>
- <</if>>
- <<if $location_var[$here][0] == 'dest0'>>
- <<run State.setVar($ARGS[2]+'_pursesS['+$ARGS[3]+']',0)>>
- <<gt 'purses' 'view_purse_list' $location_var[$here][1] $location_var[$here][2] $ARGS[3]>>
- <</if>>
- <<if $location_var[$here][0] == 'dest1'>>
- <<run State.setVar($ARGS[2]+'_pursesS['+$ARGS[3]+']',1)>>
- <<gt 'purses' 'view_purse_list' $location_var[$here][1] $location_var[$here][2] $ARGS[3]>>
- <</if>>
- <<if $location_var[$here][0] == 'dest2'>>
- <<run State.setVar($ARGS[2]+'_pursesS['+$ARGS[3]+']',2)>>
- <<gt 'purses' 'view_purse_list' $location_var[$here][1] $location_var[$here][2] $ARGS[3]>>
- <</if>>
- <<if $location_var[$here][0] == 'descriptions'>>
- <<if $location_var[$here][1] == 'dolls'>>
- Let your freak flag fly with this perfect purse for the hot, independent girl that lives the alt lifestyle.
- <<elseif $location_var[$here][1] == 'bomba'>>
- Yeah you have attitude and with this bag everyone knows it.
- <<elseif $location_var[$here][1] == 'coco'>>
- A trendy bag for a young adult.
- <<elseif $location_var[$here][1] == 'flamingos'>>
- You look like the girl about town with this bag.
- <<elseif $location_var[$here][1] == 'danilovich'>>
- A sports bag for all your junk. Practical and durable but not fashionable
- <<elseif $location_var[$here][1] == 'fashionista'>>
- <p>A stylish handbag for any fashion-forward female!</p>
- <<elseif $location_var[$here][1] == 'nerdvana'>>
- For the geek inside you.
- <<elseif $location_var[$here][1] == 'gm'>>
- A functional, if not too fashionable, handbag for carrying all of the essentials.
- <<elseif $location_var[$here][1] == 'cats'>>
- <p>Is it a bag? Is it a pet? Is it a toy? Who cares you stand out and look cute.</p>
- <<elseif $location_var[$here][1] == 'moncheri'>>
- <p>A high-fashion handbag for ladies with discerning tastes. Show how classy you are with this expensive accessory.</p>
- <</if>>
- <</if>>
- <<if $location_var[$here][0] == 'remove'>>
- <<set $currentpursetype to null>>
- <<set $currentpursenumber to null>>
-
- <</if>>
|