Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- :: -------------------------------------------------------------------------------------------------------
- :: :rect x y h w requires :canvas, :showCanvas, :plot, :plotLine
- ::
- :: call :canvas 30 30
- ::
- :: call :rect 14 6 3 5
- ::
- :: call :showCanvas
- ::
- :: -------------------------------------------------------------------------------------------------------
- :rect x y h w
- set /a "rect_x=%~1", "rect_y=%~2", "rect_h=%~2 + %~4", "rect_w=%~1 + %~3"
- call :plotLine %rect_x% %rect_y% %rect_w% %rect_y% %5
- call :plotLine %rect_x% %rect_y% %rect_x% %rect_h% %5
- call :plotLine %rect_w% %rect_h% %rect_w% %rect_y% %5
- call :plotLine %rect_w% %rect_h% %rect_x% %rect_h% %5
- for %%a in (rect_h rect_w rect_x rect_y) do set "%%a="
- goto :eof
- :: -------------------------------------------------------------------------------------------------------
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement