3 Commits bbfdfbaea6 ... 6c78f626b8

Author SHA1 Message Date
  oldentree 6c78f626b8 Merge branch 'master' of https://git.catrenelle.com/oldentree/gl_bestmod 5 years ago
  oldentree 6845ca038c [changed] setting in Mira quest (thanks sovietmercader!) 5 years ago
  oldentree 7af6d80547 [added] item to grocery, purse. 5 years ago
2 changed files with 28 additions and 1 deletions
  1. 27 0
      locations/mod_bestmod.qsrc
  2. 1 1
      locations/mod_bestmod_mira.qsrc

+ 27 - 0
locations/mod_bestmod.qsrc

@@ -48,6 +48,33 @@ if $loc = 'postdeliveries' and $ARGS[0] = '10':
 	end
 end
 
+!!$mod_beast_var['StatText'] = $stattxt
+!!! this finds the begining of the arousal bar (could be any regex, though)
+!!mod_beast_var['StartPosition'] = strpos($mod_beast_var['StatText'],'<font face="courier new" size = 3>')
+!!
+!!! break stat win text into 2 part, before and after the token you found.
+!!$mod_beast_var['FrontStr'] = mid($mod_beast_var['StatText'],1,mod_beast_var['StartPosition']-1)
+!!$mod_beast_var['EndStr'] = mid($mod_beast_var['StatText'],mod_beast_var['StartPosition'],len($mod_beast_var['StatText']))
+!!
+!!! clear the text in the window
+!!clr
+!!
+!!! build the new window text with your addition
+!!$mod_beast_var['NewWindowText'] = $mod_beast_var['FrontStr'] + "Your New Text" + $mod_beast_var['EndStr']
+!!
+!!! write new out to the window
+!!p $mod_beast_var['NewWindowText']
+
+if $shoplocation = 'grocery':
+	*pl '<center><table align="center" width=80%>'
+	*p func ('$stock_item', 5, 'Dog treat', 100, 'bm_dog_treat', $curloc, '', iif(bag > 0, 0, 1), 'You need a handbag')
+	*p '</table></center>'
+end
+
+if $curloc = 'din_bad' and $ARGS[0] = 'd_bag':
+	if bm_dog_treat > 0: 'You have <b><<bm_dog_treat>></b> dog treat'+iif(bm_dog_treat > 1, 's ', ' ')+'left in your purse.'
+end
+
 !! Some of the variables used in this mod:
 !! bm_beast[''exp'']			Beastiality experience. Incremented each act.
 !! bm_beast[''num'']			Count of animal partners. Incremented once per individual.

+ 1 - 1
locations/mod_bestmod_mira.qsrc

@@ -50,7 +50,7 @@ if $ARGS[0] = 'third_wish':
 								minut += 15
 								pcs_horny += RAND(25,50)
 								gs 'stat'
-								npc_QW['A60'] = 31 & !back to mira questline by illume
+								npc_QW['A60'] = 23 & !back to mira questline by illume
 								mirabandit = 1
 								'<center><img <<$set_imgh>> src="mod/bestmod/images/beast/bandit/piratmira3.jpg"></center>'
 								'She spends several minutes twisting her tongue over the tip and shaft of the dog''s dick. With a sigh, Mira lays on her back and starts to suck his cock, her lips crawl over Bandit''s massive hard cock. After a minute she pulls away, you see, she is having a hard time taking his cock into her mouth, Bandit''s cock starts to drip pre-cum. You tell her, to swallow every last drop, pre-cum, sperm or even piss if Bandit needs to go. She sighs resignedly and continues to suck. Soon Bandit starts to cum and Mira chokes at the shear volume of his cum, but she swallows it all and then she wipes a finger across her face and gathers up all the stray cum and shoves it into her mouth and swallows. She repeats this on her lips, chin, and the little that escaped to her neck and chest...'