X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=examples%2Ffran.scm;h=79c005542f946154d0c85415a31e9fde800bcf7e;hb=58fd4b161304ba4fe37581a4bb9e83547a35f40b;hp=ea016f37b8541a4be8a3dd393b03272fdd7f49cf;hpb=2f85dc81c49441bfd939c268e1ccc125c9d1d399;p=gacela.git diff --git a/examples/fran.scm b/examples/fran.scm index ea016f3..79c0055 100644 --- a/examples/fran.scm +++ b/examples/fran.scm @@ -28,12 +28,10 @@ ;;; First example -(run-scene (import-bitmap "hello_world.bmp")) - -(define red (import-bitmap "red.bmp")) +(define red (bitmap "red.bmp")) (define left-right-red (move-xy wiggle 0 red)) (run-scene left-right-red) -(define blue (import-bitmap "blue.bmp")) +(define blue (bitmap "blue.bmp")) (define up-down-blue (move-xy 0 waggle blue)) (run-scene up-down-blue)