Care Unlock  
Your online unlock store
GSM-Forum  

Welcome to the GSM-Forum forums.

You are currently viewing our boards as a guest which gives you limited access to view most discussions and access our other features. By joining our free community you will have access to post topics, communicate privately with other members (PM), respond to polls, upload content and access many other special features. Registration is fast, simple and absolutely free so please, join our community today!

If you have any problems with the registration process or your account login, please contact contact us.

Go Back   GSM-Forum > Other Gsm/Mobile Related Forums > GSM Programming & Reverse Engineering

GSM Programming & Reverse Engineering Here you can post all Kind of GSM Programming and Reverse Engineering tools and Secrets.

Reply
 
LinkBack Thread Tools Display Modes
Old 06-08-2012, 12:26   #16 (permalink)
Insane Poster
 
Join Date: Jan 2012
Location: VODAFONE UK DIRECT
Posts: 96
Member: 1712149
Status: Online
Thanks: 31
Thanked 19 Times in 14 Posts
Big market...

For PHP fans:

PHP Code:
$imei '357596033953486';
$nck '';
for (
$i 6$i 14$i++)
{
    
$v1 $imei[$i] + ($imei[$i 1] * 2);
    
$nck .= $v1 10 $v1 $v1 10;
}
echo 
$nck
  Reply With Quote
Old 06-08-2012, 13:27   #17 (permalink)
No Life Poster
 
Join Date: May 2007
Location: Sweden
Posts: 1,115
Member: 502531
Status: Online
Thanks: 313
Thanked 709 Times in 319 Posts



thanks to ojieboy™ & darmiles

ERIC.exe
  Reply With Quote
The Following User Says Thank You to .:UnitedGSM:. For This Useful Post:
Old 06-08-2012, 17:56   #18 (permalink)
Freak Poster
 
YuMERA's Avatar
 
Join Date: Feb 2004
Location: Serbia
Posts: 132
Member: 55980
Status: Offline
Thanks: 121
Thanked 43 Times in 28 Posts
Why in this section all new programer made exe file from some algo...as it is difficult to make. Such behavior will benefit only those who wait for all the free...

Please stop making exe of the presented algorithms, or at least do not post the link here to download the application exe

Thx
YuMERA
  Reply With Quote
The Following 4 Users Say Thank You to YuMERA For This Useful Post:
Old 06-08-2012, 18:23   #19 (permalink)
Freak Poster
 
Join Date: Oct 2010
Posts: 147
Member: 1422878
Status: Offline
Thanks: 51
Thanked 66 Times in 22 Posts
Quote:
Originally Posted by YuMERA View Post
Why in this section all new programer made exe file from some algo...as it is difficult to make. Such behavior will benefit only those who wait for all the free...

Please stop making exe of the presented algorithms, or at least do not post the link here to download the application exe

Thx
YuMERA
A good idea can be the interchange of improvements and optimizations to the code of algorithms published, explain how it work, give new ideas.

Regards

Helpy
  Reply With Quote
The Following 2 Users Say Thank You to helpinterchange For This Useful Post:
Old 06-08-2012, 20:11   #20 (permalink)
Product Manager
 
oOXTCOo's Avatar
 
Join Date: Dec 2000
Location: J.A.U - Just Another Unlocker
Age: 33
Posts: 3,374
Member: 2878
Status: Offline
Thanks: 1,584
Thanked 8,985 Times in 1,517 Posts
Quote:
Originally Posted by YuMERA View Post
Why in this section all new programer made exe file from some algo...as it is difficult to make. Such behavior will benefit only those who wait for all the free...

Please stop making exe of the presented algorithms, or at least do not post the link here to download the application exe

Thx
YuMERA


simple answer: to put the copyright name for compiling it for freebeggers




that is the reason way not many help anymore, or no more post other importent infos...
  Reply With Quote
The Following User Says Thank You to oOXTCOo For This Useful Post:
Old 06-08-2012, 20:57   #21 (permalink)
Moderator
 
Join Date: May 1999
Location: Blagoevgrad, Bulgaria
Age: 41
Posts: 626
Member: 73
Status: Offline
Sonork: 100.86913
Thanks: 5
Thanked 304 Times in 92 Posts
Quote:
Originally Posted by helpinterchange View Post
A good idea can be the interchange of improvements and optimizations to the code of algorithms published, explain how it work, give new ideas.

