for six number:
DIM wuerfel[6]
IF wurf = FALSE
FOR i=0 TO 5
wuerfel = RND(5)+1
NEXT
wurf = TRUE
ENDIF
SORTARRAY wuerfel[], 0
FOR i=0 TO 5
ZOOMSPRITE wuerfel,320+200*i,865,2,2
NEXT
END
DIM wuerfel[6]
IF wurf = FALSE
FOR i=0 TO 5
wuerfel = RND(5)+1
NEXT
wurf = TRUE
ENDIF
SORTARRAY wuerfel[], 0
FOR i=0 TO 5
ZOOMSPRITE wuerfel,320+200*i,865,2,2
NEXT
END