SAY "This will be a list of students at your party. How many people will come?"
PULL numberofstudents

x = numberofstudents
students = .list ~new

SAY
DO i=1 TO numberofstudents
	SAY "Who is the "i". Student?"
	PARSE PULL name 

	students~insert(name)

	SAY "The name is saved!"
SAY

END


SAY "Your students are: "
	DO n OVER students
	SAY n

END


SAY
SAY "Do you want to add more students? Yes/No?"
PULL reply 

SAY

IF reply = "YES" THEN 
	
	DO 
	SAY "Who is the next Student?"
	PARSE PULL name
	
	students~append(name)

    SAY "The name is saved!"
SAY

END


SAY "The list has "students~items "students. And those are: "
	DO n OVER students
	SAY n

END