... ; {74,89,70,55,86,78,50,57,71,80,81,73,53,72,54,77,87,49,85,75,88,79,67,76,69,84,56,68,82,52,66,65,48,83,51} } WHILE .T. nKyGntSld := nRandom( Len( aKyGntrDts ) ) IF nKyGntSld == 0 SysWait(.5) ELSE IF aScan( aKysGnrtd, nKyGntSld ) == 0 AaDd( aKysGnrtd, nKyGntSld ) aXGrpKys := aKyGntrDts[nKyGntSld] ...