# # Copyright 2005 by Mark Weyer # # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program; if not, write to the Free Software # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA # Ziehlen={ name = "Finger practice" name[de] = "Fingerübung" author = "Mark Weyer" pics = gruen greypic = rot emptypic = nichts startpic = mziAlle.xpm startdist = "EEEEEEEEEE" toptime = 30 toptime1 = 20 numexplode = 100 << var loch; semiglobal.init = {loch = 7}; semiglobal = { if 1:4 -> switch { (loch+41) : 95 -> loch-=1; -> loch+=1; }; if loch<-3 -> loch=-3; if loch>16 -> loch=16; if ((loc_x@@0*2 < loch) || (loc_x@@0*2 > loch+5) || (loc_x@@1*2 < loch) || (loc_x@@1*2 > loch+5)) && ((loc_y@@0==6) || (loc_y@@1==6)) -> { kind@@0 = rot; kind@@1 = rot; }; }; >> gruen = { pics = mziAlle.xpm << gruen = { *; if (!falling) && (loc_y<=6) -> kind@(0,0)=rot; }; >> } rot = { pics = mziAlle.xpm << rot = { B*; if !falling -> kind@(0,0)=nothing; }; >> } nichts = { pics = mziAlle.xpm << nichts = { if loc_y==6 -> { loch = 2*loc_x-loch@@;; switch { (loch<=-3) || (loch>=8) -> G*; (loch>=0) && (loch<=5) -> ; loch==-2 -> D*; loch==-1 -> H*; loch==6 -> F*; loch==7 -> C*; }; } }; >> } }