Merge branch 'phase_2' of https://git.catrenelle.com/pfffbft/glife into lurk

locations/IgorHunter.qsrc

@@ -1,26 +1,29 @@
 # Igorhunter
 
+$menu_loc = 'Igorhunter'
+$menu_arg = ''
+menu_off = 0
+gs 'boyStat', 'A173'
+$boybody = 'high'
+$boybod = 'athletic'
+$boyface = 'brunette'
+lover_picture_number = 31
+finance = 1
+vneshBoy = 8
+$boyClo = 'dressed in jeans and a sweater.'
+figurBoy = 1
+titBoy = 1
+hairBoy = 3
+harakBoy = 1
+izvrat = 0
+boyage = year - ((npc_dob['A173'] - (npc_dob['A173'] mod 10000)) / 10000)
+boy_birth_date = 9
+boy_birth_month = 6
+gs 'stat'
+
+
 if $ARGS[0] = '':
-    $menu_loc = 'Igorhunter'
-    $menu_arg = ''
-    menu_off = 0
-    gs 'boyStat', 'A173'
-    $boybody = 'high'
-    $boybod = 'athletic'
-    $boyface = 'brunette'
-    lover_picture_number = 31
-    finance = 1
-    vneshBoy = 8
-    $boyClo = 'dressed in jeans and a sweater.'
-    figurBoy = 1
-    titBoy = 1
-    hairBoy = 3
-    harakBoy = 1
-    izvrat = 0
-    boyage = year - ((npc_dob['A173'] - (npc_dob['A173'] mod 10000)) / 10000)
-    boy_birth_date = 9
-    boy_birth_month = 6
-    gs 'stat'
+    
     
     '<center><b><font color = maroon>Igor Anisimov</font></b></center>'
     '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/igorhanter.jpg"></center>'
@@ -31,8 +34,9 @@ if $ARGS[0] = '':
         minut += 60
         menu_off = 1
         
-        igor_base_opinion += 1
-    
+        igor_base_opinion += 2
+        
+        gs 'IgorHunter', 'check_opinion'
         act 'Continue': gt $loc
     end
 end
@@ -41,90 +45,209 @@ if $ARGS[0] = 'check_opinion':
     huntersIgorQw = igor_base_opinion + hunter_collective_opinion / 2 - hunter_sexual_comfort / 4
 
     if huntersIgorQw > hunter_collective_opinion: huntersIgorQw = hunter_collective_opinion - hunter_sexual_comfort / 4
+    
+    !TODO: Add igor_sexual_comfort: 'platonic', 'romantic', 'partial', 'full', 'extreme' or 0 to 4
+
+    gs 'stat'
 
 end
 
 if $ARGS[0] = 'schedule':
+    !TODO: Add energy/stamina and horniness stats for Igor
 end
 
 !Sex scenes
 if $ARGS[0] = 'creekside':
     if $ARGS[1] = '':
         cla
-        act 'See who is behind you':
-            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/2.jpg"></center>'
+        act 'You suddenly feel an arm on your shoulder':
+            cla & *clr
+            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/2.jpg"></center>'
+            'You turn back to see Igor standing over you. Watching the scenery you did not even notice him sneaking up to you.'
+            'After saying hi, you suddenly realize you are completely naked in front of him, giving him quite the view with the creek in the background'
             act 'Cover your chest with your arms':
-                '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/1.jpg"></center>'
+                cla & *clr
+                '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/1.jpg"></center>'
+                'You quickly cover your chest with your arms, looking away a bit ashamed. The clothing disparity is a bit embarassing, him clothed and you in your birthday suit.'
+                '"What is wrong?" asks Igor, landing a small kiss on your shoulder.'
+                
+                gs 'arousal', 'flashlite', 2
+                gs 'stat'
+
                 act 'You are not feeling it':
                     cla
+                    '"I...it''s just... I''m sorry, just not in the mood to seen naked" you stammer.'
+                    '"No need to apologize, I''ll leave you alone" says Igor with a smile. "Catch you back at the hut maybe"'
+                    
+                    gs 'arousal', 'flashlite', 2
+                    mood -=5
+                    gs 'stat'
+                    gs 'arousal', 'end'
+
+                    act 'Further': gt 'backwater'
                 end
                 act 'Kiss him back':
-                    '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/3.jpg"></center>'
-                    act 'Further': gt 'IgorHunter', 'creekside', 'bj'
+                    cla & *clr
+                    '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/3.jpg"></center>'
+                    'Igor''s tender kiss on your bare skin dissolves whatever bit of embarrassment you had. Being naked in front off him like this is actually turning you on.'
+                    'You respond by giving Igor a passionate kiss, his hand stroking the small of your back.'
+
+                    gs 'arousal', 'kiss', 4
+                    gs 'arousal', 'flashlite', 2
+                    gs 'stat'
+
+                    act 'You do not want to get carried away':
+                        cla & *clr
+                        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/1.jpg"></center>'
+                        'You cover up your chest and tell Igor you want to call it there "I do not want to do anything further. At least, not like this..." you say.'
+                        'It would only take the right touch to change your mind, if Igor had noticed the growing dampness between your legs. Instead he smiles and gives you a kis on the shoulder before walking away.'
+                     
+                        gs 'arousal', 'flashlite', 2
+                        gs 'arousal', 'end'
+                        gs 'stat'
+
+                        act 'Further': gt 'backwater'
+                    end
+                    act 'Take him in your mouth': gt 'IgorHunter', 'creekside', 'bj'
                 end
             end
         
