(raylib)

raylib-owl

WIP raylib bindings for owl lisp

api.md imported (and tweaked a bit) from janet-lang/jaylib, it is probably a bit outdated.

dependencies

raylib from @master - tested on f1007554a0a8145060797c0aa8169bdaf2c1c6b8
GNU sed - BSD one may not work
GNU make

how

Owl lisp supports C extensions via custom sys-prims - basically syscalls, but to C functions, not the system. You define a word prim_custom(int op, word a, word b, word c) in a C file, then call (sys-prim op a b c) from the lisp side, and then compile and link them together.

bootstraping `ol-rl`

ol-rl is the same thing as ol, but with compiled-in support for raylib sys-prims, so it will be then used to interpret and/or compile Owl lisp programs that depend on raylib.

$ make all
# make install

compiling stuff

unix

$ ol-rl -o test.c test.scm
$ cc test.c -lraylib -lm -o test
$ ./test

unix targetting windows

$ wget https://pub.krzysckh.org/ol-rl.exe
$ wget https://pub.krzysckh.org/libraylib5-winlegacy.a
$ wine ol-rl.exe -o test-w32.c test.scm
$ i686-w64-mingw32-gcc -static -o test.exe -I/usr/local/include test-w32.c -L. -l:libraylib5-winlegacy.a -lm -lopengl32 -lwinmm -lgdi32 -lws2_32

windows targetting windows (the easy way)

Pre-compiled libraylib5-winlegacy.a and ol-rl.exe are targetted at 32-bit systems. They will run just fine on 64-bit MS windows, but you should keep the 32-bitness in mind.
- download x86 w64devkit from https://github.com/skeeto/w64devkit/releases/tag/v2.0.0
- launch w64devkit.exe and do the following:

$ wget https://pub.krzysckh.org/ol-rl.exe
$ wget https://pub.krzysckh.org/libraylib5-winlegacy.a
$ git clone https://github.com/raysan5/raylib
$ ol-rl.exe -o filename.c filename.scm
$ i686-w64-mingw32-gcc -static -o filename.exe -Iraylib/src filename.c -L. -lraylib5-winlegacy -lm -lopengl32 -lwinmm -lgdi32 -lws2_32
# if you don't want the console to appear when filename.exe is launched, append -mwindows to the last command

usage on ms windows

If you're on windows, you can download the pre-compiled ol-rl.exe binary here. If running it as a REPL, remember to use --no-readline.

targetting web with emscripten

compile raylib targetting web, or use this pre-compiled binary

$ git clone https://github.com/raysan5/raylib
$ cd raylib/src
$ make clean all PLATFORM=PLATFORM_WEB

compile your code for web

$ ol-rl -o test.c test.scm
$ emcc -DPLATFORM_WEB -I/usr/local/include test.c /path/to/libraylib-web.a -o test.html -s USE_GLFW=3 -s ERROR_ON_UNDEFINED_SYMBOLS=0 -s ALLOW_MEMORY_GROWTH=1 -s ASYNCIFY -s ASSERTIONS=0

gotchas and caveats

Remember, that everything that can be evaluated at compile-time, will probably be evaluated at compile time. This can be used to embed files, or as a footgun.
Remember, that there is no mutable data. For "variables", that may change depending on frames, scrap the with-mainloop macro, and define Your own mainloop function, that tail-recurses into itself, and sets the "variables" as arguments.
There is no type checking. You're on your own.
The c code sucks, and i need to come up with some better api for writing extensions, but for now - it is what it is.
You can treat the source code as the docs, because this is (for now) not good.
Good luck.

TODOs

./raylib.scm: (raylib)

##false Exported values:

draw
with-window
with-mainloop
vec
(vec2 a b)
(vec3 a b c)
(vec4 a b c d)
make-vector
rec
rectangle
rect
(exports (raylib window))
(exports (raylib io))
(exports (raylib draw))
(exports (raylib util))
(exports (raylib audio))
(exports (raylib const))
(exports (raylib raymath))
(exports (raylib image))

./raylib/common.scm: (raylib common)

##false Exported values:

(maybe-bytevectorize lst)
(prim n . vs)

./raylib/window.scm: (raylib window)

##false Exported values:

./raylib/util.scm: (raylib util)

##false Exported values:

(collision-rects? rec1 rec2)
(collision-circles? c1 rad1 c2 rad2)
(collision-circle-rect? center rad rect)
(collision-rects rec1 rec2)
(collision-point-rect? pt rect)
(collision-point-circle? pt center rad)
collision-point-triangle?
(truncate-precision n . max-precision)

./raylib/raymath.scm: (raylib raymath)

##false Exported values:

./raylib/const.scm: (raylib const)

##false Exported values:

./raylib/image.scm: (raylib image)

##false Exported values:

(image-format img t)
(image-to-pot img c)
(image-alpha-crop img fl)
(image-alpha-clear img c fl)
(image-alpha-mask img1 img2)
(image-alpha-premultiply i)
(image-blur-gaussian i f)
(image-resize i w h)
(image-resize-nn i w h)
(image-mipmaps i)
(image-dither i r g b a)
(image-flip-v i)
(image-flip-h i)
(image-rotate i deg)
(image-rotate-cw i)
(image-rotate-ccw i)
(image-color-tint i c)
(image-color-invert i)
(image-color-grayscale i)
(image-color-contrast i flt)
(image-color-brightness i n)
(image-color-replace i c1 c2)
(gen-image-color w h c)
(gen-image-gradient-linear w h dir start end)
(gen-image-gradient-radial w h density inner outer)
(gen-image-gradient-square w h density inner outer)
(gen-image-checked w h cx cy c1 c2)
(raw-bytevector->image w h bv)
make-image
(image->list i)
(image->list-palette i maxp)
image-colors
image-palette

./raylib/audio.scm: (raylib audio)

##false Exported values:

./raylib/io.scm: (raylib io)

##false Exported values:

./raylib/draw.scm: (raylib draw)

##false Exported values:

draw-pixel
draw-rectangle
draw-rectangle-lines
(draw-line p1 p2 color)
(draw-line-simple x1 y1 x2 y2 color)
(draw-line-ex p1 p2 thick color)
(draw-line-bezier p1 p2 thick color)
(draw-line-strip pts color)
(draw-circle-sector pos rad start-angle end-angle segments color)
(draw-circle-sector-lines pos rad start-angle end-angle segments color)
(draw-circle-gradient pos rad color1 color2)
(draw-circle pos rad color)
(draw-circle-lines pos rad color)
(draw-ring center inner-rad outer-rad start-ang end-ang segments color)
(draw-ring-lines center inner-rad outer-rad start-ang end-ang segments color)
(draw-rectangle-simple x y w h color)
(draw-rectangle-gradient-v pos w h col1 col2)
(draw-rectangle-gradient-h pos w h col1 col2)
(draw-rectangle-gradient-ex rec col1 col2 col3 col4)
(draw-rectangle-rounded rect roundness segments color)
(draw-rectangle-rounded-lines rect roundness segments color)
draw-triangle
draw-triangle-lines
draw-triangle-fan
draw-triangle-strip
(draw-poly center sides radius rot color)
draw-texture
(draw-texture-ex t pos rot scale tint)
(draw-texture-pro t source-rect dest-rect origin rot tint)
(draw-texture-rec t rect pos tint)
draw-fps
(draw-text font text pos f-size spacing color)
(draw-text-simple text pos font-size color)
measure-text