delldell Posted August 6, 2012 Posted August 6, 2012 (edited) DellDell P-CODE numbers try 2 make a keygen or just post your Name and serial so I can check it Only with the right serial is going to show the right message if is not the right serial is not gonna show the message I have to say that I put strings that do nothing so keep this in mind when you search for strings please consider that I just tested on Xp if not work on other OS put it in the Recycle Bin Have fun Thank you DellDell P-CODE numbers.rar Edited August 6, 2012 by delldell
sama Posted August 6, 2012 Posted August 6, 2012 Name: SamaKey: 4793211thanks for the easy challange.
kakamail Posted August 6, 2012 Posted August 6, 2012 This is the first time i deal with pcode, because look at vp-decompiler i see that code is so short but i still can not crack this keygenme, even patch it. First is your commandclick rivate Sub Command1_Click() '409E38 'Data Table: 406BAC loc_4096CC: On Error Resume Next loc_4096F3: var_F8 = LCase(CVar(Me.t2.Text)) loc_4096FC: var_C4 = CStr(var_F8) If (0 = &HFF) Then '40971C loc_409719: var_D0 = "serial correct" End If Well, obviously 0 can not equal 0xFF, so the serial correct is not appear. Far from that, i see Call var_Click(), in var_Click(), i see 2 functions 40912C() and 408BE0() 40912C(): seem is checksum of name, but convert to long value, then multi with 1234.56 which is round of 12346 - string in decompiler 408BE0(): Does something with timer, i think timer does not affect serial, so i skip it. Some more is IsDebuggerPresent. Can i have some ideal to solve this one My n/s: Lovemagic/11345670 - ofcourse it does not work.
delldell Posted August 6, 2012 Author Posted August 6, 2012 @ Sama Excellent Good job @ kakamail P-code is little diferent I put some strings just 2 redirect the atention like that isdebuggerpresent vbdecompiler I try to put variables and strange names to try to fool the vbdecompiler the timer is important just wait to time out the time if you disable timer the is going to fail try to put small names and just pay atention to the Opcodes remember that some strings to nothing like I said just to redirect the atention of the riverser P32Dasm is a VB PCode Decompiler. It can generate String, Numbers, Objects @ ChOoKi Fantastic! good Work Thank you very much
kakamail Posted August 7, 2012 Posted August 7, 2012 P32Dasm does not work on my computer, it tells me that .ocx is missing/can not registered. I google to find the answer for this ocx-register problem, but can not find it yet.And i don't understand your answer much. The fool vb-decompiler (vbd) mean that all my quote is wrong 0_o? And what does this mean? "P32Dasm is a VB PCode Decompiler"? P32 is better or just also fail like vbd?
delldell Posted August 8, 2012 Author Posted August 8, 2012 @ kakamailthe opcodes and funcions are very importantin p32dasm you can view the opcodes and functionsI dont know if p32dasm works on other OS than XPhttp://ricardonarvaja.info/WEB/OTROS/HERRAMIENTAS/L-M-N-O-P/p32dasm.zipnow I will put an example: ( hope is not Boring hehehehehe)VB6 Application detected ... PCode-small tut by delldell -Form1 1.1 Command1.Click() ----000019E0: F4 LitI2_Byte: 3 0x3 <<<<<< we add 3 to variable000019E2: 70 FStI2 var_86000019E5: 6B FLdI2 var_86000019E8: F4 LitI2_Byte: 2 0x2 <<<< number 2000019EA: B1 MulI2 * <<<<<< multiply 3 * 2= result is 6000019EB: 70 FStI2 var_88000019EE: 6B FLdI2 var_88000019F1: F4 LitI2_Byte: 4 0x4 <<<<< number 4000019F3: A9 AddI2 + <<<<<< we add 4 + 6 =result is 10000019F4: 70 FStI2 var_88000019F7: 6B FLdI2 var_88000019FA: EB CR8I2 Int(number)000019FB: F4 LitI2_Byte: 2 0x2 <<< number 2000019FD: EB CR8I2 Int(number)000019FE: B6 DivR8 / <<<<<<< we divide 10 / 2 = result is 5000019FF: E5 CI2R800001A00: 70 FStI2 var_8800001A03: 6B FLdI2 var_8800001A06: F4 LitI2_Byte: 10 0xA <<< number 1000001A08: A9 AddI2 + <<<<< then we add 10 + 5 = result 1500001A09: 70 FStI2 var_8800001A0C: 04 FLdRfVar var_9000001A0F: 21 FLdPrThis00001A10: 0F VCallAd00001A13: 19 FStAdFunc var_8C00001A16: 08 FLdPr var_8C00001A19: 0D VCallHresult TextBox.Get_Text() <<< text Box00001A1E: 6C ILdRf var_9000001A21: FC33 CR8Str00001A23: 6B FLdI2 var_8800001A26: EB CR8I2 Int(number)00001A27: C8 EqR4 = <<<<< now when we get to compare the result00001A28: 2F FFree1Str var_90 <<<<<<< we have 2 options 1 is that we already00001A2B: 1A FFree1Ad var_8C <<<<<<<< know the result so we can patch 1t00001A2E: 1C BranchF 00001A5D <<<<<<< here we can patch opcode 1c for 1D00001A31: 27 LitVar_Missing00001A34: 27 LitVar_Missing00001A37: 27 LitVar_Missing00001A3A: F5 LitI4: 0 0x000001A3F: 3A LitVarStr: "FANTASTIC WORK" <<<< now we always jump to god boy00001A44: 4E FStVarCopyObj var_B000001A47: 04 FLdRfVar var_B000001A4A: 0A ImpAdCallFPR4 MsgBox() <<< call to the messageBox god boy00001A4F: 36 FFreeVar var_B0 var_D0 var_F0 var_11000001A5A: 1E Branch 00001A8600001A5D: loc_00001A2E00001A5D: 27 LitVar_Missing00001A60: 27 LitVar_Missing00001A63: 27 LitVar_Missing00001A66: F5 LitI4: 0 0x000001A6B: 3A LitVarStr: "SORRY INCORRECT" <<<< if dont change opcode 1C BAd boy00001A70: 4E FStVarCopyObj var_B000001A73: 04 FLdRfVar var_B000001A76: 0A ImpAdCallFPR4 MsgBox() <<<< call to the messagebox bad boy00001A7B: 36 FFreeVar var_B0 var_D0 var_F0 var_11000001A86: loc_00001A5A00001A86: 13 ExitProcHresult <<<<< end sub ExitFile processed OK.so we can see that the opcodes and functions so this is very good becausewith this we can make a easy kegenme or wherever we like to do we can seethe operators to make the mathematics and operationsPrivate Sub Command1_Click()Dim delldell As IntegerDim result As Integerdelldell = 3result = delldell * 2result = result + 4result = result / 2result = result + 10If Text1.Text = result ThenMsgBox "FANTASTIC WORK"ElseMsgBox "SORRY INCORRECT"End IfEnd Subthe source code of this example so you can see that the informationthat we get from the p32dasm is very importan=========nowe if you want experiment with my program how to patch DellDell P-CODE numbers00009565: 1C BranchF 000095B7 <<<< PATCH this 1C TO 1D000095C8: FD95 ExitProcCbwe can patch the program to acept all the serials just change the opcode 1C TO 1D in the addressthank you very much 2
redblkjck Posted August 8, 2012 Posted August 8, 2012 @kakamail @delldell P32Dasm seems to run ok in wow64 under Win 7 64bit. I used the version delldell linked. No error msgs anyway. I didn't try every feature of the program though. For opening and breaking down the topic's target, it works without error messages. VB6 run time DLL is the only dependency listed. If you are getting an error maybe there is a problem with the folder you are running it from; too long of a full path directory name can cause problems older apps. Trying running from a folder higher in the top levels of the root directory. There are several OCX files in a folder the zip file delldell linked. Try using that version if you have not tried it.
kakamail Posted August 10, 2012 Posted August 10, 2012 I download from its homepage. And also delldell's link. Both have same error.The folder OCX has all ocx file, but no luck, still tell me that it's missing, as i said, i tried register it but it said i can not register.My Os is SP2, since i remove my Visual Basic, all vb program has not worked as usual, when i install vb again, they work perfectly! (With the tool by Lena151 in her tut1, i just copy 1 missing DLL file to right folder and it works, no need to re-install VB) But i have to uninstall and remove vb from my computer because of lacking space! The WTK debugger does not work on my computer, not issue of vb but i don't know why.
delldell Posted August 10, 2012 Author Posted August 10, 2012 try to Make A virtual Os or put A fresh System
redblkjck Posted August 11, 2012 Posted August 11, 2012 (edited) You should just need the runtime files with the common control files. There are only a few files placed in the system path. Install runtime first, then common controls. This should register them to the correct version in your system path. You will probably need to reboot afterward.VB6 runtime. VB6 core dll files. ..http://www.microsoft.com/en-us/download/details.aspx?id=24417VB6 common control comctl32 ocx ..http://www.microsoft.com/en-us/download/details.aspx?id=10019edit: here are the files/sizes that will be installed, updated and registered with the system. Asycfilt.dll 2.40.4275.1 144 KB (147,728 bytes)Comcat.dll 4.71.1460.1 21.7 KB (22,288 bytes)Msvbvm60.dll 6.0.97.82 1.32 MB (1,386,496 bytes)Oleaut32.dll 2.40.4275.1 584 KB (598,288 bytes)Olepro32.dll 5.0.4275.1 160 KB (164,112 bytes)Stdole2.tlb 2.40.4275.1 17.5 KB (17,920 bytes)Date Time Version Size File name ------------------------------------------------------ 18-Aug-2003 20:25 6.0.81.6 1,344,512 Comctl32.ocx 02-Nov-2004 00:16 6.1.97.86 1,064,208 Mscomctl.ocx Edited August 11, 2012 by redblkjck 1
kakamail Posted August 12, 2012 Posted August 12, 2012 Hi, I want to thank to redblkjck for helping me with those files. P32Dasm now works well on my computer I will try this keygenme base on help of delldell, thank you too.
nadim.crack Posted October 22, 2012 Posted October 22, 2012 @ kakamailthe opcodes and funcions are very importantin p32dasm you can view the opcodes and functionsI dont know if p32dasm works on other OS than XPhttp://ricardonarvaj...O-P/p32dasm.zipnow I will put an example: ( hope is not Boring hehehehehe)VB6 Application detected ... PCode-small tut by delldell -Form1 1.1 Command1.Click() ----000019E0: F4 LitI2_Byte: 3 0x3 <<<<<< we add 3 to variable000019E2: 70 FStI2 var_86000019E5: 6B FLdI2 var_86000019E8: F4 LitI2_Byte: 2 0x2 <<<< number 2000019EA: B1 MulI2 * <<<<<< multiply 3 * 2= result is 6000019EB: 70 FStI2 var_88000019EE: 6B FLdI2 var_88000019F1: F4 LitI2_Byte: 4 0x4 <<<<< number 4000019F3: A9 AddI2 + <<<<<< we add 4 + 6 =result is 10000019F4: 70 FStI2 var_88000019F7: 6B FLdI2 var_88000019FA: EB CR8I2 Int(number)000019FB: F4 LitI2_Byte: 2 0x2 <<< number 2000019FD: EB CR8I2 Int(number)000019FE: B6 DivR8 / <<<<<<< we divide 10 / 2 = result is 5000019FF: E5 CI2R800001A00: 70 FStI2 var_8800001A03: 6B FLdI2 var_8800001A06: F4 LitI2_Byte: 10 0xA <<< number 1000001A08: A9 AddI2 + <<<<< then we add 10 + 5 = result 1500001A09: 70 FStI2 var_8800001A0C: 04 FLdRfVar var_9000001A0F: 21 FLdPrThis00001A10: 0F VCallAd00001A13: 19 FStAdFunc var_8C00001A16: 08 FLdPr var_8C00001A19: 0D VCallHresult TextBox.Get_Text() <<< text Box00001A1E: 6C ILdRf var_9000001A21: FC33 CR8Str00001A23: 6B FLdI2 var_8800001A26: EB CR8I2 Int(number)00001A27: C8 EqR4 = <<<<< now when we get to compare the result00001A28: 2F FFree1Str var_90 <<<<<<< we have 2 options 1 is that we already00001A2B: 1A FFree1Ad var_8C <<<<<<<< know the result so we can patch 1t00001A2E: 1C BranchF 00001A5D <<<<<<< here we can patch opcode 1c for 1D00001A31: 27 LitVar_Missing00001A34: 27 LitVar_Missing00001A37: 27 LitVar_Missing00001A3A: F5 LitI4: 0 0x000001A3F: 3A LitVarStr: "FANTASTIC WORK" <<<< now we always jump to god boy00001A44: 4E FStVarCopyObj var_B000001A47: 04 FLdRfVar var_B000001A4A: 0A ImpAdCallFPR4 MsgBox() <<< call to the messageBox god boy00001A4F: 36 FFreeVar var_B0 var_D0 var_F0 var_11000001A5A: 1E Branch 00001A8600001A5D: loc_00001A2E00001A5D: 27 LitVar_Missing00001A60: 27 LitVar_Missing00001A63: 27 LitVar_Missing00001A66: F5 LitI4: 0 0x000001A6B: 3A LitVarStr: "SORRY INCORRECT" <<<< if dont change opcode 1C BAd boy00001A70: 4E FStVarCopyObj var_B000001A73: 04 FLdRfVar var_B000001A76: 0A ImpAdCallFPR4 MsgBox() <<<< call to the messagebox bad boy00001A7B: 36 FFreeVar var_B0 var_D0 var_F0 var_11000001A86: loc_00001A5A00001A86: 13 ExitProcHresult <<<<< end sub ExitFile processed OK.so we can see that the opcodes and functions so this is very good becausewith this we can make a easy kegenme or wherever we like to do we can seethe operators to make the mathematics and operationsPrivate Sub Command1_Click()Dim delldell As IntegerDim result As Integerdelldell = 3result = delldell * 2result = result + 4result = result / 2result = result + 10If Text1.Text = result ThenMsgBox "FANTASTIC WORK"ElseMsgBox "SORRY INCORRECT"End IfEnd Subthe source code of this example so you can see that the informationthat we get from the p32dasm is very importan=========nowe if you want experiment with my program how to patch DellDell P-CODE numbers00009565: 1C BranchF 000095B7 <<<< PATCH this 1C TO 1D000095C8: FD95 ExitProcCbwe can patch the program to acept all the serials just change the opcode 1C TO 1D in the addressthank you very muchWhy problem downloading?
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now