[changed] split up deckshuffle to try to fix the freezes while playing blackjack

locations/deckShuffle.qsrc

@@ -1,39 +1,48 @@
 # deckShuffle
 
-killvar 'deckFace'
-killvar '$deckImg'
+if $ARGS[0] = 'sort':
+	killvar 'deckFace'
+	killvar '$deckImg'
 
-i = 0
-:loop1
-if i < 4:
-	i += 1
-	if i = 1: $text = 'Spades'
-	if i = 2: $text = 'Hearts'
-	if i = 3: $text = 'Clubs'
-	if i = 4: $text = 'Diamonds'
-	j = 0
-	:loop2
-	if j < 13:
-		j += 1
-		deckFace[] = j
-		$deckImg[] = 'images/locations/city/industrial/casino/cards/<<$text>>/<<j>>.jpg'
-		jump 'loop2'
+	i = 0
+	:loop1
+	if i < 4:
+		i += 1
+		if i = 1: 
+			$text = 'Spades'
+		elseif i = 2: 
+			$text = 'Hearts'
+		elseif i = 3: 
+			$text = 'Clubs'
+		elseif i = 4: 
+			$text = 'Diamonds'
+		end
+		j = 0
+		:loop2
+		if j < 13:
+			j += 1
+			deckFace[] = j
+			$deckImg[] = 'images/locations/city/industrial/casino/cards/<<$text>>/<<j>>.jpg'
+			jump 'loop2'
+		end
+		jump 'loop1'
 	end
-	jump 'loop1'
 end
 
-i = 0
-:loop3
-if i < 52:
-	j = rand(0, 51)
-	temp = deckFace[i]
-	deckFace[i] = deckFace[j]
-	deckFace[j] = temp
-	$text = $deckImg[i]
-	$deckImg[i] = $deckImg[j]
-	$deckImg[j] = $text
-	i += 1
-	jump 'loop3'
+if $ARGS[0] = 'shuffle':
+	i = 0
+	:loop3
+	if i < 52:
+		j = rand(0,51)
+		temp = deckFace[i]
+		deckFace[i] = deckFace[j]
+		deckFace[j] = temp
+		$text = $deckImg[i]
+		$deckImg[i] = $deckImg[j]
+		$deckImg[j] = $text
+		i += 1
+		jump 'loop3'
+	end
 end
 
 --- deckShuffle ---------------------------------