remove varible "wipo"

locations/FedorMisc.qsrc

@@ -519,7 +519,6 @@ if $ARGS[0] = 'Smoke':
 	gs 'cum_cleanup'
 	pcs_breath = 0
 	pcs_mood += 100
-	wipo += 100
 	gs 'stat'
 	'<center><b><h4><font color="blue"><<"Fyodor [Fedor] Kozlov">></font></h4></b></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/school/hall/smoke.jpg"></center>'
@@ -538,7 +537,6 @@ if $ARGS[0] = 'Smoke 2':
 	gs 'cum_cleanup'
 	pcs_breath = 0
 	pcs_mood += 100
-	wipo += 100
 	gs 'stat'
 	'<center><b><h4><font color="blue"><<"Fyodor [Fedor] Kozlov">></font></h4></b></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/school/hall/smoke.jpg"></center>'

locations/carF.qsrc

@@ -320,7 +320,6 @@ if $ARGS[0] = 'other':
 		benz -= 4
 		teh -= rand(2, 6)
 		pcs_mood += 20
-		wipo += 10
 		'You go to the track and have fun driving around before leaving.'
 
 		act 'Finish':xgt 'carF', 'salon'

locations/danceGev.qsrc

@@ -6,7 +6,6 @@ if lesbian > 0:
 	pcs_horny += 5
 elseif lesbian = 0:
 	pcs_mood += 10
-	wipo += 5
 end
 
 danceevtimes += 1

locations/drugs.qsrc

@@ -29,7 +29,6 @@ if $ARGS[0] = 'smoke':
 	gs 'cum_cleanup'
 	pcs_breath = 0
 	pcs_mood += 100
-	wipo += 100
 	if pcs_hydra >= 100:
 		pcs_hydra -= 5
 	else

locations/sitrPar.qsrc

@@ -43,7 +43,6 @@ if $ARGS[0] = '':
 			minut += 120
 			pcs_sleep = 0
 			pcs_mood += 100
-			wipo += 1000
 			gs 'food', 'l_meal'
 			gs 'stat'
 			'You sit at the festive table laid in front of the TV and celebrate the New Year with your family, the TV providing some background noise. At the table, people strike up a conversation and common problems are forgotten for a while, everyone is having fun talking to each other. At midnight, everyone wishes one another a happy New Year and enjoys the champagne and fireworks outside. Your <<$npc_nickname[''A29'']>> gives you an envelope with a greeting card and 5000 <b>₽</b>. For a while, you continue to watch TV, enjoying the champagne and company of your family, but eventually, everyone is kind of tired and one by one they go to bed.'

locations/stat.qsrc

@@ -30,7 +30,6 @@ if (analplay >= 2 and pcs_ass <= 10) or (analplay >= 4 and pcs_ass <= 15) or (an
 musle[1] = musle
 flex[1] = pcs_agil
 stamina[1] = pcs_vital * 3
-wipo[1] = pcs_sprt
 intel[1] = pcs_intel - bimbostupidity
 krasota[1] = pcs_apprnc
 pcs_hgt[1] = pcs_hgt