PK
Size: a a a
PK
AP
AP
PK
AP
AP
PK
PK
AP
n
AP
AP
AP
IZ
JC
Вл
PK
AV
data World = World [Object] Player
data WObject = WObject Graphics Object
data Object = ObjectBullet Bullet | ObjectEnemy
data ObjectBullet = Bullet Damage Velocity
data ObjectEnemy = Helicopter | Paratrooper
data Weapon
= Pistol
| MachineGun
| Modified Mod Weapon
data Mod = ModAmplifier Double | ModTripple
render :: WObject -> IO ()
fire :: Weapon -> [Object]
collision :: [Object] -> ([(Object, Object)],[Object])
-- или
move :: [Object] -> (Event Object)