I'm trying to write something simple to match up people with others..
heres my code, and i'm already having problems
SeedRnd MilliSecs()
Global ParticipantList:TList = CreateList()
Type TParticipant
Field number%
Field ID$
Field match_up%
Field is_fight%
End Type
number_of_cons$ = Input("Enter number of particpants: ")
number_of_consI% = number_of_cons$
For i=1 To number_of_cons$
part01:TParticipant = New TParticipant
ListAddLast(ParticipantList,part01)
id$ = Input("ID of participant #"+i+": ")
part01.is_fight = 0
part01.ID = id
part01.number = i
part01.match_up = Rand(1,number_of_cons)
Next
For all:TParticipant = EachIn ParticipantList
Print all.ID
Next
WaitKey()
*How do you correctly translate a string into a int? you could do this in B3D *How do i get the standard IO stream to work properly...
the goal right now is to enter a number of participants, then assign them names, then it displays the names.. Simple.. but being new to this side of Bmax is making it tough..
any help welcome...
|