summaryrefslogtreecommitdiff
path: root/comp/lucas-standen-NEA/code2/examples/raylib_example.zpy
diff options
context:
space:
mode:
Diffstat (limited to 'comp/lucas-standen-NEA/code2/examples/raylib_example.zpy')
-rw-r--r--comp/lucas-standen-NEA/code2/examples/raylib_example.zpy36
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)