note description: "wbstartstruct_t from d_player.h" license: "[ Copyright (C) 1993-1996 by id Software, Inc. Copyright (C) 2005-2014 Simon Howard Copyright (C) 2021 Ilgiz Mustafin 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. ]" class WBSTARTSTRUCT_T create default_create feature epsd: INTEGER_32 assign set_epsd set_epsd (a_epsd: like epsd) do epsd := a_epsd end didsecret: BOOLEAN assign set_didsecret -- if true, splash the secret level set_didsecret (a_didsecret: like didsecret) do didsecret := a_didsecret end last: INTEGER_32 assign set_last set_last (a_last: like last) do last := a_last end next: INTEGER_32 assign set_next set_next (a_next: like next) do next := a_next end maxkills: INTEGER_32 assign set_maxkills set_maxkills (a_maxkills: like maxkills) do maxkills := a_maxkills end maxitems: INTEGER_32 assign set_maxitems set_maxitems (a_maxitems: like maxitems) do maxitems := a_maxitems end maxsecret: INTEGER_32 assign set_maxsecret set_maxsecret (a_maxsecret: like maxsecret) do maxsecret := a_maxsecret end maxfrags: INTEGER_32 assign set_maxfrags set_maxfrags (a_maxfrags: like maxfrags) do maxfrags := a_maxfrags end partime: INTEGER_32 assign set_partime set_partime (a_partime: like partime) do partime := a_partime end pnum: INTEGER_32 assign set_pnum -- index of this player in game set_pnum (a_pnum: like pnum) do pnum := a_pnum end Plyr: ARRAY [WBPLAYERSTRUCT_T] local i: INTEGER_32 once create Result.make_filled (create {WBPLAYERSTRUCT_T}, 0, {DOOMDEF_H}.maxplayers - 1) from i := 0 until i >= {DOOMDEF_H}.maxplayers loop Result [i] := create {WBPLAYERSTRUCT_T} i := i + 1 end ensure Result.lower = 0 Result.count = {DOOMDEF_H}.maxplayers end end -- class WBSTARTSTRUCT_T
Generated by ISE EiffelStudio