Scaling for idiots

You could try something like this...

For n = -4 To 4
	Print n
	Print MyScale#(n)
	Print
Next

Function MyScale#(val#)
	If val<0 Then
		Return 1.0/val
	Else
		Return val
	EndIf
End Function