qwIzoldaApp - clean the code

locations/qwIzoldaApp

@@ -1,138 +1,127 @@
 # qwIzoldaApp
-minut += 15
-gs 'stat'
+if $ARGS[0] = '':
+	$location_type = 'private'
+	minut += 15
+	gs 'stat'
+	gs 'boyStat', 'A111'
+	if hour >= 16 and izoldaday ! daystart:
+		'<center><b><font color="maroon">Isolda</font></b></center>'
+		'<center><img <<$set_imgh>> src="images/characters/city/isolde/izolda.jpg"></center>'
+		'Door you opened Isolde. "Hello <<$pcs_nickname>>, come on."'
 
-if hour >= 16 and izoldaday ! daystart:
-	'<center><b><font color="maroon">Isolda</font></b></center>'
-	'<center><img <<$set_imgh>> src="images/characters/city/isolde/izolda.jpg"></center>'
-	'Door you opened Isolde. "Hello <<$pcs_nickname>>, come on."'
+		act 'Leave':gt 'down'
 
-	act 'Leave':gt 'down'
+		act 'Enter the apartment':
+			cla
+			minut += 30
+			izoldaday = daystart
+			izoldaQW += 1
+			gs 'stat'
+
+			if izoldaQW < 5:
+				'You went to the apartment and Isolde you spent in the kitchen. There she poured tea, and you yourself. You sat at the table and began to chat about all sorts of trivia.'
+			elseif izoldaQW >= 5 and izoldaSex = 0:
+				'Isolde suggested that you drink wine. You agreed and went to the kitchen. Isolde opened a bottle of wine and poured two glasses. You drank it.'
+
+				if izoldaQW >= 10 and izoldaSex = 0:
+					'Soon you both drunk and Isolde invited you to go to the lounge to relax.'
+
+					act 'Go Isolde':
+						*clr & cla
+						npc_sex[$boy] += 1
+						izoldaSex = 1
+						'<center><img <<$set_imgh>> src="images/characters/city/isolde/sex/izoldasex.jpg"></center>'
+						'The room suddenly Isolde you kissed and hugged her gently.'
+						gs 'arousal', 'kiss', 5, 'lesbian'
+						gs 'stat'
 
-	act 'Enter the apartment':
-		cla
-		minut += 30
-		izoldaday = daystart
-		izoldaQW += 1
-		gs 'stat'
+						act 'Kiss Isolde':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/characters/city/isolde/sex/izoldasex1.jpg"></center>'
+							'Isolde''s head gently slipped from your lips to your breasts and began to caress them.'
+							gs 'arousal', 'kiss', 5, 'lesbian'
+							gs 'arousal', 'foreplay', 5, 'lesbian'
+							minut -= 5
+							gs 'stat'
 
-		if izoldaQW < 5:
-			'You went to the apartment and Isolde you spent in the kitchen. There she poured tea, and you yourself. You sat at the table and began to chat about all sorts of trivia.'
-		elseif izoldaQW >= 5 and izoldaSex = 0:
-			'Isolde suggested that you drink wine. You agreed and went to the kitchen. Isolde opened a bottle of wine and poured two glasses. You drank it.'
+							act '...':
+								*clr & cla
+								'<center><img <<$set_imgh>> src="images/characters/city/isolde/sex/izoldasex2.jpg"></center>'
+								'Isolde you dropped on the couch and gently kisses covering section. Once you lay down on her back, she began to lick your pussy.'
+								gs 'arousal', 'cuni', 5, 'lesbian'
+								gs 'stat'
 
-			if izoldaQW >= 10 and izoldaSex = 0:
-				'Soon you both drunk and Isolde invited you to go to the lounge to relax.'
+								act '...':
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/characters/city/isolde/sex/izoldasex3.jpg"></center>'
+									'Blonde turned and climbed on you without stopping to lick your pussy. She throw the leg over you up her sweaty and expiring juices crack for sex. You started to caress her clitoris tongue and kiss her luscious lips, finally you both shook orgasm.'
+									$orgasm_or = 'yes'
+									gs 'arousal', 'cuni', 10, 'lesbian'
+									gs 'arousal', 'cuni_give', 10, 'lesbian'
+									minut -= 10
+									gs 'arousal', 'end'
+									gs 'stat'
+
+									act 'Leave':gt 'down'
+								end
+							end
+						end
+					end
+				end
+			elseif izoldaSex > 0:
+				'Isolde offer you a drink of wine and you have gone with her to the kitchen, drinking a bottle she took you by the hand and led her into the room.'
 
 				act 'Go Isolde':
