[Super-tux-commit] supertux/data/levels/default bonusisland.stwm,1.1.2.17,1.1.2.18

[Marek M. <wa...@us...>]

Update of /cvsroot/super-tux/supertux/data/levels/default
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2204/data/levels/default

Modified Files:
      Tag: supertux_0_1_1_branch
	bonusisland.stwm 
Log Message:
hacked in a very simple but working teleporter,
"That's-really-all-I'm-asking-for-edition" :-)
anyone who is more into the code than i am, please revise!


Index: bonusisland.stwm
===================================================================
RCS file: /cvsroot/super-tux/supertux/data/levels/default/Attic/bonusisland.stwm,v
retrieving revision 1.1.2.17
retrieving revision 1.1.2.18
diff -u -d -r1.1.2.17 -r1.1.2.18
--- bonusisland.stwm	10 Aug 2004 16:18:08 -0000	1.1.2.17
+++ bonusisland.stwm	10 Aug 2004 21:18:11 -0000	1.1.2.18
@@ -155,7 +155,12 @@
     (level (map-message "- Something is blocking the way.")
            (x 34)
            (y 4) (apply-action-left #f) (passive-message #f))
-
+    (level (teleporter #t)
+	        (x 35)
+			  (y 3)
+			  (teleport-message "Warp to Castle")
+			  (dest_x 35)
+			  (dest_y 30))
 
   )
 )