; ScriptName : ZapAll V1.1
; Author(s)  : Skeezil, Myotis Dragonious
; Concept    : Skeezil
; Last Modify: 27 Mar 1996
; Usage      : Draws a random colored line from you to each roomuser

{ NBRROOMUSERS NumUsers =
;this says that from now on, in this script, NumUsers is the same as 
;NBROOMUSERS
  
{i 0 = }
;this says that the index is index 0
{   
;Pen Commands - Set Random Color, 3 PENsize and put pen to back
  
255 Random 255 Random 255 Random PENCOLOR   3 PENSIZE   PENBACK
  ; Setup Coords to draw line
  ;posx and posy are your x and y coordinates

POSX POSY i ROOMUSER WHOPOS LINE
; Don't draw a line to yourself
  
i WHONAME USERNAME == NOT IF
; Increment the counter regardless (You count as a roomuser!)
  
i++}
;this is a good example of a LOOP script.  Starting from the pen 
;commands, to the i++,
;is the INDEX.  The INDEX just tells the WHILE command what to loop, 
;and NumUsers tells how many times too LOOP the index
  
 {i NumUsers < } WHILE
   {c 0 = }
   {PAINTUNDO c++}
   {c NumUsers < } WHILE
;this tells the puter to paintundo as many times as there are roomusers
 
  "" CHATSTR =
; This gets rid of any text balloon, by saying thta the CHATSTRING is " ",
; in effect, nothing

}  CHATSTR "zapall" == IF