Carrot
Veteran
qqwref: no, just no xD
My python one-liner scramble generator
- Thread starter towwdso
- Start date
-
- Tags
- python scramble hack
guzman
Regular
Optimizing that could be total madness (I've counted 34 for cycles nested in various ways) ... but it could also be fun.
The code right now is 2119 characters.
Before we try,
could you explain us how an optimal scrambler for pyraminx works
and how this specfic scrambler works.
In particular: what is ther role of the functions u, v, w, x ?
Or, for those ,like me, who don't know how it works:
we may try to optimize it just by looking at the code ...
Finally, if we ever optimize it, how many characteres do you think it could reach ?
1200 ? 1000 ? less ?
Last edited:
Carrot
Veteran
Perl: 100 chars
I can't find any bugs in this code..
(sorry for bumping, but 100 chars is better than the previous 102 chars PERL
)
Code:
map{$m=0|rand 6until$c+$b-5|$c-$m&&$m ne$b;$c=$b;print" ".(U,R,F,B,L,D)[$b=$m].qw(' 2)[rand 3]}1..25I can't find any bugs in this code..
(sorry for bumping, but 100 chars is better than the previous 102 chars PERL
)
guzman
Regular
the problem is it cannot give scrambles starting with U ...
Carrot
Veteran
guzman
Regular
Oh, well ...
I actually dont know perl, that's what I was told ... If I'm not confused.
I actually dont know perl, that's what I was told ... If I'm not confused.
Carrot
Veteran
The previous code(98 chars one) didn't work, that's why I fixed the minor bug that made it not work (based on the idea of the 102 solution ^^)
(based on the idea of the 102 solution ^^)
guzman
Regular
Recap 4
Recap 0.
Recap 1.
Recap 2.
Recap 3.
Recap 4:
perl: 102 (Patrick, Johannes91, Stefan, qqwref)
C++: 102 (110 with main(){} ) (keemy, Marcell, guzman, Portponky, Stefan)
perl: 111 (Stefan)
javascript: 112 (qqwref, Devin, guzman, Johannes91, Patrick, Stefan)
perl: 114 (Patrick, Stefan, Johannes91)
Ruby: 115 (joey)
php: 114 (Marcell, guzman)
python: 139 (masterofthebass, Odder) (Edited)
mathematica: 166 (Lucas)
Visual Basic: 170 (mr. giggums)
Recap 0.
Recap 1.
Recap 2.
Recap 3.
Recap 4:
perl: 102 (Patrick, Johannes91, Stefan, qqwref)
Code:
map{$m=0|rand 6until$c+$b-5|$c ne$m&&$m ne$b;$c=$b;print" ".(U,R,F,B,L,D)[$b=$m].qw(' 2)[rand 3]}1..25C++: 102 (110 with main(){} ) (keemy, Marcell, guzman, Portponky, Stefan)
Code:
for(int c=0,b=6,j=25,m;j;m-c|c+b-5&&b-m&&cout<<"URFBLD"[j--,c=b,b=m]<<" 2'"[rand()%3]<<" ")m=rand()%6;perl: 111 (Stefan)
Code:
$_.=chr rand 99,/[^URFBLD]|(.)\1|LRL|RLR|UDU|DUD|FBF|BFB/&&chop until/.{25}/;s/./" $&".qw(' 2)[rand 3]/ge;printjavascript: 112 (qqwref, Devin, guzman, Johannes91, Patrick, Stefan)
Code:
r=Math.random;for(c=b=j=25;j;c+b-5|c-m&&b-m?document.write("URFBLD"[j--,c=b,b=m]+" 2'"[0|r()*3]+" "):0)m=0|r()*6perl: 114 (Patrick, Stefan, Johannes91)
Code:
$_=join'',map{(U,R,F,B,L,D)[rand 6]}1..25while/^$|(.)\1|LRL|RLR|UDU|DUD|FBF|BFB/;print" $_".qw(' 2)[rand 3]for/./gRuby: 115 (joey)
Code:
p (x=y=0..25).map{z=x;x=(w=[%(UD),%(FB),%(RL)][rand 3])[rand 2] until x!=y||z!=x&&w[y];(y=x)+"2'"[rand 3].to_s}*" "php: 114 (Marcell, guzman)
Code:
for($i=$b=$c=25;$i;$M="URFBLD 2'")if(($b-$m=rand()%6)&($c+$b-5|$c-$m))echo$M[$b=$m+0*$i--*$c=$b].$M[rand(6,8)].' 'python: 139 (masterofthebass, Odder) (Edited)
Code:
from random import randint as r
m=b=9
for u in range(25):
c=b;b=m
while c+b-4 and m==c or m==b:m=r(0,5)
print "URFBLD"[m]+" '2"[r(0,2)],mathematica: 166 (Lucas)
Code:
StringJoin[ToString[#]<>(c=RandomChoice)[{" ","' ","2 "}]&/@(Flatten[RandomSample[#,Ceiling[Random[]*5/4]]&/@c[{{U,R},{F,B},{L,D}},25]]//.{a___,b_,b_,c___}:>{a,b,c})]Visual Basic: 170 (mr. giggums)
Code:
For s = 1 To 25
c = b
b = a
Do While a = b Or a + b = 7 And a = c
a = Int(Rnd * 6 + 1)
Loop
t.Text = t.Text & Mid("URFBLD", a, 1) & Mid(" '2", Int(Rnd * 3 + 1), 1)
Next s
Last edited:
Carrot
Veteran
You forgot my Python(140 chars):
it is based on the code from masterofthebass' code
EDIT:
saved 1 char (and should still be working 
Code:
from random import randint as r
c=m=b=9
for u in range(25):
while c+b-4 and m==c or m==b:m=r(0,5)
print "URFBLD"[m]+" '2"[r(0,2)],;c=b;b=mit is based on the code from masterofthebass' code
EDIT:
saved 1 char
(and should still be working
Code:
from random import randint as r
m=b=9
for u in range(25):
c=b;b=m
while c+b-4 and m==c or m==b:m=r(0,5)
print "URFBLD"[m]+" '2"[r(0,2)],
Last edited:
guzman
Regular
I'm sorry, edited.
Carrot
Veteran
I just edited it and shortened it to 139 chars xD (in my prev. post)
Stefan
Legend
That's the same I posted earlier, and like I said before, this does not create scrambles starting with DU.
Carrot
Veteran
My fault :S (I didn't see your bugged 100 char solution) but after reading my own code it's pretty clear that it can never start with DU, so 102 is definitely the shortest yet =)
qqwref
Legend
- Joined
- Dec 18, 2007
- Messages
- 7,834
- Location
- a <script> tag near you
- WCA ID
- 2006GOTT01
- YouTube
- Visit Channel
I don't really know the details. The general way it works is to set up some permutation/orientation tables (which I guess explain to the program what each move does) and then does a search, starting at 1 move and going up, to see if any sequences of that length solve the position. The "u();document.write(b);" part calls what is necessary for the scrambler.
Well, it's already condensed and optimized a bit (see the variable names etc.) so I doubt you'll get a huge amount out of it, maybe down to 1500 or so if the approach doesn't change.
StachuK1992
statue
- Joined
- Jul 24, 2008
- Messages
- 3,812
- Location
- West Chester, PA
- WCA ID
- 2008KORI02
- YouTube
- Visit Channel
http://ideone.com
Just thought I'd share this.
I know codepad has been mentioned, but this seems to have a bit more backbone to it.
Just thought I'd share this.
I know codepad has been mentioned, but this seems to have a bit more backbone to it.
bamilan
Regular
- Joined
- Feb 6, 2008
- Messages
- 147
- Location
- Nagykanizsa, Hungary
- WCA ID
- 2005BATI01
- YouTube
- Visit Channel
In the python one, part of last line:
+" '2"[r(0,2)]
Why is the space there?
Instead, this is better:
+"'2"[r(0,1)]
Saving 1 char...
+" '2"[r(0,2)]
Why is the space there?
Instead, this is better:
+"'2"[r(0,1)]
Saving 1 char...
Carrot
Veteran
Then you can't get moves such as R L B U D or F, but only R' L' F2 U2 D2 B' etc...
bamilan
Regular
- Joined
- Feb 6, 2008
- Messages
- 147
- Location
- Nagykanizsa, Hungary
- WCA ID
- 2005BATI01
- YouTube
- Visit Channel
Ah, ok.
But I can win few chars, if instead of randint I import randrange.
It takes 1 argument instead of 2:
from random import randrange as r
m=b=9
for u in range(25):
c=b;b=m
while c+b-4 and m==c or m==b:m=r(5)
print "URFBLD"[m]+" '2"[r(2)],
This is 2 chars less.
But I can win few chars, if instead of randint I import randrange.
It takes 1 argument instead of 2:
from random import randrange as r
m=b=9
for u in range(25):
c=b;b=m
while c+b-4 and m==c or m==b:m=r(5)
print "URFBLD"[m]+" '2"[r(2)],
This is 2 chars less.
sz35
Regular
If I do that on C++, does the count have to include the includes and the "void main" or only the line?
The line is as follows:
for(int i=25;i;i--)printf("%c%c ","UDFBRL"[rand()%6]," 2'"[rand()%3]);
(70 chars)
output :
B' R2 B2 D2 L2 U' F' U R2 F D2 F R' F2 D' F2 L U' L2 U2 F' B U D2 L
The line is as follows:
for(int i=25;i;i--)printf("%c%c ","UDFBRL"[rand()%6]," 2'"[rand()%3]);
(70 chars)
output :
B' R2 B2 D2 L2 U' F' U R2 F D2 F R' F2 D' F2 L U' L2 U2 F' B U D2 L
Last edited:
O
Owen
Guest
Someone should start an official scrambler programming contest.
Here's my pathetic attempt in Ruby:
m= ["R", "U", "D", "B", "F", "L"]
x = [" ", "2 ", "' "]
o = 0
d = 0
while d < 26
n = m.at(rand(6))
if n != o
print n
o = n
print x.at(rand(3))
d = d + 1
end
end
148 characters.
Here's my pathetic attempt in Ruby:
m= ["R", "U", "D", "B", "F", "L"]
x = [" ", "2 ", "' "]
o = 0
d = 0
while d < 26
n = m.at(rand(6))
if n != o
print n
o = n
print x.at(rand(3))
d = d + 1
end
end
148 characters.
Last edited by a moderator:
