why don't you check it with QSP Analyzer?

locations/bed2.qsrc

@@ -432,7 +432,7 @@ if $ARGS[0] = 'wake_horny':
 			minut += 15
 			gs 'clothing', 'wear_last_worn'
 			if bed['shoetype'] ! 'none':
-				gs 'shoes', 'wear' $bed['shoetype'], bed['shoenumber']
+				gs 'shoes', 'wear', $bed['shoetype'], bed['shoenumber']
 			end
 			gs 'bed2', 'end'
 		end
@@ -494,7 +494,7 @@ if $ARGS[0] = 'wake':
 			minut += 15
 			gs 'clothing', 'wear_last_worn'
 			if bed['shoetype'] ! 'none':
-				gs 'shoes', 'wear' $bed['shoetype'], bed['shoenumber']
+				gs 'shoes', 'wear', $bed['shoetype'], bed['shoenumber']
 			end
 			gs 'bed2', 'end'
 		end
@@ -505,7 +505,7 @@ if $ARGS[0] = 'wake':
 			fullmorrout = 1
 			gs 'clothing', 'wear_last_worn'
 			if bed['shoetype'] ! 'none':
-				gs 'shoes', 'wear' $bed['shoetype'], bed['shoenumber']
+				gs 'shoes', 'wear', $bed['shoetype'], bed['shoenumber']
 			end
 			gs 'bed2', 'end'
 		end