Merge branch 'master' of https://git.catrenelle.com/Kevin_Smarts/glife into lurk

locations/IgorHunter.qsrc

@@ -137,8 +137,9 @@ if $ARGS[0] = 'creekside':
                 end
                 
                 act 'Lay back and spread your legs':
+                    cla & *clr
                     '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/5.jpg"></center>'
-                    'Having your nipples teased like this is almost unbearable. You feel your pussy limps getting inflamed, the dampness between your legs growing.'
+                    'Having your nipples teased like this is almost unbearable. You feel your pussy lips getting inflamed, the dampness between your legs growing.'
                     'Laying back, you spread your legs wide and look almost beggingly at Igor, wanting his attention right between them. He does not lose time starting to lick your now burning hot, soaking wet fuckhole'
 
                     gs 'arousal', 'cuni', 10
@@ -208,46 +209,279 @@ if $ARGS[0] = 'creekside':
  
 
     if $ARGS[1] = 'piv':
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/f_1.jpg"></center>'
+        cla & *clr
         '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/f_2.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/f_3.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/f_4.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/f_5.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/f_6.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/f_7.jpg"></center>'
+        'You lean back further as Igor kisses all over your tit, your hand lightly playing with your other breast'
+
+        gs 'arousal', 'breasts', 5
+        gs 'arousal', 'foreplay', 5
+        minut -= 7
+        gs 'stat'
+
+        act 'Jump on Igor''s lap':
+            cla & *clr
+            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/f_5.jpg"></center>'
+            'You sit on Igor''s lap, slowly grinding your ass on his crotch as his dick pokes against your folds, the tip almost dipping into the dampness inside'
+            
+            gs 'arousal', 'foreplay', 5
+            minut -= 2
+            gs 'stat'
+
+            act 'Take him inside you':
+                cla & *clr
+                '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/f_6.jpg"></center>'
+                gs 'dinSex', 'vaginal_sex', 12
+                gs 'stat'
+
+                act 'You start feeling his cock start to twitch inside you':
+                    cla & *clr
+                    '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/f_7.jpg"></center>'
+                    pose = 3
+                    gs 'dinSex', 'sexcum'
+                    gs 'arousal', 'vaginal', 4
+                    gs 'stat'
+                    gs 'arousal', 'end'
+
+                    act 'Further': gt 'backwater'
+                end
+            end
+        end
     end
 end
 
