[fixed] STD triggers were using ARGS not $ARGS for their code chunks so they could not be read

locations/dinSex.qsrc

@@ -31,7 +31,7 @@ end
 
 $penis_desc = $dick_girth + ', ' + $penis_desc
 
-if ARGS[0] = 'std_trigger':
+if $ARGS[0] = 'std_trigger':
 	tipvenerarand = rand(0, 10)
 	if protect = 1:
 		if rand(0, 1000) = 1000: gs 'dinSex', 'disease_picker'
@@ -40,15 +40,20 @@ if ARGS[0] = 'std_trigger':
 	end
 end
 
-if ARGS[0] = 'disease_picker': 
+if $ARGS[0] = 'disease_picker': 
 	if cheatHealth = 0:
-		if tipvenerarand = 8:
-			!!herpes
-			if rand(1, 100) > 90 and GerpesOnce = 0:
-				GerpesOnce = 1
+		if tipvenerarand < 5:
+			!!candidiasis/thrush
+			if rand(1, 100) > 85 and KandidozOnce = 0:
+				KandidozOnce = 1
+				Kandidoz += 1
+			end
+		elseif tipvenerarand < 7:
+			!!gonorrhea/triper
+			if rand(1, 100) > 95 and TriperOnce = 0:
+				TriperOnce = 1
+				Triper += 1
 				Venera += 1
-				Gerpes += 1
-				GenHerpes = 1
 			end
 		elseif tipvenerarand = 7:
 			!!syphilis
@@ -57,24 +62,19 @@ if ARGS[0] = 'disease_picker':
 				Sifilis += 1
 				Venera += 1
 			end
-		elseif tipvenerarand >= 5 and tipvenerarand < 7:
-			!!gonorrhea/triper
-			if rand(1, 100) > 95 and TriperOnce = 0:
-				TriperOnce = 1
-				Triper += 1
+		elseif tipvenerarand = 8:
+			!!herpes
+			if rand(1, 100) > 90 and GerpesOnce = 0:
+				GerpesOnce = 1
 				Venera += 1
-			end
-		elseif tipvenerarand < 5:
-			!!candidiasis/thrush
-			if rand(1, 100) > 85 and KandidozOnce = 0:
-				KandidozOnce = 1
-				Kandidoz += 1
+				Gerpes += 1
+				GenHerpes = 1
 			end
 		end
 	end	
 end
 
-if ARGS[0] = 'std_trigger_oral':
+if $ARGS[0] = 'std_trigger_oral':
 	tipvenerarand = rand(0, 10)
 	if protect = 1:
 		if rand(0, 1000) = 1000: gs 'dinSex', 'disease_picker_oral'
@@ -83,7 +83,7 @@ if ARGS[0] = 'std_trigger_oral':
 	end
 end
 
-if ARGS[0] = 'disease_picker_oral':
+if $ARGS[0] = 'disease_picker_oral':
 	if cheatHealth = 0:
 		if tipvenerarand >= 5 and tipvenerarand < 7:
 			if rand(1, 100) > 95 and TriperOnce = 0:
@@ -119,7 +119,7 @@ if ARGS[0] = 'disease_picker_oral':
 	end
 end
 
-if ARGS[0] = 'wear_condom':
+if $ARGS[0] = 'wear_condom':
 	protect = 0
 	vidageday -= 1
 	if prezik > 0:
@@ -162,7 +162,7 @@ if $ARGS[0] = 'vaginal_sex':
 		elseif vaginal_tightness < -3: 
 			'You feel <<$boydesc>>''s <<$penis_desc>> sliding through your wet folds<<$temp_mens>>. You savor the intense pleasure from the <<$penis_desc>> inside you, your cunt aching to be filled even more.'
 		end
-		gs 'arousal','vaginal',ARGS[1],$ARGS[2],$ARGS[3],$ARGS[4],$ARGS[5],$ARGS[6],$ARGS[7],$ARGS[8]
+		gs 'arousal','vaginal',$ARGS[1],$$ARGS[2],$$ARGS[3],$$ARGS[4],$$ARGS[5],$$ARGS[6],$$ARGS[7],$$ARGS[8]
 
 		pcs_horny += arousal_modifier
 		pcs_mood += arousal_modifier
