That should work ok. Setscale -1,1 works for me.
Do you need to check for left as well as right. Maybe you could do this.
If PlayerDir=P_Right Then
SetScale 1,1 '<------
Else
SetScale -1,1 '<------
EndIf
DrawImage(PlayerIdle,PlayerX,PlayerY,PlayerFrame)