A comprehensive Windows Batch Library, split into sublibraries to simplify and streamline the creation of command-line interfaces (CLIs) and text-based user interfaces (TUIs).
- Mathematical operations: From basic arithmetic to advanced trigonometry.
- Graphics generation: 2D visuals, shapes, and animations.
- Data visualization: Graphs, charts, and more.
- Time-saving utilities: Pre-written scripts for faster development.
- Consistency and reusability: Standardized and reusable functions.
NOTE:
Will open up the list of functions provided in a given library
Will open up the list of libraries provided inside of the ..\lib\ folder
@echo off & setlocal enableDelayedExpansion
call lib\stdlib 80 60
call lib\gfx
call lib\math
rem after this line, you have all of the variables and macros from the libraries called above.
pause
exit This is **NOT** a complete list of functions/abilities provided by these libraries.
Please feel free to look inside the source code of any of the library files to see
what else may be available to you.
call lib\Atlas wid hei
empties environment
%while% ( condition %end.while% )
\n
\e
@32bitlimit
wid/width , hei/height
ASCII.txt
Set of all ascii characters for you to view and use
call lib\3Dbox
%@box% x y sizeX sizeY sizeZ angleX angleY angleZ <rtn> !$box!
call lib\3x4font.bat "string" <rtn> %$3x4Font%
call lib\array_operations
%@shuffle[Array]% arrayName arrayLength
%@reverse[Array]% arrayName arrayLength
%arrayContains% arrayName arrayLength "value"
%@arrayToList% arrayName arrayLength listName
%@listToArray% listName arrayName
%@bubble[list]% %list%;newList
%@selection[list]% %list%;newList
call lib\buttons
%@makeButton% x y ID 'string'
echo %buttonDisplay% to view ALL buttons at once
%ifUserClicks_btn[ID]% where ID is the ID you provide.
%@killButton% 1 4 5 2 3 6 - to kill any or all buttons
%@makeSlider% x y length min max sliderColor positionColor
echo !sliderDisplay!
%ifSliderClicked% set /a "%moveSlider%"
%makeInputBar% rtnVar x y length TextColor BackColor
echo !inputDisplay!
%ifInputClicked%
call lib\calendar x y
echo %$calendar%
%@calendar.click% /l1,/l2,/r1,/r2
call lib\collision -> will probably rewrite these
PointPoint x1 y1 x2 y2 <rtn> !COLLISION! 0:false or 1:true
PointCircle x1 y1 cx cy r <rtn> !COLLISION! 0:false or 1:true
CircleCircle c1x c1y c1r c2x c2y c2r <rtn> !COLLISION! 0:false or 1:true
PointRect px py rx ry rw rh <rtn> !COLLISION! 0:false or 1:true
RectRect r1x r1y r1w r1h r2x r2y r2w r2h <rtn> !COLLISION! 0:false or 1:true
CircleRect cx cy r rx ry rw rh <rtn> !COLLISION! 0:false or 1:true
LinePoint x1 y1 x2 y2 px py <rtn> !COLLISION! 0:false or 1:true
LineCircle x1 y1 x2 y2 cx cy r <rtn> !COLLISION! 0:false or 1:true
LineLine x1 y1 x2 y2 x3 y3 x4 y4 <rtn> !COLLISION! 0:false or 1:true
LineRect x1 y1 rx ry rw rh <rtn> !COLLISION! 0:false or 1:true
LineRect_EDGE x1 y1 rx ry rw rh <rtn> !COLLISION! !top! !bottom! !left! !right! 0:false or 1:true
call lib\encoding
%@toHex% INT <rtn> !$hex!
%hexToBase2% 1B out <rtnVar>
%hexToBase4% 1B out <rtnVar>
%encode% "string" <rtn> base64
%decode:?=!base64!% <rtn> plainText.txt
call lib\gfx
%@point% y;x 2/5;0-255;0-255;0-255
%@ellipse% x y ch cw color <rtn> $ellipse
%@circle% cx cy cr COLOR <rtn> !$circle!
%@fillCircle% radius color <rtn> !$fillCircle!
%@rect% x y w h <rtn> !$rect!
%@fillRect% x y w h color <rtn> !$fillRect!
%@roundrect% x y w h r color <rtn> !$roundrect!
%@triangle% x1 y1 x2 y2 x3 y3 color <rtn> !$triangle!
call lib\gfxline dda/bresenham -> default = DDA
%@line% x0 y0 x1 y1 color <rtn> $line
call lib\gfxtra
%@bar% currentValue maxValue MaxlengthOfBar
%@sevenSegmentDisplay% x y value color <rtn> $sevenSegmentDisplay
%@msgBox% ;title;text;x;y;textColor;boxColor;boxLength
%@arc% x y size DEGREES(0-360) arcRotationDegrees(0-360) lineThinness color
%@AAline% x0 x1 y0 y1 <rtn> !$AAline!
%@bezier% x1 y1 x2 y2 x3 y3 x4 y4 color <rtn> !$bezier!
call lib\gfxUtil
%@getDim% - get current dimensions of window <rtn> !wid! !width! !hei! !height!
%@delay:x=10%
%@background% color1 color2 lineColor2Starts
%@fullscreen%
%HSL.RGB% 0-3600 0-10000 0-10000 <rtn> r g b
%@fps% <rtn> deltaTime, FPS, $TT, $min, $sec, frameCount
call lib\logicGates
lss(x,y) <rtn> 0:false or 1:true
leq(x,y) <rtn> 0:false or 1:true
gtr(x,y) <rtn> 0:false or 1:true
geq(x,y) <rtn> 0:false or 1:true
equ(x,y) <rtn> 0:false or 1:true
neq(x,y) <rtn> 0:false or 1:true
and(b1,b2) <rtn> 0:false or 1:true
or(b1,b2) <rtn> 0:false or 1:true
xor(b1,b2) <rtn> 0:false or 1:true
tern(bool,v1,v2) <rtn> ?:
call lib\math
rnd(x,y) set /a "x=, y=, out=%rnd(x,y)%"
rndSgn_A set /a "out=%rndSgn_A%"
rndSgn_B set /a "out=%rndSgn_B%"
rndRGB set /a "%rndRGB%" output: !r! !g! !b!
log2 set /a "x=, out=%@log2%"
log10 set /a "x=, out=%@log10%"
sqrt set /a "n=, out=%sqrt%"
isqrt set /a "x=, out=%isqrt%"
mag set /a "x=, y=, out=%mag%"
abs set /a "x=, out=%abs%"
sgn set /a "x=, out=%sgn%"
sign set /a "x=, out=%sign%"
max set /a "x=, y=, out=%max%"
min set /a "x=, y=, out=%min%"
floor set /a "x=, y=multiple of 10, out=%floor%"
ceil set /a "x=, y=multiple of 10, out=%ceil%"
swap set /a "x=, y=, %swap%"
cmp set /a "x=, y=, out=%cmp%"
pow set /a "x=, n=, %pow%" & %@pow% output: !$pow!
call lib\math_geo
dist set /a "x1=, y1=, x2=, y2=, out=%dist%"
boundingBox set /a "x=, y=, a=, b=, c=, d=, out=%BBA%"
det set /a "u1=, u2=, v1=, v2=, out=%det%"
dot set /a u1=, v1=, u2=, v2=, out=%dot%
matrixMul_2x2 set /a "a1=, b1=, c1=, d1=, a2=, b2=, c2=, d2=, %matrixMul_2x2%" output: !$a!-!$d!
matrixMul_3x3 set /a "a=, b=, c=, d=, e=, f=, g=, h=, i=, j=, k=, l=, m=, n=, o=, p=, q=, r=, %matrixMul_3x3%" output: !$a!-!$i!
call lib\math_lerp
map set /a "v=, a=, b=, c=, d=, out=%map%"
lerp set /a "a=, b=, c=, out=%lerp%"
constrain set /a "lo=, hi=, x=, value=%@constrain%"
interpolate set /a "a=, b=, c=, out=%interpolate%"
smoothstep_A set /a "x=, out=%smoothStep_A%"
smoothstep_B set /a "x=, out=%smoothStep_B%"
fade_A set /a "x=, out=%fade_A%"
fade_B set /a "x=, out=%fade_B%"
bitColor set /a "r=, g=, b=, out=%bitColor%"
call lib\math_trig degrees/radians
sin degrees/radians set /a "out=rad * !sin:x=angle!/10000"
cos degrees/radians set /a "out=rad * !cos:x=angle!/10000"
rotate degrees/radians
tan degrees set /a "out=%tan:x=value * 10%"
atan degrees/radians set /a "x=, out=%atan%"
atan2 degrees/radians set /a "x=, y=, out=%atan2%"
tau / two_pi 62832 -> 6.2832
pi 31416 -> 3.1416
pi32 47124 -> 4.7124
half_pi 15708 -> 1.5708
quarter_pi 7854 -> 0.7854
call lib\math_misc
gravity set /a "gravity:?=VARIABLE_AFFECTED"
every set /a "%every:x=frames%" ; must define %frameCount%
getState set /a "a=, b=, c=, d=, out=%getState%"
call lib\geometry
SQ(x)
CUBE(x)
pmSQ(x)
pmREC(l,w)
pmTRI(a,b,c)
areaREC(l,w)
areaTRI(b,h)
areaTRA(b1,b2,h)
volBOX(l,w,h)
areaCircle(r)
security.bat -> needs to be turned into macros, not complete, can still be used as functions
:scriptGuard
:executionLimit
:machineLock
:dateExpiry
call lib\util
%@getAdmin% no arguments/output
%@download% url file - to remain backward compatible, PowerShell.
%@unique% no arguments/output
%getlen% var <rtn> $len
%string_properties% "string" <rtn> $, $_rev $_upp $_low
%@modFile% line#/file.txt/string/e,i,a,p,d/b-ackup
call lib\turtleGFX
%turtle.move% X/-X
%turtle.left% 90
%turtle.right% 90
%turtle.setx% 90
%turtle.sety% 90
%turtle.setHeading% 45
%turtle.goto% x y - will draw line to location
%turtle.teleport% x y - will NOT draw line to location
%turtle.define% x y heading - redefine turtle properties
%turtle.circle% width height - draws ellipse at location
%turtle.color% R G B - set turtle color
%turtle.HSLtoRGB% HUE SAT LUM - set turtle color
%turtle.stamp% - stamp screen with stamp.id
%turtle.dot% - stamp screen with dot
%turtle.plot% - stamp screen with dot
%turtle.screenSize% wid hei - set screen size
%turtle.push% - save location and heading to array
%turtle.pop% - return to saved location
%turtle.home% - send turtle to 0,0
%turtle.center% - send turtle to middle screen
%turtle.penDown% - begin draw
%turtle.penUp% - stop draw
%turtle.clearScreen% - clear screen
call lib\radish
This is how you execute radish in a separate process
( %radish% "%~nx0" radish_wait ) & exit
:radish_wait
( %while% if exist "radish_ready" %end.while% ) & del /f /q "radish_ready"
%@radish% <no arguments> <rtn> !mouseX! !mouseY! !L_click! !R_click! !B_click! !scrollUp! !scrollDown! !keysPressed!
call lib\sound
%@playSound% "%sfx%\"+ Click and Drag your sketch onto `LibZip.bat` to zip your sketch project
+ the libraries used inside `SKETCH.bat` will be zipped for you *automatically*
