19928/jj_vitp/Implementation/support/combat_step.e
Jocelyn Fiat 6dde6425c2 init
2024-06-17 09:09:33 +02:00

46 lines
909 B
Plaintext

note
description: "[
A {SEQUENTIAL_GAME_STEP} representing the combat
phase of {VITP_GAME}.
]"
author: "Jimmy J. Johnson"
date: "11/11/23"
copyright: "Copyright (c) 2023, Jimmy J. Johnson"
license: "Eiffel Forum v2 (http://www.eiffel.com/licensing/forum.txt)"
class
COMBAT_STEP
inherit
SEQUENTIAL_GAME_STEP
redefine
make
end
create
make
feature {NONE} -- Initialization
make (a_game: VITP_GAME)
-- Create an instance
do
Precursor {SEQUENTIAL_GAME_STEP} (a_game)
-- extend (create {SELECT_ACTION_TYPE_STEP}.make (a_game))
-- extend (create {FIRING_STEP}.make (a_game))
-- extend (create {SUBMARINE_FIRING_STEP}.make (a_game))
-- extend (create {RETREAT_PURSUIT_STEP}.make (a_game))
-- extend (create {LAND_AMPHIBIOUS_STEP}.make (a_game))
end
feature -- Access
name: STRING
-- Displayable name of Current step
do
Result := "Combat"
end
end