Ver código fonte

Prettied it up and hopefully stop the blank screens.

KevinSmarts 9 anos atrás
pai
commit
9a6ad6ae75
1 arquivos alterados com 56 adições e 36 exclusões
  1. 56 36
      locations/dorm

+ 56 - 36
locations/dorm

@@ -183,10 +183,10 @@ if $ARGS[0] = 'korr':
 	end
 	
 	if reccoldorm = 1:
-		if demarcusflag = 1:demarcusflag = 0 & cls & gt 'dorm', 'demarcusfuck'
-		if goshiflag = 1:goshiflag = 0 & cls & gt 'dorm', 'goshifuck'
-		if afraflag = 1:afraflag = 0 & cls & gt 'dorm', 'afragangfuck'
-		if kendraflag = 1:kendraflag = 0 & cls & gt 'dorm', 'kendrafuck'
+		if demarcusflag = 1:demarcusflag = 0 & gt 'dorm', 'demarcusfuck'
+		if goshiflag = 1:goshiflag = 0 & gt 'dorm', 'goshifuck'
+		if afraflag = 1:afraflag = 0 & gt 'dorm', 'afragangfuck'
+		if kendraflag = 1:kendraflag = 0 & gt 'dorm', 'kendrafuck'
 	end
 end
 
@@ -375,21 +375,34 @@ if $ARGS[0] = 'afragangfuck':
 	'You knocked on door and are greeted by a black giant. He grabs you by the arm and drags you into the room in which you see five Africans. They surrounded you and start to grab for your breasts and ass. The only words you understand are Cumdump, whore, white trash, bimbo slut.'
 	afrand = rand(1, afra)
 
-	if afrand = 1:'<center><img src="images/pics2/afra5.jpg"></center>'
-	elseif afrand = 2:'<center><img src="images/pics2/afra6.jpg"></center>'
-	elseif afrand = 3:'<center><img src="images/pics2/afra7.jpg"></center>'
-	elseif afrand = 4:'<center><img src="images/pics2/afra8.jpg"></center>'
-	elseif afrand = 5:'<center><img src="images/pics2/afra9.jpg"></center>'
-	elseif afrand = 6:'<center><img src="images/pics2/afra12.jpg"></center>'
-	elseif afrand = 7:'<center><img src="images/pics2/afra17.jpg"></center>'
-	elseif afrand = 8:'<center><img src="images/pics2/afra19.jpg"></center>'
-	elseif afrand = 9:'<center><img src="images/pics2/afra21.jpg"></center>'
-	elseif afrand = 10:'<center><img src="images/pics2/afra22.jpg"></center>'
-	elseif afrand = 11:'<center><img src="images/pics2/afra25.jpg"></center>'
-	elseif afrand = 12:'<center><img src="images/pics2/afra26.jpg"></center>'
-	elseif afrand >= 13:'<center><img src="images/pics2/afra27.jpg"></center>'
+	if afrand = 1:
+		'<center><img src="images/pics2/afra5.jpg"></center>'
+	elseif afrand = 2:
+		'<center><img src="images/pics2/afra6.jpg"></center>'
+	elseif afrand = 3:
+		'<center><img src="images/pics2/afra7.jpg"></center>'
+	elseif afrand = 4:
+		'<center><img src="images/pics2/afra8.jpg"></center>'
+	elseif afrand = 5:
+		'<center><img src="images/pics2/afra9.jpg"></center>'
+	elseif afrand = 6:
+		'<center><img src="images/pics2/afra12.jpg"></center>'
+	elseif afrand = 7:
+		'<center><img src="images/pics2/afra17.jpg"></center>'
+	elseif afrand = 8:
+	'<center><img src="images/pics2/afra19.jpg"></center>'
+	elseif afrand = 9:
+		'<center><img src="images/pics2/afra21.jpg"></center>'
+	elseif afrand = 10:
+		'<center><img src="images/pics2/afra22.jpg"></center>'
+	elseif afrand = 11:
+		'<center><img src="images/pics2/afra25.jpg"></center>'
+	elseif afrand = 12:
+		'<center><img src="images/pics2/afra26.jpg"></center>'
+	elseif afrand >= 13:
+		'<center><img src="images/pics2/afra27.jpg"></center>'
+	end
 	