Regards

Helpy
WHY ANYBODY FROM INOVATORS NOT REVERSE ONE FIRMWARE AND SEE HOW MANY HARD IS TO FIND CALC BY IMEI INSIDE BEFORE POST PUBLIC????????

1. In firmware algo is another - this is mathematical representation how many is near to original?

2. Improvements and optimizations = DESIGNERS!!! (or FINDING CHEAP GLORY!!!)

3. Every new idea here cost monney and is not public.

Regards: Victor
  Reply With Quote
The Following 6 Users Say Thank You to Victor For This Useful Post:
Old 06-09-2012, 06:08   #22 (permalink)
Freak Poster
 
wohlstand's Avatar
 
Join Date: Sep 2009
Posts: 208
Member: 1109337
Status: Offline
Thanks: 81
Thanked 76 Times in 42 Posts
Quote:
Originally Posted by YuMERA View Post
Why in this section all new programer made exe file from some algo...as it is difficult to make. Such behavior will benefit only those who wait for all the free...

Please stop making exe of the presented algorithms, or at least do not post the link here to download the application exe

Thx
YuMERA
i also have this question in mind.
maybe they find it fun making small gui and exe with there name on it


though some of them like star101's Cellshop Inventory System & whitesatans iphoneyeta are very helpful
  Reply With Quote
Old 06-10-2012, 22:13   #23 (permalink)
Junior Member
 
Join Date: Apr 2012
Posts: 17
Member: 1752470
Status: Offline
Thanks: 3
Thanked 6 Times in 6 Posts
Hello to all

I am not able to write this proc in High level Lng. Plz Can somone write it in delphi for me

For sure the thread starter will help me. Right ????

Code:

Some_proc                          