-					cls
-					girl += 1
-					izoldaSex = 1
-					gs 'stat'
+					*clr & cla
+					izoldaSex += 1
+					npc_sex[$boy] += 1
 					'<center><img <<$set_imgh>> src="images/characters/city/isolde/sex/izoldasex.jpg"></center>'
 					'The room suddenly Isolde you kissed and hugged her gently.'
-					
 					gs 'arousal', 'kiss', 5, 'lesbian'
 					gs 'stat'
 
 					act 'Kiss Isolde':
-						cls
-						gs 'stat'
+						*clr & cla
 						'<center><img <<$set_imgh>> src="images/characters/city/isolde/sex/izoldasex1.jpg"></center>'
 						'Isolde''s head gently slipped from your lips to your breasts and began to caress them.'
-
 						gs 'arousal', 'kiss', 5, 'lesbian'
 						gs 'arousal', 'foreplay', 5, 'lesbian'
 						minut -= 5
 						gs 'stat'
-					
+
 						act '...':
-							cls
+							*clr & cla
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/characters/city/isolde/sex/izoldasex2.jpg"></center>'
 							'Isolde you dropped on the couch and gently kisses covering section. Once you lay down on her back, she began to lick your pussy.'
-
 							gs 'arousal', 'cuni', 5, 'lesbian'
 							gs 'stat'
-					
+
 							act '...':
-								cls
-								gs 'stat'
+								*clr & cla
 								'<center><img <<$set_imgh>> src="images/characters/city/isolde/sex/izoldasex3.jpg"></center>'
 								'Blonde turned and climbed on you without stopping to lick your pussy. She throw the leg over you up her sweaty and expiring juices crack for sex. You started to caress her clitoris tongue and kiss her luscious lips, finally you both shook orgasm.'
-
 								$orgasm_or = 'yes'
 								gs 'arousal', 'cuni', 10, 'lesbian'
 								gs 'arousal', 'cuni_give', 10, 'lesbian'
 								minut -= 10
 								gs 'arousal', 'end'
 								gs 'stat'
-								
+
 								act 'Leave':gt 'down'
 							end
 						end
 					end
 				end
 			end
-		elseif izoldaSex > 0:
-			'Isolde offer you a drink of wine and you have gone with her to the kitchen, drinking a bottle she took you by the hand and led her into the room.'
-
-			act 'Go Isolde':
-				cls
-				izoldaSex += 1
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/characters/city/isolde/sex/izoldasex.jpg"></center>'
-				'The room suddenly Isolde you kissed and hugged her gently.'
-				
-				gs 'arousal', 'kiss', 5, 'lesbian'
-				gs 'stat'
-
-				act 'Kiss Isolde':
-					cls
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/city/isolde/sex/izoldasex1.jpg"></center>'
-					'Isolde''s head gently slipped from your lips to your breasts and began to caress them.'
-
-					gs 'arousal', 'kiss', 5, 'lesbian'
-					gs 'arousal', 'foreplay', 5, 'lesbian'
-					minut -= 5
-					gs 'stat'
-						
-					act '...':
-						cls
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/city/isolde/sex/izoldasex2.jpg"></center>'
-						'Isolde you dropped on the couch and gently kisses covering section. Once you lay down on her back, she began to lick your pussy.'
 
-						gs 'arousal', 'cuni', 5, 'lesbian'
-						gs 'stat'
-							
-						act '...':
-							cls
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/characters/city/isolde/sex/izoldasex3.jpg"></center>'
-							'Blonde turned and climbed on you without stopping to lick your pussy. She throw the leg over you up her sweaty and expiring juices crack for sex. You started to caress her clitoris tongue and kiss her luscious lips, finally you both shook orgasm.'
-
-							$orgasm_or = 'yes'
-							gs 'arousal', 'cuni', 10, 'lesbian'
-							gs 'arousal', 'cuni_give', 10, 'lesbian'
-							minut -= 10
-							gs 'arousal', 'end'
-							gs 'stat'
-								
-							act 'Leave':gt 'down'
-						end
-					end
-				end
-			end
+			act 'Leave':gt 'down'
 		end
+	else
+		'You rang the bell but no one answered you.'
 
 		act 'Leave':gt 'down'
 	end
-else
-	'You rang the bell but no one answered you.'
-
-	act 'Leave':gt 'down'
 end
 
 --- qwIzoldaApp ---------------------------------