;; replace all props in the room with the top prop you are wearing
{ TOPPROP newid =  
NBRLOOSEPROPS count =  
count 1 - i =  
{ i LOOSEPROPPOS  y = x =
newid x y ADDLOOSEPROP 
i --  } { i 0 >= } WHILE 
{ NBRLOOSEPROPS count =  
count 1 - i = 
{{ i REMOVELOOSEPROP} i LOOSEPROP TOPPROP == NOT If
 i -- }{ i 0 >= } While } 30 TimerExec
"" CHATSTR = } CHATSTR "replaceprops3" == IF