-	gs 'clothing', 'strip'
 	gs 'stat'
 	i=6
 	:afraboys
@@ -402,21 +415,33 @@ if $ARGS[0] = 'afragangfuck':
 			sexpartkno = 1
 			cumprecheck = 1
 			gs 'cum_manage'
-		elseif fucloc = 1:anal += 1 & anus += 1
-		else throat += 1 & oral += 1
+		elseif fucloc = 1:
+			anal += 1 & anus += 1
+		else
+			throat += 1 & oral += 1
 		end
+		!random finishes, 17 and 18 default to spafinloc = 0
 		fucloc = rand(0,18)
 		if fucloc < 3:
-		elseif fucloc < 5:spafinloc = 1
-		elseif fucloc < 8:spafinloc = 3
-		elseif fucloc < 10:spafinloc = 4
-		elseif fucloc < 12:spafinloc = 12
-		elseif fucloc < 14:spafinloc = 11
-		elseif fucloc = 14:spafinloc = 8
-		elseif fucloc = 15:spafinloc = 13
-		elseif fucloc = 16:spafinloc = 14
-		elseif fucloc = 17:spafinloc = 15
-		else spafinloc = 16
+			spafinloc = 1
+		elseif fucloc < 6:
+			spafinloc = 3
+		elseif fucloc < 8:
+			spafinloc = 4
+		elseif fucloc < 10:
+			spafinloc = 12
+		elseif fucloc < 12:
+			spafinloc = 11
+		elseif fucloc = 12:
+			spafinloc = 8
+		elseif fucloc = 13:
+			spafinloc = 13
+		elseif fucloc = 14:
+			spafinloc = 14
+		elseif fucloc = 15:
+			spafinloc = 15
+		elseif fucloc = 16:
+			spafinloc = 16
 		end
 		gs 'cum_manage'
 		i -= 1
@@ -429,7 +454,7 @@ if $ARGS[0] = 'afragangfuck':
 	'The Africans have stripped and started to play with your body like a toy, giving you all sorts of poses and fucking you in all your holes in turns.'
 	'While they fucked you in all your holes you orgasmed a few times and African cum covers almost your entire body.'
 
-	act 'Leave':gs 'clothing', 'wear_last_worn' & gt 'dorm', 'korr'
+	act 'Leave':gt 'dorm', 'korr'
 end
 
 if $ARGS[0] = 'kendrafuck':
@@ -464,7 +489,6 @@ if $ARGS[0] = 'kendrafuck':
 			minut += 60
 			kendra = 5
 			tat = 5
-			vnesh += 20
 			gs 'stat'
 
 			if tatlip = 0:
@@ -507,7 +531,6 @@ if $ARGS[0] = 'kendrafuck':
 			minut += 60
 			kendra = 4
 			tat = 4
-			vnesh += 20
 			gs 'stat'
 
 			if tatvag = 3:
@@ -545,7 +568,6 @@ if $ARGS[0] = 'kendrafuck':
 			minut += 60
 			kendra = 3
 			tat = 3
-			vnesh += 20
 			gs 'stat'
 
 			if tatplech = 4:
@@ -583,7 +605,6 @@ if $ARGS[0] = 'kendrafuck':
 			minut += 60
 			kendra = 2
 			tat = 2
-			vnesh += 20
 			gs 'stat'
 
 			if tatleg = 1 or tatleg = 2:
@@ -624,7 +645,6 @@ if $ARGS[0] = 'kendrafuck':
 			minut += 60
 			kendra = 1
 			tat = 1
-			vnesh += 20
 			gs 'stat'
 
 			if tatupb = 4: