[imported_zylex]

sub rand()
var x,i
Dim A[5]
A[0] = ".wop Kal Vas Flam"
A[1] = ".wop In Vas Mani"
A[2] = ".wop Kal Vas Flam"
A[3] = ".wop Por Ort Grav"
A[4] = ".wop In Jux Sanct"
A[5] = ".wop Por Ort Grav"
i = UO.Random(5)
x = A[i]
uo.serverprint(x)
endsub

alternate method
worked on my older inj versions pretty good, but now it seams to mess up. but worth a try ;>
,exec rand