Mercurial > projects > ldc

diff demos/sdldemo1.d @ 38:27b2f40bdb58 trunk

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back. Fiddled a bit the the testing system. Added a very simple SDL graphics demo.
author lindquist
date Wed, 10 Oct 2007 06:16:48 +0200
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/demos/sdldemo1.d	Wed Oct 10 06:16:48 2007 +0200
@@ -0,0 +1,15 @@
+module sdldemo1;
+import sdl;
+void main()
+{
+    auto disp = SDL_SetVideoMode(640,480,0,SDL_HWSURFACE|SDL_DOUBLEBUF);
+    auto r = SDL_Rect(0,190,100,100);
+    auto c = SDL_MapRGBA(disp.format,255,100,0,255);
+    while (r.x < disp.w-100) {
+        SDL_FillRect(disp, null, 0);
+        SDL_FillRect(disp, &r, c);
+        SDL_Flip(disp);
+        r.x++;
+    }
+}
+