Browse Source

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

sandra_schulz 5 years ago
parent
commit
0c05d276fd

+ 1 - 1
locations/castSpell.qsrc

@@ -1,5 +1,5 @@
 # castSpell
-! Used to cast a spell.  Use as a function.  Returns 1 OR 0 for Success or Failure.
+! Used to cast a spell.
 !
 ! ARGS[0] is the spell being cast
 !	Valid Spells are listed below

+ 17 - 12
locations/exhibitionistshop.qsrc

@@ -13,7 +13,7 @@ if $ARGS[0] = 'start':
 	gs 'stat'
 
 	gs 'themes', 'indoors'
-	'<center><b><font color="maroon">Exhibitionist Shop</font></b></center>'
+	'<center><b><font color="maroon">Expression of You</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/oldtown/exhibitshop/shop.jpg"></center>'
 	'A shop in the most modern style who''s clothing is all very revealing and not nearly as classy as the store itself.'
 
@@ -22,19 +22,24 @@ if $ARGS[0] = 'start':
 		gt 'liames'
 	end
 
-	act 'View clothing':
-		minut += 5
-		gt 'exhibitionistshop', 'clo'
-	end
+	if hour >= 18:
+		*nl
+		'The shop is closing and you have to leave.'
+	else
+		act 'View clothing':
+			minut += 5
+			gt 'exhibitionistshop', 'clo'
+		end
 
-	act 'View panties':
-		minut += 5
-		gt 'exhibitionistshop', 'panties'
-	end
+		act 'View panties':
+			minut += 5
+			gt 'exhibitionistshop', 'panties'
+		end
 
-	act 'View bras':
-		minut += 5
-		gt 'exhibitionistshop', 'bras'
+		act 'View bras':
+			minut += 5
+			gt 'exhibitionistshop', 'bras'
+		end
 	end
 end
 

+ 3 - 1
locations/kseniyaQW.qsrc

@@ -204,8 +204,10 @@ if $ARGS[0] = 'event3_1':
 							'You tell Kseniya you are done and want your clothes back.'
 							'"Over there. Sit down hand between your legs, that''s the one"'
 							'As you try and pose you realise your pussy is soaking wet and your nervousness about exposing yourself is completely overcome.'
-							'Kseniya hands you back your clothes and gives you a business card, it is for a shop in Old Town, off the high street. How odd.'
+							'Kseniya hands you back your clothes and gives you a business card, it is for a shop in Old Town. How odd.'
 							'"It was fun and I''m glad I found you. I have others to find though so good bye." Kseniya blows you a kiss and leaves. By the time you are dressed she is long gone.'
+							*nl
+							'You look at the card again "Expression of You" just off Pushkin High Street. Open Mon-Sat, 08:00 - 18:00'
 							gs 'arousal', 'flash', 10, 'sub'
 							gs 'arousal', 'end'
 							minut -= 5

+ 16 - 3
locations/liames.qsrc

@@ -27,9 +27,22 @@ set minut+=10
 'Not so much of a street, more of a connection of several streets including cafes and shops.'
 'A street runs straight to the <a href="exec:gt ''liam'',''start''">Town center</a>.'
 'Street leads to the Old Town <a href="exec:gt ''parks'',''start''">park</a>.'
-if hour >= 8 and hour <= 20:'A small <a href="exec:gt ''larek'',''start''">shop</a> is currently open.'
-if hour >= 10 and hour <= 22: 'A <a href="exec:gt ''liamelkafe'',''start''">tiny cafe</a> displays a street sign outside its door.'
-if hour >= 8 and hour <= 17 and exhibitionQW > 3:'The <a href="exec:gt ''exhibitionistshop'',''start''">exhibitionist shop</a> is just down a small side street from here.'
+if hour >= 8 and hour <= 20:
+	'A small <a href="exec:gt ''larek'',''start''">shop</a> is currently open.'
+else
+	'There is a small local shop that is open 8:00 - 20:00 everyday. Currently closed.'
+end
+if hour >= 10 and hour <= 22:
+	'A <a href="exec:gt ''liamelkafe'',''start''">tiny cafe</a> displays a street sign outside its door.'
+else
+	'The tiny cafe here is close currently, it is open every day 10:00 - 22:00'
+if exhibitionQW > 3:
+	if week < 7 and hour >= 8 and hour <= 18:
+		'<a href="exec:gt ''exhibitionistshop'',''start''">Expression of You</a> is just down a small side street from here.'
+	else
+		'Expression of You is open Mon - Sat, 8:00 - 18:00'
+	end
+end
 
 if home_owned[4] = 1:
 	act '<b>Go home</b>':gt'korr2x'

+ 2 - 0
locations/magik.qsrc

@@ -33,6 +33,8 @@ killvar 'i'
 killvar '$ThisSpellName'
 killvar '$SpellListStr'
 
+act 'Physical attacks':gt'boxing'
+
 
 --- magik ---------------------------------
 

+ 6 - 6
locations/podrsex.qsrc

@@ -51,7 +51,7 @@ if $ARGS[0] = 'suck':
 
 	if pdsxbj = 0: pdsxbj = 1
 
-	'<center><img <<$set_imgh>> src="images/locations/shared/sex/sexdvanadva/minet<<picrand>>.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/locations/shared/sex/pod/minet<<picrand>>.jpg"></center>'
 	'You look the other girl deep in the eyes while the two of you suck the man''s cock, touching her tongue with yours when you reach it around his shaft. Then the two of you take turns sucking him off enthusiastically, while the other licks his balls.'
 	
 	gs 'arousal', 'bj', 10, 'sub', 'group'
