summaryrefslogtreecommitdiff
path: root/comp/lucas-standen-NEA/code2/examples/raylib_example/main.zpy
diff options
context:
space:
mode:
authorthing1 <thing1@seacrossedlovers.xyz>2024-10-21 08:37:33 +0100
committerthing1 <thing1@seacrossedlovers.xyz>2024-10-21 08:37:33 +0100
commitb8c4af0771371e0c91a57343892e991254c4bf0b (patch)
treea02db9fed691521822478f3e0f76b710ca535cb7 /comp/lucas-standen-NEA/code2/examples/raylib_example/main.zpy
parentfaef2d81c224b715c5e429d04c59ba50fb772d9e (diff)
did some electronics
Diffstat (limited to 'comp/lucas-standen-NEA/code2/examples/raylib_example/main.zpy')
-rw-r--r--comp/lucas-standen-NEA/code2/examples/raylib_example/main.zpy37
1 files changed, 0 insertions, 37 deletions
diff --git a/comp/lucas-standen-NEA/code2/examples/raylib_example/main.zpy b/comp/lucas-standen-NEA/code2/examples/raylib_example/main.zpy
deleted file mode 100644
index cd6a382..0000000
--- a/comp/lucas-standen-NEA/code2/examples/raylib_example/main.zpy
+++ /dev/null
@@ -1,37 +0,0 @@
-//# this function is my main loop
-(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)