setvar $LIST[1] "Star Killer"
setvar $LIST[2] "Vid Kid"
setvar $LIST[3] "Micro"
setvar $LIST[4] "Big D"
setvar $LIST[5] "Shadow"
setvar $LIST[6] "Sin"
setvar $LIST[7] "Xanos"
setvar $LIST[8] "CBYNot"

Setvar $STR ""
Setvar $COUNT 0

Echo "**"

While ($COUNT < 8)
	GetRnd $PTR 1 8
	Setvar $S $LIST[$PTR]
	If ($S <> "")
		Echo "*" ($COUNT + 1) & " - " & $LIST[$PTR]
		Setvar $LIST[$PTR] ""
		Add $COUNT 1
		Goto :NEXT
	end

	If ($PTR > 8)
		Setvar $PTR 1
	Else
		Add $PTR 1
	End
	:NEXT
End