diff options
Diffstat (limited to 'comp/lucas-standen-NEA/code2/examples/raylib_example.zpy')
-rw-r--r-- | comp/lucas-standen-NEA/code2/examples/raylib_example.zpy | 36 |
1 files changed, 0 insertions, 36 deletions
diff --git a/comp/lucas-standen-NEA/code2/examples/raylib_example.zpy b/comp/lucas-standen-NEA/code2/examples/raylib_example.zpy deleted file mode 100644 index 7c6e599..0000000 --- a/comp/lucas-standen-NEA/code2/examples/raylib_example.zpy +++ /dev/null @@ -1,36 +0,0 @@ -(defun main int) - (InitWindow 800 800 "test test") - (SetTargetFPS 60) - - (let img:Image (LoadImage "dvd.png")) - (let tex:Texture (LoadTextureFromImage img)) - (UnloadImage img) - - (let x:int (randint 4 9)) - (let y:int (randint 4 9)) - (let xd:int (randint 3 5)) - (let yd:int (randint 3 5)) - - (for i:int 0 (= (WindowShouldClose) 0) 0) - (BeginDrawing) - (ClearBackground RAYWHITE) - (DrawTexture tex x y WHITE) - (EndDrawing) - - (set x (+ x xd)) - (set y (+ y yd)) - - (if (> x 750)) - (set xd -xd) - (elif (< x 0)) - (set xd -xd) - (endif) - (if (> y 750)) - (set yd -yd) - (elif (< y 0)) - (set yd -yd) - (endif) - - (endfor) - (CloseWindow) -(endfun) |