[fixed] no more nude dates with your friends in the city

locations/telefon.qsrc

@@ -771,7 +771,13 @@ if $ARGS[0] = 'mobilaraz':
 			if willAgree:
 				'<<$telsob>>, "See you in the park in an hour."'
 
-				act 'Go':gt 'parksvid'
+				act 'Go':
+					if $clothingworntype = 'nude':
+						gs 'clothing','wear_last_worn'
+						gs 'underwear','wear'
+					end
+					gt 'parksvid'
+				end
 			else
 				gs 'telefon','telotkaz',$telsob
 			end
@@ -797,7 +803,13 @@ if $ARGS[0] = 'mobilaraz':
 		if willAgree:
 			'<<$telsob>>, "See you at the pool hall in an hour."'
 
-			act 'Go':gt 'billsvid'
+			act 'Go':
+				if $clothingworntype = 'nude':
+					gs 'clothing','wear_last_worn'
+					gs 'underwear','wear'
+				end
+				gt 'billsvid'
+			end
 		else
 			gs 'telefon','telotkaz',$telsob
 		end
@@ -810,7 +822,13 @@ if $ARGS[0] = 'mobilaraz':
 		if willAgree:
 			'<<$telsob>>, "See you at the cafe in an hour."'
 
-			act 'Go':gt 'kafesvid'
+			act 'Go':
+				if $clothingworntype = 'nude':
+					gs 'clothing','wear_last_worn'
+					gs 'underwear','wear'
+				end
+				gt 'kafesvid'
+			end
 		else
 			gs 'telefon','telotkaz',$telsob
 		end
@@ -823,7 +841,13 @@ if $ARGS[0] = 'mobilaraz':
 		if willAgree:
 			'<<$telsob>>, "See you in the casino in an hour."'
 
-			act 'Go':gt 'kazinosvid'
+			act 'Go':
+				if $clothingworntype = 'nude':
+					gs 'clothing','wear_last_worn'
+					gs 'underwear','wear'
+				end
+				gt 'kazinosvid'
+			end
 		else
 			gs 'telefon','telotkaz',$telsob
 		end