-if $ARGS[0] = 'yard':
-    if $ARGS[0] = '':
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/yard/1.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/yard/2.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/yard/3.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/yard/4.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/yard/5.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/yard/6.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/yard/7.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/yard/8.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/yard/9.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/yard/10.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/yard/11.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/yard/12.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/yard/13.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/yard/14.jpg"></center>'
+if $ARGS[0] = 'cabin':
+    if $ARGS[1] = '' or $ARGS[1] = 'makeout':
+        if $ARGS[2] = '' or $ARGS[2] = 'light':
+            cla & *clr
+            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/cabin_makeout.jpg"></center>'
+            'You are making out with Igor on the couch, your hands roaming over his body as he passionately kisses you'
+            'As you both get more and more heated, you notice Igor''s hands gliding further and further up your thighs'
+
+            gs 'arousal', 'kiss', 6
+            gs 'arousal', 'foreplay', 2
+            minut -= 4
+            gs 'stat'
+
+            act 'You do not want to get carried away':
+                cla
+                'You tell Igor you do not want to do anything more. He keeps kissing you for a couple more minutes but the heat quickly dies down before Igor gives you a final kiss on the cheek and walks away.'
+                gs 'arousal', 'kiss', 2
+                gs 'stat'
+                gs 'arousal', 'end'
+
+                act 'Further': gt 'swamphouse'
+            end
+            
+            act 'Keep making out': gt 'igorhunter', 'cabin', 'makeout', 'heavy'
+            act 'Blow him': gt 'igorhunter', 'cabin', 'bj'
+
+        end
+        if $ARGS[2] = 'heavy':
+            cla & *clr
+            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/cabin_makeout_2.jpg"></center>'
+            'You relax on the couch, letting Igor''s hands glide further up. He moves towards your midriff, lifting your bottom up and exposing your wet pussy as he strokes deliciously close to your nether lips, making you moan lightly'
+            
+            gs 'arousal', 'foreplay', 4
+            gs 'stat'
+        
+            act 'Suck Igor''s cock': gt 'igorhunter', 'cabin', 'bj'
+            act 'You want him to lick your pussy': gt 'igorhunter', 'cabin', 'cuni'
+            act '"I need you inside me, Igor!" you whisper': gt 'igorhunter', 'cabin', 'vaginal'
+        end    
+    end
+
+    if $ARGS[1] = 'cuni':
+        cla & *clr
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/cabin_cuni.jpg"></center>'
+        'You smile and moan as Igor laps up your juices, pulling out and playing with your tit as he flick around your clit, getting you very excited.'
+
+        gs 'arousal', 'foreplay', 4
+        gs 'arousal', 'breasts', 3
+        gs 'arousal', 'cuni', 10
+        minut -= 10
+        gs 'stat'
+
+        act 'Return the favor': gt 'igorhunter', 'cabin', 'bj'
+        act 'You need your pussy filled and fucked proper': gt 'igorhunter', 'cabin', 'vaginal'
+    end
+
+    if $ARGS[1] = 'bj':  
+        cla & *clr
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/bj_1.jpg"></center>'
+        'You go on your hands and knees in front of Igor, your exposed ass towards the door for anyone coming in to see your fuckholes.'
+        gs 'dinsex', 'bj_random'
+
+        gs 'arousal', 'bj', 7
+        gs 'arousal', 'flash', 5, 'exhibitionism'
+        minut -= 6
+        gs 'stat'
+
+        act 'Keep sucking him':
+            cla & *clr
+            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/bj_2.jpg"></center>'
+            'You keep sucking Igor on your knees, your hand pulling out and squeezing your tits. Igor lightly grabs your head and begins to lightly skulllfuck you. After a moment you notice his dick spasming right in your mouth, shooting his jizm right down your throat.'
+            gs 'dinsex', 'bj_swallow_random'
+
+            gs 'arousal', 'bj', 7
+            gs 'arousal', 'breasts', 5
+            minut -= 8
+            gs 'stat'
+            gs 'arousal', 'end'
+
+            act 'Further': gt 'swamphouse'
+        end    
+    end
+
+    if $ARGS[1] = 'vaginal':
+        cla & *clr
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/f_1.jpg"></center>'
+        gs 'dinsex', 'vaginal_sex', 15
+
+        act 'Take off your top':
+            cla & *clr
+            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/f_2.jpg"></center>'
+            'You pretty much rip off your top and start kneading your tits as Igor keeps drilling your cunt, making you moan and scream like a whore.'
+
+            gs 'arousal', 'vaginal', 8
+            gs 'arousal', breasts, 4
+            gs 'stat'
+
+            act 'Igor suddenly pulls out':
+                cla & *clr
+                '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/f_3.jpg"></center>'
+                'Jerking off his <<$penis_desc>>, he covers your stomach and tits with his warm spunk.'
+
+                gs 'cum_call', 'breasts', 'A173', 1
+                gs 'cum_call', 'stomach', 'A173', 1
+                minut += 2
+                gs 'stat'
+                gs 'arousal', 'end'
+
+                act 'Cuddle him':
+                    cla & *clr
+                    '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/f_4.jpg"></center>'
+                    'You cuddle with Igor still covered in his spunk, enjoying this intimate moment'
+                    'After a few minutes, Igor pulls you closer and gives you a kiss on the cheek before getting dressed and walking out of the hut.'
+
+                    minut += 8
+                    mood += 10
+
+                    act 'Further': gt 'swamphouse'
+                end
+            end
+        end
     end
 end
 
-if $ARGS[0] = 'cabin':
-    if $ARGS[0] = '':
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/1.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/2.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/3.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/4.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/5.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/6.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/7.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/8.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/9.jpg"></center>'
+if $ARGS[0] = 'woods':
+    if $ARGS[1] = '':
+        cla & *clr
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/2.jpg"></center>'
+        'You passionately kiss Igor, his tongue exploring your throat. As you are making out with Igor, you notice him undoing your buttons'
+        
+        gs 'arousal', 'kiss', 3
+        gs 'stat'
+
+        act 'Pull back': 
+            cla & *clr
+            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/misc/hangout_woods.jpg"></center>'
+            'You do not really want to do it here. Noticing you not really reciprocating, Igor pulls back and goes back to simply relaxing and chatting with you.'
+
+            gs 'arousal', 'end'
+
+            act 'Further': gt 'swamp_woods'
+        end
+
+        act 'Keep making out with him':
+            cla & *clr
+            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/3.jpg"></center>'
+            'You let him undo your top, continuing to make out with him until he exposes your tits to the warm, breezy air.'
+
+            gs 'arousal', 'foreplay', 2
+            gs 'stat'
+
+            act '...':
+                cla & *clr
+                '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/4.jpg"></center>'
+                'He pulls your outfit down and kisses down your chest before his lips find your nipple. You gasp when he starts to suckle and nibble, feeling a bit of wetness between your legs'
+
+                gs 'arousal', 'foreplay', 4
+                gs 'arousal', 'breasts', 4
+                minut -= 5
+                gs 'stat'
+
+                act 'Stand up so that he can strip you off':
+                    cla & *clr
+                    '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/5_2.jpg"></center>'
+                    'As soon as you stand up he starts pulling your outfit down your legs, exposing your already aching pussy.'
+
+                    act 'Blow him': gt 'IgorHunter', 'woods', 'cuni'
+                end
+            end
+        end
+    end
+
+    if $ARGS[1] = 'cuni':
+        cla & *clr
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/6.jpg"></center>'
+        'Just as you start kneeling down, Igor picks you up and puts you up on the stump in one swift move'
+        'You let out a shriek part out of surprise and part how being manhandled like this got you aroused, spreading your legs wide for Igor'
+        'He does not lose time before starting to suck on your clit, pumping his finger in and out while you moan deeply.'
+
+        gs 'arousal', 'foreplay', 8, 'sub'
+        gs 'arousal', 'cuni', 12
+        gs 'arousal', 'vaginal_finger', 8
+        minut -= 20
+        gs 'stat'
+
+        act 'Get down and strip Igor': gt 'IgorHunter', 'woods', 'bj'
+    end
+
+    if $ARGS[1] = 'bj':
+        cla & *clr
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/8.jpg"></center>'
+        'Satisfied enough with Igor''s ''surprise'', you get down and undo his pants as he takes off his t-shirt.'
+        'You then pull down his boxers, exposing his diamond hard cock'
+
+        minut += 2
+        gs 'stat'
+
+        act 'Suck his dick':
+            cla & *clr
+            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/9.jpg"></center>'
+            gs 'dinsex', 'bj_random'
+            'After a few moments, you start feeling his dick rhytmically pulsing inside your mouth'
+
+            gs 'arousal', 'bj', 8
+            gs 'stat'
+
+            act 'Keep sucking and milk his dick':
+                cla & *clr
+                '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/swallow.jpg"></center>'
+                'You keep on sucking and stroking Igor''s dick as his dick throbs harder and harder'
+                gs 'dinsex', 'bj_swallow_random'
+
+                gs 'arousal', 'bj', 4
+                gs 'cum_call', 'mouth', 'A173', 1
+                gs 'stat'
+                gs 'arousal', 'end'
+
+                act 'Further': gt 'swamp_woods'
+            end
+
+            act 'You want him to cum on your tits':
+                cla & *clr
+                '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/pnecklace.jpg"></center>'
+                'You take him out and jerk him off. It takes him only a few seconds to climax, covering your chest with his spunk'
+
+                gs 'arousal', 'hj', 4
+                gs 'cum_call', 'breasts', 'A173', 1
+                gs 'stat'
+                gs 'arousal', 'end'
+
+                act 'Further': gt 'swamp_woods'
+            end
+        end
     end
 end
 

locations/brother.qsrc

@@ -974,7 +974,7 @@ if $ARGS[0] = 'brother_voyeur_ev2':
 	picrand = rand(1,7)
 	if npc_rel['A34'] <50:npc_rel['A34'] += rand(1,2)
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/kolka/event/shower/c (<<picrand>>).jpg"></center>'
-	'You turn to face the door, giving Kolka a better view of your body and then erotically squeeze your <<$titsize>> tits. Your fingers graze over your <<pcdesc_nipples>> nipples and you can''t help but give them a slight pinch. You reach for the detachable shower head and begin spraying water over your chest, all the way gazing at your awestruck sibling. You close your eyes and in the heat of the moment, your heart flutters and you let out a light moan.'
+	'You turn to face the door, giving Kolka a better view of your body and then erotically squeeze your <<$titsize>> tits. Your fingers graze over your <<$pcdesc_nipples>> nipples and you can''t help but give them a slight pinch. You reach for the detachable shower head and begin spraying water over your chest, all the way gazing at your awestruck sibling. You close your eyes and in the heat of the moment, your heart flutters and you let out a light moan.'
 
 	gs 'arousal','breasts', 3, 'incest'
 	gs 'stat'

locations/dinSex.qsrc

@@ -184,8 +184,8 @@ if $ARGS[0] = 'vaginal_sex':
 		$temp_mens = iif(cycle <= 0,' and a bit of your period leaks from your vagina','')
 		pcs_horny += arousal_modifier * 2
 		pcs_mood += arousal_modifier * 2
-		'<<$boydesc>> pushes <<$xyr>> <<$penis_desc>> into your unexplored pussy gently. It is bit painful, but as your lust builds up you do not want to wait anymore.'
-		'With the next push from <<$boydesc>>, you push your ass towards <<$xyr>>''s cock. You feel your hymen break and his cock slide into deep inside you, <<$xyr>>''s head rubbing against your no longer untouched walls as you both moan very loudly.'
+		'<<$boydesc>> pushes <<$xyr>> <<$penis_desc>> into your unexplored pussy gently. It is a bit painful, but as your lust builds up you do not want to wait anymore.'
+		'With the next push from <<$boydesc>>, you push your ass towards <<$xyr>> cock. You feel your hymen break and his cock slide into deep inside you, <<$xyr>> head rubbing against your no longer untouched walls as you both moan very loudly.'
 		gs 'arousal','vaginal',ARGS[1],$ARGS[2],$ARGS[3],$ARGS[4],$ARGS[5],$ARGS[6],$ARGS[7],$ARGS[8]
 	end
 	killvar '$temp_mens'
@@ -386,7 +386,7 @@ if $ARGS[0] = 'analsex':
 		'You cry and bite your lip when the <<$penis_desc>> begins to thrust in and out of your ass. Your anus feels like it is going to tear apart and all you want is for this torture to be over quickly.'
 	elseif (agrdif + altdif) >= 20 and (agrdif + altdif) < 30:
 		pcs_horny += 10
-		'You savor <<$xyr>>''s cock moving inside you, lightly moaning in rhythm.'
+		'You savor <<$xyr>> cock moving inside you, lightly moaning in rhythm.'
 	end
 	'After some time <<$boydesc>> groans and you feel <<$xyr>> cock pulsing inside you and a pleasant warmth filling your ass.'
 	gs 'cum_call','anus',$boy,1

locations/kakuzu.qsrc

@@ -95,7 +95,7 @@ if $ARGS[0] = 'mansion1':
 			if srodstvo = 0:srodrand = rand(1, 5)
 
 			'You concentrate energy in the sheet of paper. You feel that you are spending a huge amount of mana for this action.'
-			srodstvo += rand(1, 10)
+			srodstvo += rand(9-(2*difficulty), 10)
 
 			if srodstvo < 100:
 				'You get tired and sweat like a horse, but your effort was not enough.'

locations/npcstatic2.qsrc

@@ -173,6 +173,8 @@ npctemp = 58
 gs 'npcstaticdefaults', 'defaults'
 $npc_dna['A<<npctemp>>'] = '1443401856 1151112047 8321006077 1153217734 1305220298 7921283143 7765736018'
 $npc_firstname['A<<npctemp>>'] = 'Zhendos'
