Here's the program, spent an hour trial and error writing it:

ClrHome
7->D
4->F

For(a,1,5)
For(b,1,5)

Lbl A
randInt(1,6)->C
randInt(1,3)->E

If C=D
Then    
Goto A
End

C->D
E->F

If C=1
Then
Output(A,3B-2,"U")
End

If C=2
Then
Output(A,3B-2,"D")
End

If C=3
Then
Output(A,3B-2,"L")
End

If C=4
Then
Output(A,3B-2,"R")
End

If C=5
Then
Output(A,3B-2,"F")
End

If C=6
Then
Output(A,3B-2,"B")
End

If E=2
Then
Output(A,3B-1,"'")
End

If E=3
Then
Output(A,3B-1,"2")
End


End
End






 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/speedsolvingrubikscube/

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 


Reply via email to