Realtime Flipping and SetScale

Well I have posted this help 4 times and no one has replyed can someone please help me with this :( I want to flip my images for a platformer im working on..

Function PlayerUpdate()

	Select PlayerState
		
		Case P_Idle
		
			If PlayerDir=P_Right Then 
				SetScale 1,1 '<------
				DrawImage(PlayerIdle,PlayerX,PlayerY,PlayerFrame)
			ElseIf PlayerDir=P_Left Then
				SetScale -1,1 '<------
				DrawImage(PlayerIdle,PlayerX,PlayerY,PlayerFrame)			
			EndIf
			
		Case P_Run
		
			If PlayerDir=P_Right Then 
				SetScale 1,1 '<------
				DrawImage(PlayerRun,PlayerX,PlayerY,PlayerFrame)
			ElseIf PlayerDir=P_Left Then
				SetScale -1,1 '<------
				DrawImage(PlayerRun,PlayerX,PlayerY,PlayerFrame)			
			EndIf
			
			PlayerWait = PlayerWait + 1
			If PlayerWait > 3 Then
				PlayerFrame = PlayerFrame + 1
				PlayerWait = 0
				If PlayerFrame > PlayerFMax Then PlayerFrame = 0
			EndIf
			
	EndSelect
	
	PlayerMove()

EndFunction

This doesn't seem to have any effect of my Flipping the image just goes away... Please help