integer array i
integer mdf
rand = 2
loop
      set mdf=Rndom(0,2)
if i[mdf]!=1 then
      set i[mdf]=1
     set rand=rand-1
endif
      exitwhen rand=0
endloop

integer array i
integer mdf
rand = 2
loop
        set mdf=GetRandomInt(0,2)
if i[mdf]!=1 then
        call BJDebugMsg(I2S(mdf))
        set i[mdf]=1
       set rand=rand-1
endif
        exitwhen rand=0
endloop

define break = exitwhen true
library Randomize
{
       private int array RandArr[8192]
       private int Size = 0

private bool Check(int val)
{
for(int i=0;i<=Size;i++)
{
           if val == RandArr[i]    
           {
               return false
           }
}
       return true
}

private bool Save(int val)
{
       if Size > 8192    
       {
           return false
       }
       RandArr[Size] = val
       Size++
       return true
}

int Random(int low,int high)
{
       int rnd = GetRandomInt(low,high),tmp=rnd
           while !Check(rnd)
           {
               if rnd<high && rnd>=tmp    
               {
                   rnd++
               elseif rnd==high    
                   rnd=tmp-1
               elseif rnd<tmp && rnd>low
                   rnd--
               elseif rnd<=low
                   Size=0
                   rnd = Random(low,high)
               elseif rnd<low
                   break
               }
           }
       if Save(rnd)
       {
           return rnd
       else
            Size=0
            Save(rnd)
       return rnd
       }
}