魔方吧·中文魔方俱乐部

 找回密码
 注册
搜索
热搜: 魔方
查看: 755033|回复: 27
打印 上一主题 下一主题

叹为观止的程序 [复制链接]

Rank: 4

积分
1928
帖子
1060
精华
6
UID
17579
性别
保密

魔方理论探索者 论坛建设奖 六年元老

跳转到指定楼层
1#
发表于 2010-1-20 19:30:39 |只看该作者 |正序浏览
#include <string>
#include <iostream>
using namespace std;

string data = "2#6'&78)5+1/AT[NJ_PERLQO@IAHPNSMBJCKLRMSDHEJNPOQFKGIQLSNF@DBROPMAGCEMPOACSRQDF";
char inva [48], b [48], cur_phase, search_mode, history_idx, history_mov [48], history_rpt [48], depth_to_go[5 << 20], hash_table [48][6912];

struct Cubelet { char pos, twi ;} cubelet [48];

void rot(char cur_phase ){
if ( cur_phase < 4)
        for (int i = -1; ++ i < 25%21 ;)
                cubelet[64^data[20+cur_phase*8+i ]].twi =
                        (cubelet[64^data[20+cur_phase*8+i ]].twi + 2 - i%2) % 3, cubelet[64^data[20+cur_phase*8+i +4 ]].twi ^= cur_phase < 2;
        for (int i = -1; ++ i < 28%21 ;)
                swap(cubelet[64^data[20+cur_phase*8+i +(i!=3) ]], cubelet[64^data[20+cur_phase*8+i ]] );
;}

int hashf( ){
int ret = 0;
switch(cur_phase ){
case 0:
  for (int i = -1; ++ i < 32%21 ;) ret += ret + cubelet [i ]. twi;
  return ret;
  
case 1:
  for (int i = -1; ++ i < 49%21 ;) ret = ret*3 + cubelet [i +12]. twi;
  for (int i = -1; ++ i < 53%21 ;) ret += ret + (cubelet [i ]. pos > 7 );
  return ret-7;
  
case 2:
  for (int i = -1; ++ i < 71%21 ;)
   if ( cubelet [i +12]. pos<16) inva[cubelet [i +12]. pos&3] = ret++; else b [i -ret] = cubelet [i +12]. pos&3;
   for (int i = -1; ++ i < 91%21 ;) ret += ret + (cubelet [i ]. pos > 3 );
   for (int i = -1; ++ i < 91%21 ;) ret += ret + (cubelet [i +12]. pos > 15 );
  return ret*54 + (inva[b[0 ]] ^inva[b[ 1 ]] )*2 + ((inva[b[0 ]] ^inva[b[ 2 ]] ) > (inva[b[0 ]] ^inva[b[ 3 ]] )) - 3587708;
  }

for (int i = -1; ++ i < 110%21 ;) {
        ret *= 24; int cur_phase;
        for (cur_phase = -1; ++ cur_phase < 4 ;) for (int k = -1; ++ k < cur_phase ;)
                if ( cubelet [i *4+cur_phase].pos < cubelet [i *4+k].pos) ret += cur_phase << cur_phase/3 ;
}
return ret/2;
}

int do_search(int dpt ){
int h = hashf(), q = cur_phase/2*19+8 << 7;
if ( (dpt < hash_table[cur_phase ][h%q] | dpt < hash_table[cur_phase+4][h/q]) ^ search_mode ){
        if ( search_mode)
                if ( dpt <= depth_to_go[h]) return !h;
                else depth_to_go[h] = dpt;

        hash_table[cur_phase ][h%q] <?= dpt;
        hash_table[cur_phase+4][h/q] <?= dpt;

        for (int k = -1; ++ k < 6 ;)
                for (int i = -1; ++ i < 130%21 ;) {
                        rot(k );
                        if ( k < cur_phase*2 & i != 1 || i > 2) continue;
                        history_mov[history_idx] = k;
                        history_rpt[history_idx++] = i;
                        if ( do_search(dpt-search_mode*2+1)) return 1;
                        history_idx--;
                }
}
return 0;
}

