首页
社区
课程
招聘
[原创]周末又到了,尝尝Authorware做的CM吧!
发表于: 2009-4-24 11:35 9262

[原创]周末又到了,尝尝Authorware做的CM吧!

2009-4-24 11:35
9262
呵呵,到处是VC/VB/Delphi等语言做的CM,今天俺用Authorware做了一个CM,果然不出预料,十分的强大,音乐图片一加就上M了
  换换口味哈,嘿嘿。
  欢迎各路高手前来,算法十分简单,能写出注册算法的就very good了。

[招生]科锐逆向工程师培训(2024年11月15日实地,远程教学同时开班, 第51期)

上传的附件:
收藏
免费 0
支持
分享
最新回复 (29)
雪    币: 145
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
2
跟进~~
2009-4-24 12:16
0
雪    币: 261
活跃值: (22)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
3
  一堆call不知道哪个打哪个,郁闷
通行码的判断在timer里面,貌似跟程序所在的位置有关么??
我想要提示....
2009-4-24 13:09
0
雪    币: 1074
活跃值: (160)
能力值: ( LV13,RANK:760 )
在线值:
发帖
回帖
粉丝
4
嘿嘿,没有timer,就是正常的验证, F(user)=code模式,简单验证。下面是流程图 (再提醒就是源代码了.... )
上传的附件:
2009-4-24 13:29
0
雪    币: 123
活跃值: (101)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
5
楼主,你这种东西我第一次见.
2009-4-24 19:28
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
6
刚开始学。。看看的!!! 其他就没什么了!
2009-4-24 20:23
0
雪    币: 1074
活跃值: (160)
能力值: ( LV13,RANK:760 )
在线值:
发帖
回帖
粉丝
7
大家加油啊!
2009-4-24 21:37
0
雪    币: 1074
活跃值: (160)
能力值: ( LV13,RANK:760 )
在线值:
发帖
回帖
粉丝
8
咋没有反应了,难道真的太难了吗?用Authorware做的软件用通常的方法是断不下来的
2009-4-25 19:45
0
雪    币: 2067
活跃值: (82)
能力值: ( LV9,RANK:180 )
在线值:
发帖
回帖
粉丝
9
午睡时梦到这个
上传的附件:
2009-4-26 00:44
0
雪    币: 1074
活跃值: (160)
能力值: ( LV13,RANK:760 )
在线值:
发帖
回帖
粉丝
10
呵呵,还是sessiondiy大侠强大,每次都是你啊
2009-4-26 07:53
0
雪    币: 2067
活跃值: (82)
能力值: ( LV9,RANK:180 )
在线值:
发帖
回帖
粉丝
11
要人发帖赚雪碧

C:\u.dat 内容最少6位数字

SN:= 0;
for i:=strlen(u) downto 1
{
  m= 分;
  SN= SN + 日*u[i] - m;
  if m > 9
    {
     m = m div 10;
    }
  SN= i * (SN + 西元年^m + 日^m);
}

所以在这个 2009/xx/26 xx:10:xx 的时间上, u.dat 内容若为 123456 的话
序号为 2988343

注: ^ 表示次方
    若在OD里慢慢跟踪的话, 会发现 m 在变.
2009-4-26 09:31
0
雪    币: 1074
活跃值: (160)
能力值: ( LV13,RANK:760 )
在线值:
发帖
回帖
粉丝
12
[QUOTE=sessiondiy;611990]要人发帖赚雪碧

C:\u.dat 内容最少6位数字

SN:= 0;
for i:=strlen(u) downto 1
{
  m= 分;
  SN= SN + 日*u[i] - m;
  if m > 9
    {
     m = m div 10;
    }
  SN= i * (SN + 西元年^m + 日^m);
}

所以在这个 2009/xx/26 xx:10:xx 的时间上, u.dat 内容若为 123456 的话
序号为 2988343

注: ^ 表示次方
    若在OD里慢慢跟踪的话, 会发现 m 在变.[/QUOTE]
    不错,不错啊,佩服! 确实是这样的,太厉害了!有一点点问题,u.dat内容可以不是数字。