@@ -69,7 +69,7 @@ if $ARGS[0] = 'suck':
 	if sexvar > 0:xgt 'podrsex', 'var'
 	if sexvar = 0:
 		*clr
-		'<br><center><img <<$set_imgh>> src="images/locations/shared/sex/sexdvanadva/cum<<picrand>>.jpg"></center>'
+		'<br><center><img <<$set_imgh>> src="images/locations/shared/sex/pod/cum<<picrand>>.jpg"></center>'
 		spafinloc = 12
 		gs 'cum_manage'
 		gs 'podrsex', 'end'
@@ -88,7 +88,7 @@ if $ARGS[0] = 'pussy':
 	
 	if pdsxsex = 0: pdsxsex = 1
 
-	'<center><img <<$set_imgh>> src="images/locations/shared/sex/sexdvanadva/uvag<<picrand>>.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/locations/shared/sex/pod/uvag<<picrand>>.jpg"></center>'
 	'The man eagerly penetrates your pussy, and begins to thrust his length inside you over and over bringing you pleasure.'
 	
 	gs 'arousal', 'vaginal', 10, 'sub', 'group'
@@ -118,7 +118,7 @@ if $ARGS[0] = 'ass':
 
 	if pdsxanal = 0: pdsxanal = 1
 
-	'<center><img <<$set_imgh>> src="images/locations/shared/sex/sexdvanadva/uanal<<picrand>>.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/locations/shared/sex/pod/uanal<<picrand>>.jpg"></center>'
 	'The man slowly works the tip of his cock inside your ass, and halts for a moment so you can get used to the sensation. Then he begins to thrust his length inside you, fucking you more and more intensely with less regard for your feelings and more for his own pleasure.'
 	
 	gs 'arousal', 'anal', 10, 'sub', 'group'
@@ -155,7 +155,7 @@ if $ARGS[0] = 'voy':
 	end
 	if rand(0,1) = 0:
 		pos = 4
-		'<center><img <<$set_imgh>> src="images/locations/shared/sex/sexdvanadva/vag<<picrand>>.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/locations/shared/sex/pod/vag<<picrand>>.jpg"></center>'
 		'While the other girl is enjoying getting her pussy fucked, you find that she''ll do whatever you want her to do. She eagerly licks your pussy when you put it on her mouth, and lap up her sweet juices while the guy rams his cock inside her repeatedly.'
 		
 		gs 'arousal', 'cuni', 10, 'lesbian', 'dom', 'group'
@@ -163,7 +163,7 @@ if $ARGS[0] = 'voy':
 		
 	else
 		pos = 5
-		'<center><img <<$set_imgh>> src="images/locations/shared/sex/sexdvanadva/anal<<picrand>>.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/locations/shared/sex/pod/anal<<picrand>>.jpg"></center>'
 		'While the other girl is enjoying getting her ass fucked, you find that she''ll do whatever you want her to do. She eagerly licks your pussy when you put it on her mouth, and lap up her sweet juices while the guy rams his cock inside her repeatedly.'
 	
 		gs 'arousal', 'cuni', 10, 'lesbian', 'dom', 'group'

+ 39 - 0
locations/saveupdater.qsrc

@@ -411,5 +411,44 @@ if arrsize('$bodimgsets') = 30:
 	$bodimgsets[39] = 'default_preg'
 end
 
+!! reorganizes old spell variables into new arrrays
+if spell_update ! 1:
+	spell_update = 1
+
+	if spelltuman = 1:spellKnown['fog'] = 1
+	if spellklon = 1:spellKnown['clone'] = 1
+	if spellstun = 1:spellKnown['stun'] = 1
+	if spellweap = 1:spellKnown['weapon'] = 1
+	if spellwind = 1:spellKnown['wind'] = 1
+	if spellklon2 = 1:spellKnown['multiclone'] = 1
+	if spellinit = 1:spellKnown['haste'] = 1
+	if spellhel = 1:spellKnown['heal'] = 1
+	if spellfire0 = 1:spellKnown['scaldingtouch'] = 1
+	if spellfire2 = 1:spellKnown['burninghands'] = 1
+	if spellfire3 = 1:spellKnown['firebarrier'] = 1
+	if spellfire4 = 1:spellKnown['firestorm'] = 1
+	if spellfire5 = 1:spellKnown['flameshield'] = 1
+	if spellele0 = 1:spellKnown['shock'] = 1
+	if spellele2 = 1:spellKnown['lightning'] = 1
+	if spellele3 = 1:spellKnown['electricbarrier'] = 1
+	if spellele4 = 1:spellKnown['1000birds'] = 1
+	if spellele5 = 1:spellKnown['dancingsphere'] = 1
+	if spellert0 = 1:spellKnown['quicksand'] = 1
+	if spellert2 = 1:spellKnown['earthshield'] = 1
+	if spellert3 = 1:spellKnown['abyss'] = 1
+	if spellert4 = 1:spellKnown['earthguardian'] = 1
+	if spellert5 = 1:spellKnown['sando'] = 1
+	if spellwind0 = 1:spellKnown['windgust'] = 1
+	if spellwind2 = 1:spellKnown['pressure'] = 1
+	if spellwind3 = 1:spellKnown['vacuum'] = 1
+	if spellwind4 = 1:spellKnown['vacuumshells'] = 1
+	if spellwind5 = 1:spellKnown['devouringvacuum'] = 1
+	if spellwater0 = 1:spellKnown['leechmana'] = 1
+	if spellwater2 = 1:spellKnown['flood'] = 1
+	if spellwater3 = 1:spellKnown['blister'] = 1
+	if spellwater4 = 1:spellKnown['sharkrockets'] = 1
+	if spellwater5 = 1:spellKnown['greatflood'] = 1
+end
+
 --- saveupdater ---------------------------------