1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
' Hardwire ' ' Copyright 2005 Ian Cowburn ' ' $Id$ ' Strict Import "types.bmx" Import "gametypes.bmx" Type TGame Field score:Int Field gm:TGameMap Method New() score=0 gm=New TGameMap End Method End Type