@roll2 F=rnd(6) ' 0-5 remember that ans$[0]==0 then roll$="0" ans$[1]==0 then roll$="1" 'repeat above code to ans$[5], ect. ' finish code below by adding X,Y,Z locate X, Y,Z:print roll$ 'if you use gosub add RETURN here