1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 |
#Copyright (C) 2006 by Han Dao # 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 #This is the game SpaceAceFighter #You can contact the author at wikipediankiba@gmail.com weapon , fighter , enemy @weapon = weapon @fighter = fighter @enemy = enemy end weapon = @weapon fighter = @fighter weapon do |rect| if rect(fighter) return false end end (weapon) end weapon collide = 0 enemy = @enemy(true) weapon(enemy) do |rect,enemy| if rect(enemy) (collide) end collide += 1 end end collide @enemy(collide) end end |
Pastie