-            act 'Give him a hug':
-                '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/4.jpg"></center>'
+            act 'Greet him with a hug':
+                cla & *clr
+                '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/4.jpg"></center>'
+                'With a smile, you stand up on the rock you were sitting and go in for a hug as Igor kneels down, his lips locking on your nipple.'
+                'You hug his neck as he suckles and flicks his tongue around your nipple, eliciting some deep sighs from you.'
+                
+                gs 'arousal', 'foreplay', 4
+                gs 'arousal', 'breasts', 2
+                minut -= 3
+                gs 'stat'
+                
+                act 'Not now':
+                    cla & *clr
+                    '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/11.jpg"></center>'
+                    'You gently push Igor away, not feeling like doing anything further.'
+                    '"Maybe later", you say. Igor gives you another peck on the breasts before walking away.'
+                    
+                    gs 'arousal', 'breasts', 2
+                    gs 'stat'
+                    gs 'arousal', 'end'
+                   
+                    act 'Further': gt 'backwater'
+                end
+                
                 act 'Lay back and spread your legs':
-                '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/5.jpg"></center>'
-                act 'Further': gt 'IgorHunter', 'creekside', 'piv'
+                    '<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.'
+                    '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
+                    minut -= 4
+                    gs 'stat'
+                   
+                    act 'You want him inside you': gt 'IgorHunter', 'creekside', 'piv'
                 end
             end
         end
     end
 
     if $ARGS[1] = 'bj':
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/7.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/8.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/9.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/10.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/11.jpg"></center>'
-    
+        cla & *clr
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/6.jpg"></center>'
+        gs 'dinSex', 'bj_random'
+        gs 'arousal', 'bj', 9
+        minut -= 3
+        gs 'stat'
+        
+        act 'Keep sucking him':
+            cla & *clr
+            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/7.jpg"></center>'
+            'As you keep sucking and stroking Igor''s <<$penis_desc>>, you start to feel his dick throb stronger and stronger. Igor tells you he is going to cum'
+            gs 'arousal', 'bj', 6
+            minut -= 3
+            gs 'stat'
+            
+            act 'You want to swallow his cum':
+                cla & *clr
+                '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/8.jpg"></center>'
+                gs 'dinSex', 'bj_swallow_random'
+                'You lock eyes  with Igor and open your mouth wide, sticking out your tongue to show how thoroughly you have cleaned his dick.'
+                gs 'cum_call', 'mouth', 'A173'
+                gs 'arousal', 'bj', 6
+                minut -= 3
+                gs 'stat'
+                gs 'arousal','end'
+
+                act 'Further': gt 'backwater' 
+            end
+            act 'Make him pull out':
+                cla & *clr
+                '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/9.jpg"></center>'
+                'Igor pulls out of your mouth the last moment, jerking off furiously and covering your chest in his warm spunk.'
+                gs 'cum_call', 'breasts', 'A173', 1
+                gs 'arousal', 'bj', 4
+                gs 'arousal', 'breasts', 4
+                minut -= 5
+                gs 'stat'
+
+                act 'Relax and enjoy the view together':
+                    cla & *clr
+                    gs 'arousal', 'breasts', 4
+                    minut += 10
+                    gs 'arousal', 'end'
+                    gs 'stat'
+
+                    '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/10.jpg"></center>'
+                    'You go back to relaxing and enjoying the view, Igor''s warm seed still covering your tits.'
+                    'Igor cuddles you from behind as his hand idly plays with your boob, basking in the post-orgasmic bliss.'
+                    act 'Further': gt 'backwater' 
+                end    
+            end
+        end
     end
  
 
     if $ARGS[1] = 'piv':
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/f_1.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/f_2.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/f_3.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/f_4.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/f_5.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/f_6.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/creekside/f_7.jpg"></center>'
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/f_1.jpg"></center>'
+        '<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>'
     end
 end
 
 if $ARGS[0] = 'yard':
     if $ARGS[0] = '':
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/yard/1.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/yard/2.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/yard/3.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/yard/4.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/yard/5.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/yard/6.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/yard/7.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/yard/8.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/yard/9.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/yard/10.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/yard/11.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/yard/12.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/yard/13.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/yard/14.jpg"></center>'
+        '<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>'
     end
 end
 
 if $ARGS[0] = 'cabin':
     if $ARGS[0] = '':
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/cabin/1.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/cabin/2.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/cabin/3.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/cabin/4.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/cabin/5.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/cabin/6.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/cabin/7.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/cabin/8.jpg"></center>'
-        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/igor_hunter/cabin/9.jpg"></center>'
+        '<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>'
     end
 end