var_20          = -0x20
var_1C          = -0x1C
var_18          = -0x18

                PUSH    {R1-R7,LR}
                MOVS    R6, R0
                MOVS    R5, R1
                MOVS    R1, #0
                STR     R1, [SP,#0x20+var_20]
                MOVS    R4, #0
                MOVS    R2, #0
                MOVS    R0, #5
                LDR     R1, =0x1000006
                BL      sub_8218B84
                LDRB    R0, [R5]
                LSLS    R1, R0, #4
                LDRB    R0, [R5,#1]
                LSLS    R2, R0, #0x1C
                LSRS    R2, R2, #0x1C
                ORRS    R1, R2
                LSLS    R5, R1, #0x10
                LSRS    R5, R5, #0x10
                LSLS    R1, R0, #0x1B
                BPL     Loc_1
                MOVS    R1, #1
                STR     R1, [SP,#0x20+var_20]

Loc_1                                   ; CODE XREF: Some_proc+28j
                LSRS    R7, R0, #5
                MOVS    R2, #0x12
                MOVS    R1, #0x30
                MOVS    R0, R6
                BLX     j___32memset
                MOVS    R0, 0x3E8
                CMP     R7, #7
                BHI     lok_3
                LDR     R1, [SP,#0x20+var_20]
                CMP     R1, #0
                BNE     lok_3
                MOVS    R1, R5
                BLX     __rt_udiv
                LSLS    R2, R0, #0x18
                MOVS    R0, #7
                SUBS    R0, R0, R7
                STR     R0, [SP,#0x20+var_18]
                LSRS    R2, R2, #0x18
                STRB    R2, [R6,R0]
                MOVS    R0, 0x3E8
                MULS    R0, R2
                SUBS    R1, R5, R0
                MOVS    R0, #0x64
                BLX     __rt_sdiv
                LSLS    R1, R0, #0x18
                LDR     R0, [SP,#0x20+var_18]
                LSRS    R1, R1, #0x18
                ADDS    R7, R0, R6
                STRB    R1, [R7,#1]
                LDR     R0, [SP,#0x20+var_18]
                MOVS    R3, #0x7D
                LDRB    R0, [R6,R0]
                LSLS    R3, R3, #3
                MULS    R0, R3
                MOVS    R3, #0x64
                MULS    R1, R3
                SUBS    R0, R5, R0
                SUBS    R0, R0, R1
                STR     R1, [SP,#0x20+var_1C]
                BLX     __rt_sdiv10
                STRB    R0, [R7,#2]
                LDR     R1, [SP,#0x20+var_18]
                MOVS    R3, #0xE8
                LDRB    R1, [R6,R1]
                MULS    R1, R3
                MOVS    R3, #0xA
                SUBS    R2, R5, R1
                LDR     R1, [SP,#0x20+var_1C]
                MULS    R0, R3
                SUBS    R1, R2, R1
                SUBS    R0, R1, R0
                STRB    R0, [R7,#3]

Loc_2                                   ; CODE XREF: Some_proc+B0j
                LDRB    R0, [R7,R4]
                ADDS    R0, #0x30
                STRB    R0, [R7,R4]
                ADDS    R4, #1
                LSLS    R4, R4, #0x18
                LSRS    R4, R4, #0x18
                CMP     R4, #4
                BCC     Loc_2

end                                     ; CODE XREF: Some_proc+B6j
                                        ; Some_proc+BCj ...
                POP     {R1-R7,PC}
; ---------------------------------------------------------------------------

lok_3                                   ; CODE XREF: Some_proc+40j
                                        ; Some_proc+46j
                CMP     R7, #7
                BHI     end
                LDR     R1, [SP,#0x20+var_20]
                CMP     R1, #1
                BNE     end
                MOVS    R1, R5
                BLX     __rt_udiv
                LSLS    R0, R0, #0x18
                LSRS    R0, R0, #0x18
                ADDS    R6, R6, R7
                MOVS    R3, 0x3E8
                STRB    R0, [R6,#7]
                MULS    R0, R3
                SUBS    R5, R5, R0
                MOVS    R1, R5
                MOVS    R0, #0x64
                BLX     __rt_sdiv
                LSLS    R0, R0, #0x18
                LSRS    R0, R0, #0x18
                STRB    R0, [R6,#8]
                MOVS    R3, #0x64
                MULS    R0, R3
                SUBS    R5, R5, R0
                MOVS    R0, R5
                BLX     __rt_sdiv10
                STRB    R0, [R6,#9]
                MOVS    R3, #0xA
                MULS    R0, R3
                SUBS    R0, R5, R0
                STRB    R0, [R6,#0xA]

Loc_5                                   ; CODE XREF: Some_proc+108j
                ADDS    R0, R6, R4
                LDRB    R1, [R0,#7]
                ADDS    R4, #1
                LSLS    R4, R4, #0x18
                ADDS    R1, #0x30
                LSRS    R4, R4, #0x18
                CMP     R4, #4
                STRB    R1, [R0,#7]
                BCC     Loc_5
                B       end
; End of function Some_proc
  Reply With Quote
Old 06-10-2012, 22:30   #24 (permalink)
Junior Member
 
Join Date: Apr 2012
Posts: 17
Member: 1752470
Status: Offline
Thanks: 3
Thanked 6 Times in 6 Posts
sorry To all
I made error in my previous message an I cant edit. Was a copy past error

here is proc I need to write in high level LNG.
Regards

Code:
some_proc                               

var_48          = -0x48
var_44          = -0x44
var_40          = -0x40
var_3C          = -0x3C
var_38          = -0x38
var_37          = -0x37
var_36          = -0x36
var_35          = -0x35
var_34          = -0x34
var_33          = -0x33
var_32          = -0x32
var_31          = -0x31
var_30          = -0x30
var_28          = -0x28
var_20          = -0x20
var_18          = -0x18

                PUSH    {R4-R7,LR}
                SUB     SP, SP, #0x34
                ADD     R3, SP, #0x48+var_48
                MOVS    R6, R0
                MOVS    R5, #0
                STRH    R5, [R3,#0x48+var_18]
                ADD     R0, SP, #0x48+var_38
                MOVS    R1, #0
                STMIA   R0!, {R1}
                STMIA   R0!, {R1}
                LDR     R3, [R6,#0x10]
                MOVS    R1, #2
                MOVS    R4, #1
                MOVS    R0, #0
                ADD     R2, SP, #0x48+var_18
                BLX     R3
                MOVS    R1, #3
                LDR     R3, [R6,#0x10]
                MOVS    R0, #0
                ADD     R2, SP, #0x48+var_18
                BLX     R3
                MOVS    R6, R0
                MOVS    R2, #1
                MOVS    R0, #8
                ADD     R1, SP, #0x48+var_20
                BL      sub_824BEE0
                CMP     R0, #0
                BEQ     loc_8274D60
                MOVS    R0, #0

loc_8274C84                             ; CODE XREF: some_proc+5Ej
                ADD     R1, SP, #0x48+var_20
                LDRB    R2, [R1,R0]
                LSLS    R1, R0, #1
                ADD     R5, SP, #0x48+var_30
                LSLS    R3, R2, #0x1C
                LSRS    R3, R3, #0x1C
                ADDS    R3, #0x30
                STRB    R3, [R5,R1]
                ADD     R3, SP, #0x48+var_30
                LSRS    R2, R2, #4
                ADDS    R0, #1
                LSLS    R0, R0, #0x18
                ADDS    R2, #0x30
                ADDS    R1, R1, R3
                LSRS    R0, R0, #0x18
                CMP     R0, #8
                STRB    R2, [R1,#1]
                BCC     loc_8274C84
                ADD     R1, SP, #0x48+var_20
                LDRB    R0, [R1,R0]
                ADD     R3, SP, #0x48+var_28
                LSLS    R0, R0, #0x1C
                LSRS    R0, R0, #0x1C
                ADDS    R0, #0x30
                STRB    R0, [R3,#7]
                MOVS    R0, #0

loc_8274CB8                             ; CODE XREF: some_proc+80j
                ADD     R1, SP, #0x48+var_30
                LDRB    R1, [R1,R0]
                CMP     R1, #0x3F
                BNE     loc_8274CD8
                ADDS    R0, #1
                LSLS    R0, R0, #0x18
                LSRS    R0, R0, #0x18
                CMP     R0, #0xF
                BCC     loc_8274CB8
                CMP     R4, #1
                BNE     loc_8274CD8
                MOVS    R2, #0xF
                LDR     R1, =someting
                ADD     R0, SP, #0x48+var_30
                BL      strncpy

loc_8274CD8                             ; CODE XREF: some_proc+76j
                                        ; some_proc+84j
                ADD     R0, SP, #0x48+var_44
                MOVS    R1, #0
                MOVS    R2, #0
                STMIA   R0!, {R1,R2}
                MOVS    R5, #0
                MOVS    R4, #7
                STMIA   R0!, {R2}

loc_8274CE6                             ; CODE XREF: some_proc+DEj
                ADD     R0, SP, #0x48+var_30
                ADD     R1, SP, #0x48+var_30
                ADDS    R1, R1, R4
                LDRB    R0, [R0,R4]
                SUBS    R1, #0x10
                LDRB    R1, [R1,#0xF]
                ADDS    R0, #0x50
                LSLS    R0, R0, #1
                ADDS    R0, R0, R1
                ADDS    R0, #0xD0
                LSLS    R0, R0, #0x18
                LSRS    R0, R0, #0x18
                ADD     R1, SP, #0x48+var_44
                STRB    R0, [R1,R5]
                CMP     R0, #9
                BLS     loc_8274D12
                BLX     __rt_udiv10
                ADDS    R1, #0x30
                ADD     R0, SP, #0x48+var_38
                STRB    R1, [R0,R5]
                B       loc_8274D18
; ---------------------------------------------------------------------------

loc_8274D12                             ; CODE XREF: some_proc+BCj
                ADDS    R0, #0x30
                ADD     R1, SP, #0x48+var_38
                STRB    R0, [R1,R5]

loc_8274D18                             ; CODE XREF: some_proc+C8j
                ADDS    R5, #1
                ADDS    R4, #1
                LSLS    R4, R4, #0x18
                LSLS    R5, R5, #0x18
                LSRS    R5, R5, #0x18
                LSRS    R4, R4, #0x18
                CMP     R4, #0xF
                BCC     loc_8274CE6
                ADD     R3, SP, #0x48+var_48
                LDRB    R0, [R3,#0x48+var_37]
                LDRB    R1, [R3,#0x48+var_38]
                LSLS    R0, R0, #4
                ADDS    R1, R0, R1
                MOVS    R0, 0x330
                SUBS    R1, R1, R0
                STRB    R1, [R6,#1]
                LDRB    R1, [R3,#0x48+var_35]
                LDRB    R2, [R3,#0x48+var_36]
                LSLS    R1, R1, #4
                ADDS    R1, R1, R2
                SUBS    R1, R1, R0
                STRB    R1, [R6,#2]
                LDRB    R1, [R3,#0x48+var_33]
                LDRB    R2, [R3,#0x48+var_34]
                LSLS    R1, R1, #4
                ADDS    R1, R1, R2
                SUBS    R1, R1, R0
                STRB    R1, [R6,#3]
                LDRB    R1, [R3,#0x48+var_31]
                LDRB    R2, [R3,#0x48+var_32]
                LSLS    R1, R1, #4
                ADDS    R1, R1, R2
                SUBS    R0, R1, R0
                STRB    R0, [R6,#4]
                B       loc_8274D7C
; ---------------------------------------------------------------------------

loc_8274D60                             ; CODE XREF: some_proc+38j
                B       loc_8274D62

loc_8274D62
                MOVS    R2, #0
                MOVS    R1, #0
                LDR     R0, =someting
                STR     R1, [SP,#0x48+var_44]
                STR     R1, [SP,#0x48+var_40]
                STR     R2, [SP,#0x48+var_3C]
                STR     R2, [SP,#0x48+var_48]
                MOVS    R3, R5
                ADDS    R0, #0x10
                LDR     R2, =unk_878
                LDR     R1, =some_string
                BL      sub_8217D9C
; ---------------------------------------------------------------------------

loc_8274D7C                             ; CODE XREF: some_proc+116j
                MOVS    R0, #1
                ADD     SP, SP, #0x34
                POP     {R4-R7,PC}
; End of function some_proc
  Reply With Quote
Old 06-10-2012, 23:15   #25 (permalink)
No Life Poster
 
Join Date: Feb 2004
Location: Algeria
Posts: 2,078
Member: 56090
Status: Offline
Thanks: 33
Thanked 98 Times in 46 Posts
Quote:
Originally Posted by GsmSimlockSol View Post
sorry To all
I made error in my previous message an I cant edit. Was a copy past error

here is proc I need to write in high level LNG.
Regards

Code:
some_proc                               

var_48          = -0x48
var_44          = -0x44
var_40          = -0x40
var_3C          = -0x3C
var_38          = -0x38
var_37          = -0x37
var_36          = -0x36
var_35          = -0x35
var_34          = -0x34
var_33          = -0x33
var_32          = -0x32
var_31          = -0x31
var_30          = -0x30
var_28          = -0x28
var_20          = -0x20
var_18          = -0x18

                PUSH    {R4-R7,LR}
                SUB     SP, SP, #0x34
                ADD     R3, SP, #0x48+var_48
                MOVS    R6, R0
                MOVS    R5, #0
                STRH    R5, [R3,#0x48+var_18]
                ADD     R0, SP, #0x48+var_38
                MOVS    R1, #0
                STMIA   R0!, {R1}
                STMIA   R0!, {R1}
                LDR     R3, [R6,#0x10]
                MOVS    R1, #2
                MOVS    R4, #1
                MOVS    R0, #0
                ADD     R2, SP, #0x48+var_18
                BLX     R3
                MOVS    R1, #3
                LDR     R3, [R6,#0x10]
                MOVS    R0, #0
                ADD     R2, SP, #0x48+var_18
                BLX     R3
                MOVS    R6, R0
                MOVS    R2, #1
                MOVS    R0, #8
                ADD     R1, SP, #0x48+var_20
                BL      sub_824BEE0
                CMP     R0, #0
                BEQ     loc_8274D60
                MOVS    R0, #0

loc_8274C84                             ; CODE XREF: some_proc+5Ej
                ADD     R1, SP, #0x48+var_20
                LDRB    R2, [R1,R0]
                LSLS    R1, R0, #1
                ADD     R5, SP, #0x48+var_30
                LSLS    R3, R2, #0x1C
                LSRS    R3, R3, #0x1C
                ADDS    R3, #0x30
                STRB    R3, [R5,R1]
                ADD     R3, SP, #0x48+var_30
                LSRS    R2, R2, #4
                ADDS    R0, #1
                LSLS    R0, R0, #0x18
                ADDS    R2, #0x30
                ADDS    R1, R1, R3
                LSRS    R0, R0, #0x18
                CMP     R0, #8
                STRB    R2, [R1,#1]
                BCC     loc_8274C84
                ADD     R1, SP, #0x48+var_20
                LDRB    R0, [R1,R0]
                ADD     R3, SP, #0x48+var_28
                LSLS    R0, R0, #0x1C
                LSRS    R0, R0, #0x1C
                ADDS    R0, #0x30
                STRB    R0, [R3,#7]
                MOVS    R0, #0

loc_8274CB8                             ; CODE XREF: some_proc+80j
                ADD     R1, SP, #0x48+var_30
                LDRB    R1, [R1,R0]
                CMP     R1, #0x3F
                BNE     loc_8274CD8
                ADDS    R0, #1
                LSLS    R0, R0, #0x18
                LSRS    R0, R0, #0x18
                CMP     R0, #0xF
                BCC     loc_8274CB8
                CMP     R4, #1
                BNE     loc_8274CD8
                MOVS    R2, #0xF
                LDR     R1, =someting
                ADD     R0, SP, #0x48+var_30
                BL      strncpy

loc_8274CD8                             ; CODE XREF: some_proc+76j
                                        ; some_proc+84j
                ADD     R0, SP, #0x48+var_44
                MOVS    R1, #0
                MOVS    R2, #0
                STMIA   R0!, {R1,R2}
                MOVS    R5, #0
                MOVS    R4, #7
                STMIA   R0!, {R2}

loc_8274CE6                             ; CODE XREF: some_proc+DEj
                ADD     R0, SP, #0x48+var_30
                ADD     R1, SP, #0x48+var_30
                ADDS    R1, R1, R4
                LDRB    R0, [R0,R4]
                SUBS    R1, #0x10
                LDRB    R1, [R1,#0xF]
                ADDS    R0, #0x50
                LSLS    R0, R0, #1
                ADDS    R0, R0, R1
                ADDS    R0, #0xD0
                LSLS    R0, R0, #0x18
                LSRS    R0, R0, #0x18
                ADD     R1, SP, #0x48+var_44
                STRB    R0, [R1,R5]
                CMP     R0, #9
                BLS     loc_8274D12
                BLX     __rt_udiv10
                ADDS    R1, #0x30
                ADD     R0, SP, #0x48+var_38
                STRB    R1, [R0,R5]
                B       loc_8274D18
; ---------------------------------------------------------------------------

loc_8274D12                             ; CODE XREF: some_proc+BCj
                ADDS    R0, #0x30
                ADD     R1, SP, #0x48+var_38
                STRB    R0, [R1,R5]

loc_8274D18                             ; CODE XREF: some_proc+C8j
                ADDS    R5, #1
                ADDS    R4, #1
                LSLS    R4, R4, #0x18
                LSLS    R5, R5, #0x18
                LSRS    R5, R5, #0x18
                LSRS    R4, R4, #0x18
                CMP     R4, #0xF
                BCC     loc_8274CE6
                ADD     R3, SP, #0x48+var_48
                LDRB    R0, [R3,#0x48+var_37]
                LDRB    R1, [R3,#0x48+var_38]
                LSLS    R0, R0, #4
                ADDS    R1, R0, R1
                MOVS    R0, 0x330
                SUBS    R1, R1, R0
                STRB    R1, [R6,#1]
                LDRB    R1, [R3,#0x48+var_35]
                LDRB    R2, [R3,#0x48+var_36]
                LSLS    R1, R1, #4
                ADDS    R1, R1, R2
                SUBS    R1, R1, R0
                STRB    R1, [R6,#2]
                LDRB    R1, [R3,#0x48+var_33]
                LDRB    R2, [R3,#0x48+var_34]
                LSLS    R1, R1, #4
                ADDS    R1, R1, R2
                SUBS    R1, R1, R0
                STRB    R1, [R6,#3]
                LDRB    R1, [R3,#0x48+var_31]
                LDRB    R2, [R3,#0x48+var_32]
                LSLS    R1, R1, #4
                ADDS    R1, R1, R2
                SUBS    R0, R1, R0
                STRB    R0, [R6,#4]
                B       loc_8274D7C
; ---------------------------------------------------------------------------

loc_8274D60                             ; CODE XREF: some_proc+38j
                B       loc_8274D62

loc_8274D62
                MOVS    R2, #0
                MOVS    R1, #0
                LDR     R0, =someting
                STR     R1, [SP,#0x48+var_44]
                STR     R1, [SP,#0x48+var_40]
                STR     R2, [SP,#0x48+var_3C]
                STR     R2, [SP,#0x48+var_48]
                MOVS    R3, R5
                ADDS    R0, #0x10
                LDR     R2, =unk_878
                LDR     R1, =some_string
                BL      sub_8217D9C
; ---------------------------------------------------------------------------

loc_8274D7C                             ; CODE XREF: some_proc+116j
                MOVS    R0, #1
                ADD     SP, SP, #0x34
                POP     {R4-R7,PC}
; End of function some_proc
a player around .... look like nearest to machine langage and who can do more can do less

Salam

Last edited by abdoune; 06-10-2012 at 23:23.
  Reply With Quote
Old 06-10-2012, 23:36   #26 (permalink)
No Life Poster
 
Join Date: Feb 2004
Location: Algeria
Posts: 2,078
Member: 56090
Status: Offline
Thanks: 33
Thanked 98 Times in 46 Posts
and if you're a good low level lng coder you can easely JMP to high level lng
Salam
  Reply With Quote
Old 06-11-2012, 10:51   #27 (permalink)
Junior Member
 
Join Date: Apr 2012
Posts: 17
Member: 1752470
Status: Offline
Thanks: 3
Thanked 6 Times in 6 Posts
Quote:
Originally Posted by abdoune View Post
and if you're a good low level lng coder you can easely JMP to high level lng
Salam
Hello my friend I do not play. I am not coder. I just try to learn. I thought the author of so GLORIOUS thread could help me. But I think not!
Best reagards
  Reply With Quote
Old 07-09-2012, 02:36   #28 (permalink)
Insane Poster
 
Join Date: Dec 2006
Location: EGYPT
Posts: 79
Member: 406664
Status: Offline
Sonork: 100.1597132
Thanks: 263
Thanked 25 Times in 10 Posts
It is very simple to convert to C++ by IDA deassemply

B.R
  Reply With Quote
Old 08-05-2012, 13:07   #29 (permalink)
Freak Poster
 
Join Date: Mar 2007
Posts: 199
Member: 460280
Status: Offline
Thanks: 148
Thanked 78 Times in 41 Posts
My VB.Net Version

Here is my VB.Net version (i'm open for correction, please check my code):

Code:
Function Calc_Doro(ByVal imei As String, ByVal n As Byte) As String

        On Error Resume Next

        Dim v1, i As Byte
        Dim nck As String

        For i = 6 To 14

            v1 = CInt(Val(imei(i))) + 2 * CInt(Val(imei(i + 1)))
            If (v1 > 9) Then v1 = v1 Mod 10
            nck = nck + CStr(v1)


        Next

        If nck.Length = 9 Then
            nck = Mid(nck, 1, 8)
        Else
            nck = nck
        End If

        Return nck

        Err.Clear()

    End Function
In Button1:

Code:
Textbox2.Text = Calc_Doro(TextBox1.Text, 0)

BR.
  Reply With Quote
The Following User Says Thank You to John Q. For This Useful Post:
Old 08-26-2012, 02:24   #30 (permalink)
No Life Poster
 
zeroualot_7's Avatar
 
Join Date: Jan 2005
Location: NCK Dongle unlimi. ipho. ch.ck
Posts: 566
Member: 112112
Status: Offline
Sonork: 100.1621373
Thanks: 2,117
Thanked 90 Times in 55 Posts
And nokia algo any have this ....
  Reply With Quote
Reply

Bookmarks

Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
thread Thread Starter Forum Replies Last Post
DLS Box and new unlock algo. majid Nokia Legacy Phones ( DCT-1 , DCT-2 , DCT-3 , DCT-L ) 0 03-15-2002 17:33
Need al info about imei calc and algos!! Gsmhq Nokia Legacy Phones ( DCT-1 , DCT-2 , DCT-3 , DCT-L ) 4 01-16-2002 10:31
Free solutions for GSM. Support for all free. Nokia Authority Id calculation algo ! te Main Sales Section 6 12-15-2001 13:57
NEW FLASHING BOX :-)FOR NEW ALGO Toto Main Sales Section 2 09-03-2001 14:07
Anybody able to find out algo of new X35..... Toto x1x to x45/x50 0 06-10-2001 22:39


All times are GMT +1. The time now is 11:55.



Powered by Searchlight © 2013 Axivo Inc.
- GSM Hosting Ltd. - 1999-2013 -
Page generated in 1.68624 seconds with 12 queries

SEO by vBSEO