Public DummyShip As DummyShipType


Type DummyRoomType
    ID As Integer
End Type

Type DummyShipType
    loc(17, 14) As DummyRoomType
End Type