+$npc_nickname['A<<npctemp>>'] = 'Zhen'
+$npc_lastname['A<<npctemp>>'] = 'Mikhailov'
 $npc_usedname['A<<npctemp>>'] = 'Zhendos'
 $npc_notes['A<<npctemp>>'] = 'Your Brother''s Friend.'
 npc_cyc['A<<npctemp>>'] = -1
@@ -193,6 +195,8 @@ npctemp = 59
 gs 'npcstaticdefaults', 'defaults'
 $npc_dna['A<<npctemp>>'] = '1670044870 1746541889 1939734844 1792989216 1320934850 1111430962 2142228809'
 $npc_firstname['A<<npctemp>>'] = 'Mishan'
+$npc_nickname['A<<npctemp>>'] = 'Misha'
+$npc_lastname['A<<npctemp>>'] = 'Andreev'
 $npc_usedname['A<<npctemp>>'] = 'Mishan'
 $npc_notes['A<<npctemp>>'] = 'Your brother''s friend.'
 npc_cyc['A<<npctemp>>'] = -1

locations/saveupdater.qsrc

@@ -568,7 +568,13 @@ if npcSex[14] > 0: npcSex[14] = 0 and npc_sex['A14'] = 1
 
 if npc_dob['A34'] ! 20001219: npc_dob['A34'] = 20001219
 
-if telefon_rev = 0:
+if telefon_rev < 2:
+	killvar '$contact'
+	killvar '$contactIcon'
+	killvar '$contactOCode'
+	killvar '$contactOSche'
+	killvar '$contactICode'
+	killvar '$contactISche'
 	gs 'telefon', 'AddContact', 'A29', 'icon_npc1',"gs 'telefon', 'Phone_call'","hour >= 8 and hour <= 20"
 	if telkat > 0:
 		gs 'telefon', 'AddContact', 'A219', 'icon_kat',"$telsob = 'Kate' & gt 'telefon', 'mobilaraz'","hour >= 8 and hour <= 20"
@@ -576,6 +582,7 @@ if telefon_rev = 0:
 	if npc_QW['A192'] > 0:
 		gs 'telefon', 'AddContact', 'A192', 'icon_nastja',"gs 'telefon', 'start'","hour >= 8 and hour <= 20"
 	end
+	telefon_rev = 2
 end
 
 --- saveupdater ---------------------------------

locations/spell.qsrc

@@ -130,6 +130,7 @@ if $ARGS[0] = 'curewounds2':
 	if SuccessValue > 0:
 		! Remove all pain
 		killvar 'pain'
+		pcs_health = pcs_vital * 10 + pcs_stren * 5 + 1000
 		'<b><font color = green>You feel yourself coursing with life.  All pain is gone.</font></b>'
 	else
 		'<b>The spell fizzles.  Nothing seems to happen.</b>'

locations/spellList.qsrc

@@ -53,7 +53,7 @@ spellMana['curewounds'] = 10000
 spellTime['curewounds'] = 30
 spellDiff['curewounds'] = 25
 $spellName['curewounds'] = "Cure Wounds"
-$spellDesc['curewounds'] = "You feel your body's wounds begin to heal."
+$spellDesc['curewounds'] = "You feel your bodys wounds begin to heal."
 !curewounds2
 spellMana['curewounds2'] = 100000
 spellTime['curewounds2'] = 60

locations/telefon.qsrc

@@ -1010,7 +1010,7 @@ if $ARGS[0] = 'AddContact':
 	$telefonCon['InSched'] = $ARGS[6]
 	telefonCon['ContactListID'] = arrpos('$contact',$telefonCon['NPC'])
 	if telefonCon['ContactListID'] = -1:
-		telefonCon['ContactListID'] = len($contact)
+		telefonCon['ContactListID'] = arrsize('$contact')
 		$contact[telefonCon['ContactListID']] = $telefonCon['NPC']
 	end
 	$contactIcon[telefonCon['ContactListID']] = $telefonCon['Icon']