#!/usr/bin/env /friends/bin/basicscript
' Define an array of 100 doors
DIM doors(0 TO 99)

' Process the doors
FOR pass = 0 TO 99
	FOR door = pass TO 99 STEP pass + 1
		' Toggle the door
		doors(door) = NOT doors(door)
	NEXT door
NEXT pass

' Print out the results
FOR i = 0 TO 99
	PRINT "Door #"; i + 1; " is ";
	IF NOT doors(i) THEN
		PRINT "closed."
	ELSE
		PRINT "open."
	END IF
NEXT i