z4131246
華銘工控
級別: 工控俠客
精華主題: 0
發(fā)帖數量: 582 個
工控威望: 2562 點
下載積分: 23788 分
在線時間: 521(小時)
注冊時間: 2010-10-22
最后登錄: 2022-08-19
查看z4131246的 主題 / 回貼
樓主  發(fā)表于: 2011-04-30 14:31
求各位高手幫我破解下這個文件很急 這文件是EB6000系列的威綸觸摸屏的文件因為一些特殊原因密碼沒了 求各位大師幫幫忙破解
[ 此帖被z4131246在2011-05-03 10:43重新編輯 ]
附件: DC400.rar (62 K) 下載次數:30
網站提示: 請不要用迅雷下載附件,容易出錯
z4131246
華銘工控
級別: 工控俠客
精華主題: 0
發(fā)帖數量: 582 個
工控威望: 2562 點
下載積分: 23788 分
在線時間: 521(小時)
注冊時間: 2010-10-22
最后登錄: 2022-08-19
查看z4131246的 主題 / 回貼
1樓  發(fā)表于: 2011-04-30 16:41
有沒有人幫幫我啊 很急的
z4131246
華銘工控
級別: 工控俠客
精華主題: 0
發(fā)帖數量: 582 個
工控威望: 2562 點
下載積分: 23788 分
在線時間: 521(小時)
注冊時間: 2010-10-22
最后登錄: 2022-08-19
查看z4131246的 主題 / 回貼
2樓  發(fā)表于: 2011-05-03 10:42
貌似沒人幫忙 那就算了 再次撤貼。
lilin0734
lilin
級別: 略有小成
精華主題: 0
發(fā)帖數量: 248 個
工控威望: 358 點
下載積分: 1111 分
在線時間: 283(小時)
注冊時間: 2007-05-29
最后登錄: 2024-08-02
查看lilin0734的 主題 / 回貼
3樓  發(fā)表于: 2011-05-03 11:00
自己做一個吧,在里面看到了這個東西

Macro_Command main()
int tp,sj,sp
bool  a,b,c
GetData(a ,"Panasonic FP", R_Binplc ,1010,1)  
GetData(b ,"Panasonic FP", R_Binplc ,1011,1)
GetData(c ,"Panasonic FP", R_Binplc ,1012,1)
    
If a==False Then
GetData(tp ,"Panasonic FP", DT_Binplc ,630,1)
Else If a==True Then
GetData(tp ,"Panasonic FP", DT_Binplc ,631,1)  
End If
SetData(tp ,"Panasonic FP", DT_Binplc ,620,1)

If b==False Then
GetData(sj ,"Panasonic FP", DT_Binplc ,632,1)
Else If b==True Then
GetData(sj ,"Panasonic FP", DT_Binplc ,633,1)  
End If
SetData(sj ,"Panasonic FP", DT_Binplc ,622,1)

If c==False Then
GetData(sp ,"Panasonic FP", DT_Binplc ,634,1)
Else If c==True Then
GetData(sp ,"Panasonic FP", DT_Binplc ,635,1)  
End If
SetData(sp ,"Panasonic FP", DT_Binplc ,621,1)

End Macro_CommandCommonUnShow               ?  macro_command main()
int a,h1
bool b,c,d,d1,e ,f,g
b=true
c=false
GetData(a ,"本機 觸摸屏", LW ,9050,1)  
GetData(d ,"Panasonic FP", R ,888,1)
GetData(d1 ,"Panasonic FP", R ,889,1)
GetData(e ,"Panasonic FP", R,493,1)
GetData(f ,"Panasonic FP", R ,492,1)
GetData(g ,"Panasonic FP", R ,350,1)
GetData(h1 ,"Panasonic FP",DT ,87,1)
                      
if e==true then
    SetData(e ,"本機 觸摸屏", LB_Binplc ,61,1)
end if  
  
if a<> 10 and a<>11  then
    SetData(c ,"本機 觸摸屏", LB ,60,1)
    SetData(c ,"本機 觸摸屏", LB ,200,1)
else if f<> true and g<>350  then
   SetData(b ,"本機 觸摸屏", LB ,60,1)
end if

if h1==37 or h1==38 or h1==39 then
    SetData(c ,"本機 觸摸屏", LB ,60,1)
    SetData(c ,"本機 觸摸屏", LB ,200,1)
end if

if a==11 and d==true then
    SetData(c ,"本機 觸摸屏", LB,60,1)
end if  
if a==11 and d1==true then
    SetData(c ,"本機 觸摸屏", LB ,60,1)
end if

End Macro_Command
本帖最近評分記錄:
  • 下載積分:+1(z4131246) 謝謝 真的很感謝你 我實 ..
  • 向前的每一步都不是浪費
    z4131246
    華銘工控
    級別: 工控俠客
    精華主題: 0
    發(fā)帖數量: 582 個
    工控威望: 2562 點
    下載積分: 23788 分
    在線時間: 521(小時)
    注冊時間: 2010-10-22
    最后登錄: 2022-08-19
    查看z4131246的 主題 / 回貼
    4樓  發(fā)表于: 2011-05-03 11:09
         謝謝了我就需要這些 分給你了 不過還有些寄存器沒讀出來(最少有18寄存器)
    [ 此帖被z4131246在2011-05-03 11:15重新編輯 ]