scripts/main.scm


1
2
3
4
5
6
7
8
9
10
11

(define a 0)

(define update
  (lambda ()
    (set! a (+ a 1))
    ))

(define draw
  (lambda ()
    (rl-draw-text (string-append (number->string a) " oi "))
    ))