Here is what I thought would work, but apparently does not:
function ScreenDraw()
-- left line
Line1x1 = -16000 - GetCameraX() / GetCameraScale()
Line1y1 = -16000 - GetCameraY() / GetCameraScale()
Line1x2 = -16000 - GetCameraX() / GetCameraScale()
Line1y2 = 16000 - GetCameraY() / GetCameraScale()
-- bottom line
Line2x1 = -16000 - GetCameraX() / GetCameraScale()
Line2y1 = -16000 - GetCameraY() / GetCameraScale()
Line2x2 = 16000 - GetCameraX() / GetCameraScale()
Line2y2 = -16000 - GetCameraY() / GetCameraScale()
-- right line
Line3x1 = 16000 - GetCameraX() / GetCameraScale()
Line3y1 = -16000 - GetCameraY() / GetCameraScale()
Line3x2 = 16000 - GetCameraX() / GetCameraScale()
Line3y2 = 16000 - GetCameraY() / GetCameraScale()
-- top line
Line4x1 = -16000 - GetCameraX() / GetCameraScale()
Line4y1 = 16000 - GetCameraY() / GetCameraScale()
Line4x2 = 16000 - GetCameraX() / GetCameraScale()
Line4y2 = 16000 - GetCameraY() / GetCameraScale()
DrawLine(Line1x1,Line1y1,Line1x2,Line1y2,0,0,1,1,0,1,0,1,3)
DrawLine(Line2x1,Line2y1,Line2x2,Line2y2,0,0,1,1,0,1,0,1,3)
DrawLine(Line3x1,Line3y1,Line3x2,Line3y2,0,0,1,1,0,1,0,1,3)
DrawLine(Line4x1,Line4y1,Line4x2,Line4y2,0,0,1,1,0,1,0,1,3)
end