int main(int, char** arg ){
memset(hash_table, 6, sizeof(hash_table) );
for (int i = -1; ++ i < 146%21 ;)         cubelet [i ]. pos = i ;
for (cur_phase = -1; ++ cur_phase < 4 ;)         do_search(0 );
for (int i = -1; ++ i < 146%21 ;) {
  string s = arg [i +1] + string("!" );
  cubelet [i ]. pos = data.find(s[0] ^ s[1] ^ s[2] );
  int x = min(s.find(85), s.find(68) );
  cubelet [i ]. twi = ~x ? x : s[0]>70;
}

for (int i = -1; ++ i < 152%21 ;)
  swap(cubelet[64^data[20+cur_phase*8+i +16 ]], cubelet[64^data[20+cur_phase*8+i +21 ]] );
  
search_mode = 1;

for (cur_phase = -1; ++ cur_phase < 4 ;)
  for (int i = -1; ++ i < 167%21 ;) if ( do_search(i)) break;
for (int k = -1; ++ k < history_idx ;)
  cout << "FBRLUD"[history_mov[k ]] << history_rpt[k]+1 << " ";
return 0;
}
已有 1 人评分经验 收起 理由
ggglgq + 10 珍贵资料,收藏!

总评分: 经验 + 10   查看全部评分

Enjoy cubing
Enjoy coding.
我喜欢的公式 U D F2 B2 U' D'

Rank: 1

积分
48
帖子
16
精华
1
UID
107440
性别
保密
28#
发表于 2011-6-27 21:02:39 |只看该作者

人类不容易看懂的程序不是好程序

资深开发人员评价,不要羡慕别人的程序写的多么神奇,简洁易读的程序才是好程序

使用道具 举报

Rank: 3Rank: 3

积分
616
帖子
139
精华
0
UID
10180
性别
27#
发表于 2011-6-13 17:02:35 |只看该作者
  
  
  
    回楼上的,人家是用 C 、C++ 等写的。
  
  
  

使用道具 举报

Rank: 2

积分
540
帖子
416
精华
0
UID
1275530
性别
居住地
海口市
兴趣爱好
理论
26#
发表于 2011-6-9 21:57:52 |只看该作者
这是使用VB编的吧!!!
但我还是看不明白啊!求高手指点一二!
为什么玩魔方?为了不对魔方狂热

使用道具 举报

Rank: 1

积分
25
帖子
25
精华
0
UID
72576
性别
25#
发表于 2011-5-26 16:35:19 |只看该作者
试用了一下上面贴的C++代码,发现所有块的位置都能复原,但方向不能复原,请问是什么情况?
原代码可以完美复原么?
目前平均30秒,呵呵

使用道具 举报

Rank: 1

积分
22
帖子
18
精华
0
UID
1292050
性别
24#
发表于 2011-3-25 21:24:53 |只看该作者
我只会VB和FP编程······

使用道具 举报

Rank: 4

积分
1928
帖子
1060
精华
6
UID
17579
性别
保密

魔方理论探索者 论坛建设奖 六年元老

23#
发表于 2011-3-14 20:30:07 |只看该作者

回复 16# 的帖子

noski,不知道那个min是否引入了bug。在我的电脑上确实解不出。
把min的参数和返回值改成unsigned类型才可以。
你如果看到,能否测试一下?
Enjoy cubing
Enjoy coding.
我喜欢的公式 U D F2 B2 U' D'

使用道具 举报

Rank: 4

积分
1928
帖子
1060
精华
6
UID
17579
性别
保密

魔方理论探索者 论坛建设奖 六年元老

22#
发表于 2011-3-14 20:13:04 |只看该作者

回复 18# 的帖子

这个跟编译器和平台有关。gcc里的min是一个宏,
在VC下,定义min函数,你要把min函数的返回值和参数都改成unsigned型才可以。
非常抱歉这么久了才回复你。
因为我一直用原始的程序编译的,没有发现这个问题。
Enjoy cubing
Enjoy coding.
我喜欢的公式 U D F2 B2 U' D'

使用道具 举报

Rank: 1

积分
65
帖子
46
精华
0
UID
1274231
性别
保密
21#
发表于 2010-12-26 16:30:14 |只看该作者
啊  这到底是什么东东   完全看不懂

使用道具 举报

Rank: 4

积分
1405
帖子
1384
精华
0
UID
103787
性别

八年元老

20#
发表于 2010-12-23 08:47:33 |只看该作者
果然叹为观止!完全看不懂。不过应该是好东东。

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

Archiver|手机版|魔方吧·中文魔方俱乐部

GMT+8, 2024-5-10 23:12

Powered by Discuz! X2

© 2001-2011 Comsenz Inc.

回顶部