123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662 |
- # shoes
- !!This is the main file for shoes, like clothes but for your feet.
- $shoe_list_line = {
- !! a single line in a shoe list (shoe rack, etc)
- !! ARGS 0 - action type (shoe rack, sell, store, forsale)
- !! ARGS 1 - shoe type
- !! ARGS 2 - shoe index
- gs 'themes', 'clothing'
- $RESULT = '<TR bgcolor='+$temp_bcolor+'>'
- if Enable_clothwidth > 0:
- shoe_temp = Enable_clothwidth - 1
- else
- shoe_temp = 75 & !shoe widdefault to 75
- end
- $RESULT +='<TD><a href="exec:gt ''shoes'', ''view_shoe_item'', ''wardrobe'', ''<<$ARGS[1]>>'', <<ARGS[2]>>"><img src="<<FUNC(''$shoe_image'', $ARGS[1], ARGS[2])>>" width="<<shoe_temp>>"></a></TD>'
- killvar 'shoe_temp'
- gs 'shoe_attributes', $ARGS[1], ARGS[2]
- $RESULT += '<TD><<FUNC(''$shoe_description'', $ARGS[1])>> <<ARGS[2]>></TD>'
- $RESULT += '<TD><<FUNC(''$shoe_description2'', $ARGS[1])>></TD>'
- if ShoStyle = 2:
- $RESULT += '<TD>Yes</TD>'
- else
- $RESULT += '<TD>No</TD>'
- end
- if ShoStyle = 1:
- $RESULT += '<TD>Yes</TD>'
- else
- $RESULT += '<TD>No</TD>'
- end
-
- $RESULT += '<TD><a href="exec:gt ''shoes'', ''view_shoe_item'', ''wardrobe'', ''<<$ARGS[1]>>'', <<ARGS[2]>>">View</a></TD>'
- $RESULT += '<TD>'
- if sloc ! 1:$RESULT += ' <a href="exec:gt ''shoes'', ''dest1'', ''<<$ARGS[0]>>'', ''<<$ARGS[1]>>'', <<ARGS[2]>>">Storage</a>'
- if sloc ! 0:$RESULT += ' <a href="exec:gt ''shoes'', ''dest0'', ''<<$ARGS[0]>>'', ''<<$ARGS[1]>>'', <<ARGS[2]>>">Wardrobe</a>'
- if sloc ! 2:$RESULT += ' <a href="exec:gt ''shoes'', ''dest2'', ''<<$ARGS[0]>>'', ''<<$ARGS[1]>>'', <<ARGS[2]>>">Unwanted</a>'
- $RESULT += '</TD>'
- }
- if $ARGS[0] = 'dest0':
- *clr
- dynamic '<<$ARGS[2]>>_shoe_s[<<ARGS[3]>>] = 0'
- gt 'shoes', 'view_shoe_list', $ARGS[1]
- end
- if $ARGS[0] = 'dest1':
- *clr
- dynamic '<<$ARGS[2]>>_shoe_s[<<ARGS[3]>>] = 1'
- gt 'shoes', 'view_shoe_list', $ARGS[1]
- end
- if $ARGS[0] = 'dest2':
- *clr
- dynamic '<<$ARGS[2]>>_shoe_s[<<ARGS[3]>>] = 2'
- gt 'shoes', 'view_shoe_list', $ARGS[1]
- end
- if $ARGS[0] = 'view_shoe_list':
- !! ARGS 0 - view_shoe_list
- !! ARGS 1 - action type (wardrobe, storage, unwanted, sell)
- !! ARGS 2 - brothel flag (brothel)
- $regularwornshoetype = ''
- act 'Return':gt 'wardrobe', 'main'
- if $ARGS[1] ! 'sell' :'<center><table border=1><TH><a href="exec:gt ''shoes'', ''view_shoe_list'', ''wardrobe''">Wardrobe </a></TH><TH><a href="exec:gt ''shoes'', ''view_shoe_list'', ''store''">Storage</a></TH><TH><a href="exec:gt ''shoes'', ''view_shoe_list'', ''unwanted''">Unwanted</a></TH></table></center>'
- if $ARGS[1] ! 'sell' :
- '<center><b>Select shoes to wear</b> *Bonus to attractiveness only applied in wardrobe and outdoors.</center>'
- if $shoeworntype ! 'none':
- act 'Remove shoes':
- gs 'shoes', 'strip'
- gt 'shoes', 'view_shoe_list', $ARGS[1]
- end
- end
- end
-
- if $ARGS[1] = 'wardrobe':
- sloc = 0
- end
-
- if $ARGS[1] = 'store':
- sloc = 1
- end
-
- if $ARGS[1] = 'unwanted':
- sloc = 2
- end
- gs 'shoes', 'filter_header', 'store'
- '<center><table border=0 cellspacing=0 cellpadding=5><TH></TH><TH>Shoe</TH><TH>Description</TH><TH>Bimbo</TH><TH>Stripper</TH><TH>Actions</TH>'
- !!To filter just this set
- clo_i = 0
- :loopshoequality_filter
- i = 1
- :loopmoncheri_shoe
- if moncheri_shoe_s[i] = sloc and moncheri_shoe[i] = 1 and Shofilter['sport_only'] = 0:
- gs 'shoe_attributes', 'moncheri', i
- gs 'shoes', 'shoe_filter'
- !!sort by filter
- if (Shofilter['quality'] = 0 and ShoQuality = clo_i) or Shofilter['number'] = 0:
- if Shofilter['inc'] = 1 and Shofilter['only'] = 1:
- *P dyneval($shoe_list_line, $ARGS[1], 'moncheri', i)
- end
- end
- end
- i += 1
- if i <= ARRSIZE('moncheri_shoe'):jump 'loopmoncheri_shoe'
- i = 1
- :loopcats_shoe
- if cats_shoe_s[i] = sloc and cats_shoe[i] = 1 and Shofilter['sport_only'] = 0:
- gs 'shoe_attributes', 'cats', i
- gs 'shoes', 'shoe_filter'
- !!sort by filter
- if (Shofilter['quality'] = 0 and ShoQuality = clo_i) or Shofilter['number'] = 0:
- if Shofilter['inc'] = 1 and Shofilter['only'] = 1:
- *P dyneval($shoe_list_line, $ARGS[1], 'cats', i)
- end
- end
- end
- i += 1
- if i <= ARRSIZE('cats_shoe'):jump 'loopcats_shoe'
- i = 1
- :loopbomba_shoe
- if bomba_shoe_s[i] = sloc and bomba_shoe[i] = 1 and Shofilter['sport_only'] = 0:
- gs 'shoe_attributes', 'bomba', i
- gs 'shoes', 'shoe_filter'
- !!sort by filter
- if (Shofilter['quality'] = 0 and ShoQuality = clo_i) or Shofilter['number'] = 0:
- if Shofilter['inc'] = 1 and Shofilter['only'] = 1:
- *P dyneval($shoe_list_line, $ARGS[1], 'bomba', i)
- end
- end
- end
- i += 1
- if i <= ARRSIZE('bomba_shoe'):jump 'loopbomba_shoe'
- i = 1
- :loopdolls_shoe
- if dolls_shoe_s[i] = sloc and dolls_shoe[i] = 1 and Shofilter['sport_only'] = 0:
- gs 'shoe_attributes', 'dolls', i
- gs 'shoes', 'shoe_filter'
- !!sort by filter
- if (Shofilter['quality'] = 0 and ShoQuality = clo_i) or Shofilter['number'] = 0:
- if Shofilter['inc'] = 1 and Shofilter['only'] = 1:
- *P dyneval($shoe_list_line, $ARGS[1], 'dolls', i)
- end
- end
- end
- i += 1
- if i <= ARRSIZE('dolls_shoe'):jump 'loopdolls_shoe'
- i = 1
- :loopgm_shoe
- if gm_shoe_s[i] = sloc and gm_shoe[i] = 1 and Shofilter['sport_only'] = 0:
- gs 'shoe_attributes', 'gm', i
- gs 'shoes', 'shoe_filter'
- !!sort by filter
- if (Shofilter['quality'] = 0 and ShoQuality = clo_i) or Shofilter['number'] = 0:
- if Shofilter['inc'] = 1 and Shofilter['only'] = 1:
- *P dyneval($shoe_list_line, $ARGS[1], 'gm', i)
- end
- end
- end
- i += 1
- if i <= ARRSIZE('gm_shoe'):jump 'loopgm_shoe'
- i = 1
- :looperoto_shoe
- if eroto_shoe_s[i] = sloc and eroto_shoe[i] = 1 and Shofilter['sport_only'] = 0:
- gs 'shoe_attributes', 'eroto', i
- gs 'shoes', 'shoe_filter'
- !!sort by filter
- if (Shofilter['quality'] = 0 and ShoQuality = clo_i) or Shofilter['number'] = 0:
- if Shofilter['inc'] = 1 and Shofilter['only'] = 1:
- *P dyneval($shoe_list_line, $ARGS[1], 'eroto', i)
- end
- end
- end
- i += 1
- if i <= ARRSIZE('eroto_shoe'):jump 'looperoto_shoe'
- i = 1
- :loopscandalicious_shoe
- if scandalicious_shoe_s[i] = sloc and scandalicious_shoe[i] = 1 and Shofilter['sport_only'] = 0:
- gs 'shoe_attributes', 'scandalicious', i
- gs 'shoes', 'shoe_filter'
- !!sort by filter
- if (Shofilter['quality'] = 0 and ShoQuality = clo_i) or Shofilter['number'] = 0:
- if Shofilter['inc'] = 1 and Shofilter['only'] = 1:
- *P dyneval($shoe_list_line, $ARGS[1], 'scandalicious', i)
- end
- end
- end
- i += 1
- if i <= ARRSIZE('scandalicious_shoe'):jump 'loopscandalicious_shoe'
- i = 1
- :loopdanilovich_shoe
- if danilovich_shoe_s[i] = sloc and danilovich_shoe[i] = 1 and Shofilter['sport'] = 0:
- gs 'shoe_attributes', 'danilovich', i
- gs 'shoes', 'shoe_filter'
- !!sort by filter
- if (Shofilter['quality'] = 0 and ShoQuality = clo_i) or Shofilter['number'] = 0:
- if Shofilter['inc'] = 1 and Shofilter['only'] = 1:
- *P dyneval($shoe_list_line, $ARGS[1], 'danilovich', i)
- end
- end
- end
- i += 1
- if i <= ARRSIZE('danilovich_shoe'):jump 'loopdanilovich_shoe'
- clo_i += 1
- if Shofilter['quality'] = 0 and clo_i <= 7:
- jump 'loopshoequality_filter'
- end
- '</table></center>'
- killvar '$temp_bcolor'
- end
- if $ARGS[0] = 'moncheri':
- *P FUNC('$attributes_moncheri_shoes', $ARGS[0], ARGS[1])
- elseif $ARGS[0] = 'cats':
- *P FUNC('$attributes_cats_shoes', $ARGS[0], ARGS[1])
- elseif $ARGS[0] = 'bomba':
- *P FUNC('$attributes_bomba_shoes', $ARGS[0], ARGS[1])
- elseif $ARGS[0] = 'dolls':
- *P FUNC('$attributes_dolls_shoes', $ARGS[0], ARGS[1])
- elseif $ARGS[0] = 'gm':
- *P FUNC('$attributes_gm_shoes', $ARGS[0], ARGS[1])
- elseif $ARGS[0] = 'eroto':
- *P FUNC('$attributes_eroto_shoes', $ARGS[0], ARGS[1])
- elseif $ARGS[0] = 'scandalicious':
- *P FUNC('$attributes_scandalicious_shoes', $ARGS[0], ARGS[1])
- elseif $ARGS[0] = 'danilovich':
- *P FUNC('$attributes_danilovich_shoes', $ARGS[0], ARGS[1])
- end
- if $ARGS[0] = 'gym':
- if $regularwornshoetype = '':
- $regularwornshoetype = $shoeworntype
- regularwornshoenumber = shoewornnumber
- end
- '<center><img src="images/locations/city/citycenter/mall/sports.png"></center>'
- i = 1
- :loopdanilovich_shoe2
- if danilovich_shoe[i] = 1 and danilovich_shoe_s[i] = 0:'<a href="exec:gt ''shoes'', ''view_shoe_item'', ''wardrobe'', ''danilovich'', <<i>>"><img src="images/pc/items/danilovich/shoes/<<i>>.jpg" height="250" /></a>'
- i += 1
- if i <= 40:jump 'loopdanilovich_shoe2'
- act 'Return': gt $loc, $loc_arg
- if $shoeworntype ! $regularwornshoetype: gs 'shoes', 'gym2'
- end
- if $ARGS[0] = 'gym2':
- act 'Put your regular shoes back on':
- $shoeworntype = $regularwornshoetype
- shoewornnumber = regularwornshoenumber
- killvar '$regularwornshoetype'
- killvar 'regularwornshoenumber'
- gt 'shoes', 'gym'
- end
- end
- if $ARGS[0] = 'view_shoe_item':
- !! ARGS 0 - view_shoe_item
- !! ARGS 1 = action type (wardrobe, shop, sell)
- !! ARGS 2 - shoes type
- !! ARGS 3 - shoes index
- !! ARGS 4 - price for shop
- cla
- '<center><img src="<<FUNC(''$shoe_image'', $ARGS[2], ARGS[3])>>"></center>'
- gs 'shoe_attributes', $ARGS[2], ARGS[3]
- FUNC('$shoe_description', $ARGS[2]) + '<<ARGS[3]>>'
- *nl
- FUNC('$shoe_description2', $ARGS[2])
- *nl
- if ShoStyle = 1:'This shoe is considered stripper style and most suitable for stripping or whoring.'
- if ShoStyle = 2:'This shoe is considered bimbo style and makes your mind drift toward sexual thoughts.'
- if ShoStyle = 3:'This shoe is considered alternative style and makes you feel more assertive and aggressive.'
- if $ARGS[1] = 'shop':
- if dyneval('RESULT = <<$ARGS[2]>>_shoe[<<ARGS[3]>>]') = 1:
- 'You already own these shoes.'
- act 'Leave': gt $loc, $loc_arg
- else
- price = ('<<ARGS[4]>>' * ((5 * ShoQuality) + 100) / 100) * 1000 / (1250 - Clothingstock[ARGS[3]]) * 3 / 2
- price = price / 50 * 50
- 'Price: <<price>> <b>₽</b>'
- act 'Leave': gt $loc, $loc_arg
- if money >= Price:
- act 'Buy (cash)':
- h = 0
- if ShoStyle = 2:h = 10
- if ShoStyle = 5:h = 20
- h += (3 * ShoQuality)
- money -= price
- dynamic '<<$ARGS[2]>>_shoe[<<ARGS[3]>>] = 1'
- gt $loc, $loc_arg
- end
- else
- 'You do not have enough cash to buy these shoes.'
- end
- if karta + bankDebtLimit >= price:
- act 'Buy (card)':
- h = 0
- if ShoStyle = 2:h = 10
- if ShoStyle = 5:h = 20
- h += (3 * ShoQuality)
- karta -= price
- dynamic '<<$ARGS[2]>>_shoe[<<ARGS[3]>>] = 1'
- gt $loc, $loc_arg
- end
- end
- if karta + bankDebtLimit < Price and money < Price:
- 'You do not have enough money to buy these shoes.'
- end
- end
- elseif $ARGS[1] = 'wardrobe':
- if $regularwornshoetype = '':
- act 'Leave in closet':gt 'shoes', 'view_shoe_list', $ARGS[1]
- else
- act 'Return': gt 'shoes', 'gym'
- end
- act 'Wear':
- gs 'shoes', 'wear', $ARGS[2], ARGS[3]
- if $regularwornshoetype = '':
- gt 'wardrobe', 'main'
- else
- gt 'shoes', 'gym'
- end
- end
- elseif $ARGS[1] = 'store' or $ARGS[1] = 'unwanted':
- act 'Return':gt 'shoes', 'view_shoe_list', $ARGS[1]
- end
- end
- if $ARGS[0] = 'strip':
- if $shoeworntype = 'none': exit
- $lastwornshoetype = $shoeworntype
- lastwornshoenumber = shoewornnumber
- $shoeworntype = 'none'
- shoewornnumber = 0
- ShoQuality = 0
- ShoHeels = 0
- ShoCut = 0
- ShoStyle = 0
- PShoQuality = 0
- PShoHeels = 0
- PShoCut = 0
- PShoStyle = 0
- end
- if $ARGS[0] = 'setup':
- end
-
- if $ARGS[0] = 'wear':
- !! ARGS 0 - action
- !! ARGS 1 - shoe type name / last worn
- !! ARGS 2 - shoe index
- if $ARGS[1] = 'last_worn':
- $shoeworntype = $lastwornshoetype
- shoewornnumber = lastwornshoenumber
- else
- $shoeworntype = $ARGS[1]
- shoewornnumber = ARGS[2]
- end
- if $shoeworntype = 'none':
- PShoQuality = 0
- PShoCut = 0
- PShoHeels = 0
- PShoStyle = 0
- exit
- end
- gs 'shoe_attributes', $ARGS[1], ARGS[2]
- dynamic '<<$ARGS[1]>>_shoe_s[<<ARGS[2]>>] = 0'
- PShoQuality = ShoQuality
- PShoHeels = ShoHeels
- PShoCut = ShoCut
- PShoStyle = ShoStyle
- !Calculations for shoes beauty, multiplied by natural beauty
- if PShoHeels > 0:
- if PShoHeels = 1:
- PXShoHeels = 25
- elseif PShoHeels = 2:
- PXShoHeels = 50
- elseif PShoHeels = 3:
- PXShoHeels = 100
- elseif PShoHeels = 4:
- PXShoHeels = 150
- elseif PShoHeels = 5:
- PXShoHeels = 200
- elseif PShoHeels = 6:
- PXShoHeels = 300
- elseif PShoHeels >= 7:
- PXShoHeels = 400
- end
- end
- end
- if $ARGS[0] = 'filter_header':
- !! exclude filters
- $Headerstring = '<TD>'
- if Shofilter['sport'] = 0:
- $Headerstring += '<a href="exec:Shofilter[''sport''] = 1 & Shofilter[''sport_only''] = 0 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/sport.png"></a></TD>'
- else
- $Headerstring += '<a href="exec:Shofilter[''sport''] = 0 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/sport_off.png"></a></TD>'
- end
- $Headerstring += '<TD>'
- if Shofilter['stripper'] = 0:
- $Headerstring += '<a href="exec:Shofilter[''stripper''] = 1 & Shofilter[''stripper_only''] = 0 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/stripper.png"></a></TD>'
- else
- $Headerstring += '<a href="exec:Shofilter[''stripper''] = 0 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/stripper_off.png"></a></TD>'
- end
- $Headerstring += '<TD>'
- if Shofilter['bimbo'] = 0:
- $Headerstring += '<a href="exec:Shofilter[''bimbo''] = 1 & Shofilter[''bimbo_only''] = 0 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/bimbo.png"></a></TD>'
- else
- $Headerstring += '<a href="exec:Shofilter[''bimbo''] = 0 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/bimbo_off.png"></a></TD>'
- end
- $Headerstring += '<TD>'
- if Shofilter['alternative'] = 0:
- $Headerstring += '<a href="exec:Shofilter[''alternative''] = 1 & Shofilter[''alternative_only''] = 0 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/alternative.png"></a></TD>'
- else
- $Headerstring += '<a href="exec:Shofilter[''alternative''] = 0 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/alternative_off.png"></a></TD>'
- end
- !! sort by filters
- $Headerstring += '<TD>'
- if Shofilter['number'] = 0:
- Shofilter['quality'] = 1
- $Headerstring += '<img src="images/system/icons/clothing/number.png"></TD>'
- else
- $Headerstring += '<a href="exec:Shofilter[''number''] = 0 & Shofilter[''quality''] = 1 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/number_off.png"></a></TD>'
- end
-
- $Headerstring += '<TD>'
- if Shofilter['quality'] = 0:
- $Headerstring += '<img src="images/system/icons/clothing/quality.png"></TD>'
- else
- $Headerstring += '<a href="exec:Clo_i = 0 & Shofilter[''quality''] = 0 & Shofilter[''number''] = 1 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/quality_off.png"></a></TD>'
- end
- !! Show only filers
- $Headerstring[1] = '<TD>'
- if Shofilter['sport_only'] = 0:
- $Headerstring[1] += '<a href="exec:Shofilter[''sport_only''] = 1 & Shofilter[''sport''] = 0 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/sport_off.png"></a></TD>'
- else
- $Headerstring[1] += '<a href="exec:Shofilter[''sport_only''] = 0 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/sport.png"></a></TD>'
- end
- $Headerstring[1] += '<TD>'
- if Shofilter['stripper_only'] = 0:
- $Headerstring[1] += '<a href="exec:Shofilter[''stripper_only''] = 1 & Shofilter[''stripper''] = 0 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/stripper_off.png"></a></TD>'
- else
- $Headerstring[1] += '<a href="exec:Shofilter[''stripper_only''] = 0 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/stripper.png"></a></TD>'
- end
- $Headerstring[1] += '<TD>'
- if Shofilter['bimbo_only'] = 0:
- $Headerstring[1] += '<a href="exec:Shofilter[''bimbo_only''] = 1 & Shofilter[''bimbo''] = 0 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/bimbo_off.png"></a></TD>'
- else
- $Headerstring[1] += '<a href="exec:Shofilter[''bimbo_only''] = 0 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/bimbo.png"></a></TD>'
- end
- $Headerstring[1] += '<TD>'
- if Shofilter['alternative_only'] = 0:
- $Headerstring[1] += '<a href="exec:Shofilter[''alternative_only''] = 1 & Shofilter[''alternative''] = 0 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/alternative_off.png"></a></TD>'
- else
- $Headerstring[1] += '<a href="exec:Shofilter[''alternative_only''] = 0 & gt ''shoes'', ''view_shoe_list''"><img src="images/system/icons/clothing/alternative.png"></a></TD>'
- end
- $Headerstring[2] = '<TH>Include</TH><TH></TH><TH></TH><TH></TH><TH>Sort by</TH><TH></TH>'
- $Headerstring[3] = '<TH>Only show</TH>'
- '<center><table><<$Headerstring[2]>>'
- '<TR><border=1><<$Headerstring>>'
- '<TR><border=0><<$Headerstring[3]>>'
- '<TR><border=1><<$Headerstring[1]>></table></center>'
- end
- if $ARGS[0] = 'shoe_filter':
- !!Exclude filters
- Shofilter['inc'] = 1
- !!filters, if inc set to 0 they will not display
- if Shofilter['stripper'] = 1 and ShoStyle = 1:
- Shofilter['inc'] = 0
- end
- !!filters, if inc set to 0 they will not display
- if Shofilter['bimbo'] = 1 and ShoStyle = 2:
- Shofilter['inc'] = 0
- end
- !!filters, if inc set to 0 they will not display
- if Shofilter['alternative'] = 1 and ShoStyle = 3:
- Shofilter['inc'] = 0
- end
- !!only filters
- Shofilter['only'] = 0
- !!filters, if only set to 1 they will only display those set
- if Shofilter['stripper_only'] = 1 and ShoStyle = 1:
- Shofilter['only'] += 1
- end
- if Shofilter['bimbo_only'] = 1 and ShoStyle = 2:
- Shofilter['only'] += 1
- end
- if Shofilter['alternative_only'] = 1 and ShoStyle = 3:
- Shofilter['only'] += 1
- end
- !!Check total count to make sure it fits all groups selected
- if Shofilter['only'] = Shofilter['stripper_only'] + Shofilter['bimbo_only'] + Shofilter['alternative_only']:
- Shofilter['only'] = 1
- else
- Shofilter['only'] = 0
- end
- end
- if $ARGS[0] = 'shop_filter_header':
- !! exclude filters
- $Headerstring = '<TD>'
- if Shofilter['stripper'] = 0:
- $Headerstring += '<a href="exec:Shofilter[''stripper''] = 1 & Shofilter[''stripper_only''] = 0 & gt $loc, $loc_arg"><img src="images/system/icons/clothing/stripper.png"></a></TD>'
- else
- $Headerstring += '<a href="exec:Shofilter[''stripper''] = 0 & gt $loc, $loc_arg"><img src="images/system/icons/clothing/stripper_off.png"></a></TD>'
- end
- $Headerstring += '<TD>'
- if Shofilter['bimbo'] = 0:
- $Headerstring += '<a href="exec:Shofilter[''bimbo''] = 1 & Shofilter[''bimbo_only''] = 0 & gt $loc, $loc_arg"><img src="images/system/icons/clothing/bimbo.png"></a></TD>'
- else
- $Headerstring += '<a href="exec:Shofilter[''bimbo''] = 0 & gt $loc, $loc_arg"><img src="images/system/icons/clothing/bimbo_off.png"></a></TD>'
- end
- $Headerstring += '<TD>'
- if Shofilter['alternative'] = 0:
- $Headerstring += '<a href="exec:Shofilter[''alternative''] = 1 & Shofilter[''alternative_only''] = 0 & gt $loc, $loc_arg"><img src="images/system/icons/clothing/alternative.png"></a></TD>'
- else
- $Headerstring += '<a href="exec:Shofilter[''alternative''] = 0 & gt $loc, $loc_arg"><img src="images/system/icons/clothing/alternative_off.png"></a></TD>'
- end
- !! sort by filters
- $Headerstring += '<TD>'
- if Shofilter['number'] = 0:
- Shofilter['quality'] = 1
- $Headerstring += '<img src="images/system/icons/clothing/number.png"></TD>'
- else
- $Headerstring += '<a href="exec:Shofilter[''number''] = 0 & Shofilter[''quality''] = 1 & Shofilter[''inhibition''] = 1 & gt $loc, $loc_arg"><img src="images/system/icons/clothing/number_off.png"></a></TD>'
- end
-
- $Headerstring += '<TD>'
- if Shofilter['quality'] = 0:
- $Headerstring += '<img src="images/system/icons/clothing/quality.png"></TD>'
- else
- $Headerstring += '<a href="exec:Shofilter[''quality''] = 0 & Shofilter[''number''] = 1 & gt $loc, $loc_arg"><img src="images/system/icons/clothing/quality_off.png"></a></TD>'
- end
- !! Show only filers
- $Headerstring[1] = '<TD>'
- if Shofilter['stripper_only'] = 0:
- $Headerstring[1] += '<a href="exec:Shofilter[''stripper_only''] = 1 & Shofilter[''stripper''] = 0 & gt $loc, $loc_arg"><img src="images/system/icons/clothing/stripper_off.png"></a></TD>'
- else
- $Headerstring[1] += '<a href="exec:Shofilter[''stripper_only''] = 0 & gt $loc, $loc_arg"><img src="images/system/icons/clothing/stripper.png"></a></TD>'
- end
- $Headerstring[1] += '<TD>'
- if Shofilter['bimbo_only'] = 0:
- $Headerstring[1] += '<a href="exec:Shofilter[''bimbo_only''] = 1 & Shofilter[''bimbo''] = 0 & gt $loc, $loc_arg"><img src="images/system/icons/clothing/bimbo_off.png"></a></TD>'
- else
- $Headerstring[1] += '<a href="exec:Shofilter[''bimbo_only''] = 0 & gt $loc, $loc_arg"><img src="images/system/icons/clothing/bimbo.png"></a></TD>'
- end
- $Headerstring[1] += '<TD>'
- if Shofilter['alternative_only'] = 0:
- $Headerstring[1] += '<a href="exec:Shofilter[''alternative_only''] = 1 & Shofilter[''alternative''] = 0 & gt $loc, $loc_arg"><img src="images/system/icons/clothing/alternative_off.png"></a></TD>'
- else
- $Headerstring[1] += '<a href="exec:Shofilter[''alternative_only''] = 0 & gt $loc, $loc_arg"><img src="images/system/icons/clothing/alternative.png"></a></TD>'
- end
- $Headerstring[2] = '<TH>Include</TH><TH></TH><TH></TH><TH>Sort by</TH><TH></TH>'
- $Headerstring[3] = '<TH>Only show</TH>'
- '<center><table><<$Headerstring[2]>>'
- '<TR><border=1><<$Headerstring>>'
- '<TR><border=0><<$Headerstring[3]>>'
- '<TR><border=1><<$Headerstring[1]>></table></center>'
- end
- if $ARGS[0] = 'shop_filter':
- !!Exclude filters
- Shofilter['inc'] = 1
- !!filters, if inc set to 0 they will not display
- if Shofilter['stripper'] = 1 and ShoStyle = 1:
- Shofilter['inc'] = 0
- end
- !!filters, if inc set to 0 they will not display
- if Shofilter['bimbo'] = 1 and ShoStyle = 2:
- Shofilter['inc'] = 0
- end
- !!filters, if inc set to 0 they will not display
- if Shofilter['alternative'] = 1 and ShoStyle = 3:
- Shofilter['inc'] = 0
- end
- !!only filters
- Shofilter['only'] = 0
- !!filters, if only set to 1 they will only display those set
- if Shofilter['stripper_only'] = 1 and ShoStyle = 1:
- Shofilter['only'] += 1
- end
- if Shofilter['bimbo_only'] = 1 and ShoStyle = 2:
- Shofilter['only'] += 1
- end
- if Shofilter['alternative_only'] = 1 and ShoStyle = 3:
- Shofilter['only'] += 1
- end
- !!Check total count to make sure it fits all groups selected
- if Shofilter['only'] = Shofilter['stripper_only'] + Shofilter['bimbo_only'] + Shofilter['alternative_only']:
- Shofilter['only'] = 1
- else
- Shofilter['only'] = 0
- end
- end
- --- shoes ---------------------------------
|