123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232 |
- # portnoi2
- <<<<<<< 486_portnoi2
- set poshvalldrop = 0
- set o = 0
- :jensmet
- set o += 1
- if jeans[o] = 1 and jeansB[o]!bedra: set poshvalldrop += 1
- if o ! 5: jump 'jensmet'
- set o = 0
- :shortmet
- set o += 1
- if short[o] = 1 and shortB[o]!bedra: set poshvalldrop += 1
- if o ! 5: jump 'shortmet'
- set o = 0
- :skirtmet
- set o += 1
- if skirt[o] = 1 and skirtB[o]!bedra: set poshvalldrop += 1
- if o ! 5: jump 'skirtmet'
- set o = 0
- :dressmet
- set o += 1
- if dress[o] = 1 and dressB[o]!bedra: set poshvalldrop += 1
- if o ! 24: jump 'dressmet'
- set o = 0
- :profimet
- set o += 1
- if profi[o] = 1 and profiB[o]!bedra: set poshvalldrop += 1
- if o ! 2: jump 'profimet'
- set o = 0
- :pantsmet
- set o += 1
- if pants[o] = 1 and pantsB[o]!bedra: set poshvalldrop += 1
- if o ! 5: jump 'pantsmet'
- set o = 0
- :latexmet
- set o += 1
- if latex[o] = 1 and latexB[o]!bedra: set poshvalldrop += 1
- if o ! 2: jump 'latexmet'
- set o = 0
- :hookermet
- set o += 1
- if hooker[o] = 1 and hookerB[o]!bedra: set poshvalldrop += 1
- if o ! 5: jump 'hookermet'
- set o = 0
- :odekismet
- set o += 1
- if odekis[o] = 1 and odekisB[o]!bedra: set poshvalldrop += 1
- if o ! 10: jump 'odekismet'
- set o = 0
- :newclomet
- set o += 1
- if newclo[o] = 1 and newcloB[o]!bedra: set poshvalldrop += 1
- if o ! 130: jump 'newclomet'
- set o = 0
- if money < poshvalldrop*500:
- 'Do you have enough money, the cost ushivki all clothing <<poshvalldrop*500>> rub.'
- act 'QUIT': gt 'clener','start'
- exit
- end
- if money >= poshvalldrop * 500:
- set money -= poshvalldrop * 500
- set o = 0
- :jensmet1
- set o += 1
- if jeans[o] = 1 and jeansB[o]!bedra: set jeansB[o] = bedra
- if o ! 5: jump 'jensmet1'
- set o = 0
- :shortmet1
- set o += 1
- if short[o] = 1 and shortB[o]!bedra: set shortB[o] = bedra
- if o ! 5: jump 'shortmet1'
- set o = 0
- :skirtmet1
- set o += 1
- if skirt[o] = 1 and skirtB[o]!bedra: set skirtB[o] = bedra
- if o ! 5: jump 'skirtmet1'
- set o = 0
- :dressmet1
- set o += 1
- if dress[o] = 1 and dressB[o]!bedra: set dressB[o] = bedra
- if o ! 24: jump 'dressmet1'
- set o = 0
- :profimet1
- set o += 1
- if profi[o] = 1 and profiB[o]!bedra: set profiB[o] = bedra
- if o ! 2: jump 'profimet1'
- set o = 0
- :pantsmet1
- set o += 1
- if pants[o] = 1 and pantsB[o]!bedra: set pantsB[o] = bedra
- if o ! 5: jump 'pantsmet1'
- set o = 0
- :latexmet1
- set o += 1
- if latex[o] = 1 and latexB[o]!bedra: set latexB[o] = bedra
- if o ! 2: jump 'latexmet1'
- set o = 0
- :hookermet1
- set o += 1
- if hooker[o] = 1 and hookerB[o]!bedra: set hookerB[o] = bedra
- if o ! 5: jump 'hookermet1'
- set o = 0
- :odekismet1
- set o += 1
- if odekis[o] = 1 and odekisB[o]!bedra: set odekisB[o] = bedra
- if o ! 10: jump 'odekismet1'
- set o = 0
- :newclomet1
- set o += 1
- if newclo[o] = 1 and newcloB[o]!bedra: set newcloB[o] = bedra
- if o ! 130: jump 'newclomet1'
- 'You ushili all clothing for <<poshvalldrop*500>> rub.'
- act 'QUIT': gt 'clener','start'
- exit
- end
- =======
- set poshvalldrop=0
- set o=0
- :jensmet
- set o+=1
- if jeans[o]=1 and jeansB[o]!bedra:set poshvalldrop+=1
- if o!5:jump'jensmet'
- set o=0
- :shortmet
- set o+=1
- if short[o]=1 and shortB[o]!bedra:set poshvalldrop+=1
- if o!5:jump'shortmet'
- set o=0
- :skirtmet
- set o+=1
- if skirt[o]=1 and skirtB[o]!bedra:set poshvalldrop+=1
- if o!5:jump'skirtmet'
- set o=0
- :dressmet
- set o+=1
- if dress[o]=1 and dressB[o]!bedra:set poshvalldrop+=1
- if o!24:jump'dressmet'
- set o=0
- :profimet
- set o+=1
- if profi[o]=1 and profiB[o]!bedra:set poshvalldrop+=1
- if o!2:jump'profimet'
- set o=0
- :pantsmet
- set o+=1
- if pants[o]=1 and pantsB[o]!bedra:set poshvalldrop+=1
- if o!5:jump'pantsmet'
- set o=0
- :latexmet
- set o+=1
- if latex[o]=1 and latexB[o]!bedra:set poshvalldrop+=1
- if o!2:jump'latexmet'
- set o=0
- :hookermet
- set o+=1
- if hooker[o]=1 and hookerB[o]!bedra:set poshvalldrop+=1
- if o!5:jump'hookermet'
- set o=0
- :odekismet
- set o+=1
- if odekis[o]=1 and odekisB[o]!bedra:set poshvalldrop+=1
- if o!10:jump'odekismet'
- set o=0
- :newclomet
- set o+=1
- if newclo[o]=1 and newcloB[o]!bedra:set poshvalldrop+=1
- if o!130:jump'newclomet'
- set o=0
- if money<poshvalldrop*500:
- 'You do not have enough money, cost ushivki all clothing <<poshvalldrop*500>> RUB.'
- act 'GO_OUT':gt'clener','start'
- exit
- end
- if money>=poshvalldrop*500:
- set money-=poshvalldrop*500
- set o=0
- :jensmet1
- set o+=1
- if jeans[o]=1 and jeansB[o]!bedra:set jeansB[o]=bedra
- if o!5:jump'jensmet1'
- set o=0
- :shortmet1
- set o+=1
- if short[o]=1 and shortB[o]!bedra:set shortB[o]=bedra
- if o!5:jump'shortmet1'
- set o=0
- :skirtmet1
- set o+=1
- if skirt[o]=1 and skirtB[o]!bedra:set skirtB[o]=bedra
- if o!5:jump'skirtmet1'
- set o=0
- :dressmet1
- set o+=1
- if dress[o]=1 and dressB[o]!bedra:set dressB[o]=bedra
- if o!24:jump'dressmet1'
- set o=0
- :profimet1
- set o+=1
- if profi[o]=1 and profiB[o]!bedra:set profiB[o]=bedra
- if o!2:jump'profimet1'
- set o=0
- :pantsmet1
- set o+=1
- if pants[o]=1 and pantsB[o]!bedra:set pantsB[o]=bedra
- if o!5:jump'pantsmet1'
- set o=0
- :latexmet1
- set o+=1
- if latex[o]=1 and latexB[o]!bedra:set latexB[o]=bedra
- if o!2:jump'latexmet1'
- set o=0
- :hookermet1
- set o+=1
- if hooker[o]=1 and hookerB[o]!bedra:set hookerB[o]=bedra
- if o!5:jump'hookermet1'
- set o=0
- :odekismet1
- set o+=1
- if odekis[o]=1 and odekisB[o]!bedra:set odekisB[o]=bedra
- if o!10:jump'odekismet1'
- set o=0
- :newclomet1
- set o+=1
- if newclo[o]=1 and newcloB[o]!bedra:set newcloB[o]=bedra
- if o!130:jump'newclomet1'
- 'You ushili all the clothes for <<poshvalldrop*500>> RUB.'
- act 'GO_OUT':gt'clener','start'
- exit
- end
- >>>>>>> 486_portnoi2
- --- portnoi2 ---------------------------------
|