for(set .@i, 0; .@i < 4; set .@i, .@i + 1) {
    setarray .@array[.@i], rand(4);
    for(set .@j, 0; .@j < getarraysize(.@array); set .@j, .@j + 1) {
        if(.@array[.@j] == .@i) {
            while(.@j == .@i){
                setarray .@array[.@i], rand(4);
            }
        }
    }
}