2009-4-26 10:14
0
雪    币: 261
活跃值: (10)
能力值: ( LV6,RANK:90 )
在线值:
发帖
回帖
粉丝
13
sessiondiy 怎一个"强"字了得!
2009-4-26 13:22
0
雪    币: 1074
活跃值: (160)
能力值: ( LV13,RANK:760 )
在线值:
发帖
回帖
粉丝
14
Authorware版算法源码公布:(既然已经被人破解了,那么就公布算法源代码吧)
pass := EntryText
nPassLen := CharCount(pass)
if nPassLen<4 then
    Quit(0)
else
    user:=ReadExtFile("c:\\u.dat")
    if IOStatus<>0 then --文件不存在或者出错
        Quit(0)
    else
         nUserLen:=CharCount(user)
      if nUserLen<6 then --用户名长度小于6位
        Quit(0)
      end if
    end if
end if
repeat while nUserLen>0
   c:=SubStr(user,nUserLen,nUserLen)
   ps := ps + Code(c)*Day-Minute+Year**Number(SubStr(String(Minute),1,1))+Day**Number(SubStr(String(Minute),1,1))
   ps := ps*nUserLen
   nUserLen:=nUserLen-1
end repeat
if CharCount(ps)>20 then --如果位数太长,只取前20位
   ps := SubStr(ps, 1, 20)
end if
nPsLen := CharCount(String(ps))
if nPassLen<>nPsLen then
    Quit(0)
else
   p1 := Number(pass)
   p2 := Number(ps)
   if p1<>p2 then
       Quit(0)
   end if
end if

这是点击按钮事件的关键代码,谢谢大家的支持!
2009-4-27 09:41
0
雪    币: 251
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
15
还没玩过这个东西啊~呵呵。试试。。
2009-4-27 10:18
0
雪    币: 2067
活跃值: (82)
能力值: ( LV9,RANK:180 )
在线值:
发帖
回帖
粉丝
16
大小为OllyDbg的二倍
2009-4-27 10:27
0
雪    币: 1074
活跃值: (160)
能力值: ( LV13,RANK:760 )
在线值:
发帖
回帖
粉丝
17
Authorware主要是用来做多媒体动画及课件用的,大小不是问题哈!
2009-4-27 10:30
0
雪    币: 2067
活跃值: (82)
能力值: ( LV9,RANK:180 )
在线值:
发帖
回帖
粉丝
18
杀鸡用牛刀
过关后应该来点刺激的画面
你放观世音
2009-4-27 10:40
0
雪    币: 1074
活跃值: (160)
能力值: ( LV13,RANK:760 )
在线值:
发帖
回帖
粉丝
19
   万一被老大发现了咋办呢?不敢啊! 不管鸡刀还是牛刀,只要能把鸡杀死,就是好刀
2009-4-27 10:47
0
雪    币: 424
活跃值: (10)
能力值: ( LV9,RANK:850 )
在线值:
发帖
回帖
粉丝
20
能把鸡杀死的鎚子也是好刀
2009-4-27 16:28
0
雪    币: 318
活跃值: (36)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
21
学到了...
2009-4-27 20:57
0
雪    币: 225
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
22
to sessiondiy:
    大侠分享下在od中如何找到关键的代码?
2009-5-4 10:41
0
雪    币: 38
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
23
自己原来学过的,呵呵!现在忘得差不多了!
2009-5-4 11:46
0
雪    币: 2067
活跃值: (82)
能力值: ( LV9,RANK:180 )
在线值:
发帖
回帖
粉丝
24
这东西没所谓的关键代码
硬要说有的话就是 + - * /
2009-5-4 15:18
0
雪    币: 225
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
25
我的意思是在od中,下什么样的断点,才能定位到验证通行码的那段代码中?
是用bp CreateFileA?还是其他的
2009-5-4 15:40
0
游客
登录 | 注册 方可回帖
返回
//