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/