@@ -173,7 +173,7 @@ if $ARGS[0] = 'vaginal_sex':
 		pcs_mood += arousal_modifier * 2
 		'<<$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]
+		gs 'arousal','vaginal',$ARGS[1],$$ARGS[2],$$ARGS[3],$$ARGS[4],$$ARGS[5],$$ARGS[6],$$ARGS[7],$$ARGS[8]
 	end
 	killvar '$temp_mens'
 end
@@ -182,7 +182,7 @@ end
 !! gs 'dinsex', 'boy_puts_condom'
 if $ARGS[0] = 'boy_puts_condom':
 	protect = iif(prezik > 0,1,0)
-	if $ARGS[1] = '':
+	if $$ARGS[1] = '':
 		! do you have condoms?
 		if prezik > 0:
 			if rand(1,prezik) <= badprezik: 
@@ -202,7 +202,7 @@ if $ARGS[0] = 'boy_puts_condom':
 			!! the hormonal contraception is still taken in account
 		end
 	else
-		$custmsg = $ARGS[1]
+		$custmsg = $$ARGS[1]
 		*p '<<$custmsg>>'
 		! do you have condoms?
 		if prezik > 0:
@@ -225,7 +225,7 @@ end &! --- boy_puts_condom ---
 
 !! gs 'dinsex', 'boy_puts_his_condom'[, $boydesc]
 if $ARGS[0] = 'boy_puts_his_condom':
-	$bwa_boy = iif($ARGS[1] = '',$boydesc,$ARGS[1])
+	$bwa_boy = iif($$ARGS[1] = '',$boydesc,$$ARGS[1])
 	protect = 1
 	sexcontra = 3
 	*p '<<ucase(mid($bwa_boy,1,1))>><<mid($bwa_boy,2,len($bwa_boy)-1)>> takes his condom and puts it on <<$xyr>> <<$penis_desc>>.'
@@ -236,7 +236,7 @@ end &! --- boy_puts_his_condom ---
 if $ARGS[0] = 'pc_puts_condom':
 	protect = iif(prezik > 0,1,0)
 	vidageday -= 1 &! the people guess that you are a bit more older than you are in fact
-	if $ARGS[1] = '':
+	if $$ARGS[1] = '':
 		! do you have condoms?
 		if prezik > 0:
 			if rand(1,prezik) <= badprezik: 
@@ -256,7 +256,7 @@ if $ARGS[0] = 'pc_puts_condom':
 			!! the hormonal contraception is still taken in account
 		end
 	else
-		$custmsg = $ARGS[1]
+		$custmsg = $$ARGS[1]
 		*p '<<$custmsg>>'
 		! do you have condoms?
 		if prezik > 0:
@@ -279,7 +279,7 @@ end &! --- pc_puts_condom ---
 
 !! gs 'dinsex','boy_wants_anal' [, $boydesc [, 'lubri']]
 if $ARGS[0] = 'boy_wants_anal':
-	$bwa_boy = iif($ARGS[1] = '',$boydesc,$ARGS[1])
+	$bwa_boy = iif($$ARGS[1] = '',$boydesc,$$ARGS[1])
 	if $bwa_boy = 'lubri': $bwa_boy = $boydesc
 	if analplugin = 1:
 		if pcs_ass < 16:
@@ -290,7 +290,7 @@ if $ARGS[0] = 'boy_wants_anal':
 			analplugout = 1
 		end
 	end
-	if $ARGS[2] = 'lubri':
+	if $$ARGS[2] = 'lubri':
 		'<<$bwa_boy>> takes a tube of lubricant, squeezes a little on <<$xyr>> palm and rubs your anus.'
 		gs 'arousal', 'anal_finger', 1,'lube' 
 	else
@@ -314,7 +314,7 @@ end &! --- boy_wants_anal ---
 
 !! gs 'dinsex', 'girl_wants_anal'[, $boydesc [, 'lubri']]
 if $ARGS[0] = 'girl_wants_anal':
