remove colons from else clauses

locations/castSpell.qsrc

@@ -39,7 +39,7 @@ if spellKnown[$SpellName] = 1:
 		!Failure
 		spellSuccess = 0
 		splcstng_exp += rand(1,spellDiff[$SpellName]) / 2
-	else:
+	else
 		!Critical Failure
 		spellSuccess = -1
 		splcstng_exp += rand(1,spellDiff[$SpellName]) / 2
@@ -51,7 +51,7 @@ if spellKnown[$SpellName] = 1:
 		manaCost = spellMana[$SpellName] / 2
 	elseif spellSuccess = -1:
 		manaCost = spellMana[$SpellName] * 2
-	else:
+	else
 		manaCost = spellMana[$SpellName]
 	end
 	pcs_manna -= manaCost

locations/lab.qsrc

@@ -253,7 +253,7 @@ if $ARGS[0] = 'ListBuilder':
 	if i < arrsize('<<$bodyModDesc>>'):
 		if $bodyModIndx = 'i':
 			bodymodValue = i
-		else:
+		else
 			bodymodValue = dyneval("result = <<$bodyModIndx>>[<<i>>]")
 		end
 		$bodyModDescX = dyneval('$result = <<$bodyModDesc>>[<<i>>]')

locations/spellList.qsrc

@@ -12,6 +12,12 @@ spellTime['glamour'] = 1
 spellDiff['glamour'] = 30
 $spellName['teleport'] = "Glamour"
 $spellDesc['teleport'] = "Change your appearance."
+!bodymod
+spellMana['bodymod'] = 40
+spellTime['bodymod'] = 30
+spellDiff['bodymod'] = 0
+$spellName['bodymod'] = "Body Modification"
+$spellDesc['bodymod'] = "Change your appearance."
 
 
 

locations/spell_teleport.qsrc

@@ -18,7 +18,7 @@ if didItWork > 0:
 	wait 1000
 	if $treeCircArg[$NewLocation] = "":
 		gt $treeCircLoc[$NewLocation]
-	else:
+	else
 		gt $treeCircLoc[$NewLocation], $treeCircArg[$NewLocation]
 	end
 elseif didItWork < 0:
@@ -27,10 +27,10 @@ elseif didItWork < 0:
 	wait 1000
 	if $treeCircArg[$randomLoc] = "":
 		gt $treeCircLoc[$randomLoc]
-	else:
+	else
 		gt $treeCircLoc[$randomLoc], $treeCircArg[$randomLoc]
 	end
-else:
+else
 	'You feel drained, but the energy fizzles out and nothing happens'
 end
 

locations/treeCircActs.qsrc

@@ -8,11 +8,11 @@ if $EntryPoint = $ARGS[0]:
 	act 'Leave the circle to <<$treeCircName[$ARGS[0]]>>':
 		if $treeCircArg['<<$ARGS[0]>>'] = '':
 			gt $treeCircLoc['<<$ARGS[0]>>']
-		else:
+		else
 			gt $treeCircLoc['<<$ARGS[0]>>'], $treeCircArg['<<$ARGS[0]>>']
 		end
 	end
-else:
+else
 	if canTeleport = 1 and tpKnown[$ARGS[0]] = 1:
 		$dynAction = "act 'Will yourself to <<$treeCircName[$ARGS[0]]>>': gs 'castSpell', 'teleport', '<<$ARGS[0]>>'"
 		dynamic $dynAction

locations/treeCircEntry.qsrc

@@ -7,7 +7,7 @@ if MagikDostup = 0:
 	! Setup for teleport circle
 	if tpKnown[$ARGS[0]] = 1:
 		$EntryAction = "act 'Enter the hidden circle of trees': gt 'treeCircle', '<<$ARGS[0]>>'"
-	else:
+	else
 		$EntryAction = "act 'Investigate a mysterious copse of trees': gt 'treeCircle', '<<$ARGS[0]>>'"
 	end
 	dynamic $EntryAction

locations/treeCircle.qsrc

@@ -53,11 +53,11 @@ if spellKnown['teleport'] = 1:
 	minut += 15
 	if pcs_manna > spellMana['teleport']:
 		canTeleport = 1
-	else:
+	else
 		*nl
 		'You feel too tired to pull off a shift right now.'
 	end
-else:
+else
 	'You can feel something strange and powerful in this place, but you can''t quite put your finger on it.  It is intriguing, though, so you take your time and loook the place over to try to understand it.'
 	minut += 15
 end