Screen 12
Print "---默认窗口坐标映射---"
Print "绘制笔位置,默认(0,0):"
Print "物理:", PointCoord( 0 ), PointCoord( 1 )
Print "视图:", PointCoord( 2 ), PointCoord( 3 )
Draw "BM 50,50"
Print "拉笔笔位置后,移动到(50,50):"
Print "物理:", PointCoord( 0 ), PointCoord( 1 )
Print "视图:", PointCoord( 2 ), PointCoord( 3 )
Print "---改变窗口坐标映射---"
Window Screen (-100, -100) - (100, 100)
Draw "BM 0,0"
Print "绘制笔位置后,移动到(0,0):"
Print "物理:", PointCoord( 0 ), PointCoord( 1 )
Print "视图:", PointCoord( 2 ), PointCoord( 3 )
Draw "BM 50,50"
Print "拉笔笔位置后,移动到(50,50):"
Print "物理:", PointCoord( 0 ), PointCoord( 1 )
Print "视图:", PointCoord( 2 ), PointCoord( 3 )
Sleep