-	$bwa_girl = iif($ARGS[1] = '',$boydesc,$ARGS[1])
+	$bwa_girl = iif($$ARGS[1] = '',$boydesc,$$ARGS[1])
 	if $bwa_girl = 'lubri': $bwa_girl = $boydesc
 	if analplugin = 1:
 		if pcs_ass < 16:
@@ -325,7 +325,7 @@ if $ARGS[0] = 'girl_wants_anal':
 			analplugout = 1
 		end
 	end
-	if $ARGS[2] = 'lubri':
+	if $$ARGS[2] = 'lubri':
 		lubri +=1
 		'<<$bwa_girl>> takes a tube of lubricant, squeezes a little on her palm and rubs your anus.'
 		gs 'arousal', 'anal_finger', 1,'lube' 
@@ -344,19 +344,19 @@ end &! --- girl_wants_anal ---
 !! gs 'dinsex', 'after_anal','boy',$boydesc
 if $ARGS[0] = 'after_anal':
 	if analplugout = 1:
-		if $ARGS[1] = 'boy':
+		if $$ARGS[1] = 'boy':
 			analplugin = 1
-			'<<$ARGS[2]>> takes your butt plug and he puts it back into your anus. He grins: "Continue your training"' 
+			'<<$$ARGS[2]>> takes your butt plug and he puts it back into your anus. He grins: "Continue your training"' 
 		end
-		if $ARGS[1] = 'girl':
+		if $$ARGS[1] = 'girl':
 			analplugin = 1
-			'<<$ARGS[2]>> takes your butt plug and she puts it back into your anus. She grins: "Continue your training"' 
+			'<<$$ARGS[2]>> takes your butt plug and she puts it back into your anus. She grins: "Continue your training"' 
 		end
-		if $ARGS[1] = 'pc':
+		if $$ARGS[1] = 'pc':
 			analplugin = 1
 			'You take your butt plug and put it back into your anus. You grin: "I have to keep my butt trained"' 
 		end
-		if $ARGS[1] = 'no_plug':
+		if $$ARGS[1] = 'no_plug':
 			analplugin = 0
 			'You take your butt plug and put it into your purse. Your anus has to rest for a while now.' 
 		end
@@ -372,7 +372,7 @@ if $ARGS[0] = 'analsex':
 	if pcs_ass < 10:'When <<$xe>> tries inserting a third finger you groan in pain.'
 	if pcs_ass >= 10:'<<$boydesc>> inserts a third finger, very slowly thrusting and wiggling to stretch your anus.'
 	*p '<<$boydesc>> pulls <<$xyr>> fingers out of your ass and you feel <<$xyr>> <<$penis_desc>> pushing against your butthole'
-	gs 'arousal','anal',ARGS[1],$ARGS[2],$ARGS[3],$ARGS[4],$ARGS[5],$ARGS[6],$ARGS[7],$ARGS[8]
+	gs 'arousal','anal',$ARGS[1],$$ARGS[2],$$ARGS[3],$$ARGS[4],$$ARGS[5],$$ARGS[6],$$ARGS[7],$$ARGS[8]
 	if (agrdif + altdif) >= 20:'You scream and bite your lip from the sharp pain when <<$xe>> penetrates your ass.'
 	if (agrdif + altdif) < 20:'You moan when <<$xe>> penetrates your ass.'
 	'<<$boydesc>> stops for a moment, giving your ass time to adjust to <<$xyr>> cock in it. Then he starts to slowly move, pumping your anus.'
@@ -471,10 +471,10 @@ if $ARGS[0] = 'enema':
 	minut += 5
 	klismaday = daystart
 	klismaday1= 1
-	if $ARGS[1]='':
+	if $$ARGS[1]='':
 		*p 'You give yourself an enema, feeling clean down there. Your ass is now ready for anal sex without any awkward surprises.'
-	elseif $ARGS[1]!' ': 
-		*p '<<$ARGS[1]>>'
+	elseif $$ARGS[1]!' ': 
+		*p '<<$$ARGS[1]>>'
 	end
 end &! --- enema ---