|
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. Only registered members may post questions, contact other members or search our database of over 8 million posts. Registration is fast, simple and absolutely free so please - Click to REGISTER! If you have any problems with the registration process or your account login, please contact contact us . |
|
Register | FAQ | Donate | Forum Rules | Root any Device | ★iPhone Unlock★ | ★ Direct Codes ★ | Direct Unlock Source | Mark Forums Read |
GSM Programming & Reverse Engineering Here you can post all Kind of GSM Programming and Reverse Engineering tools and Secrets. |
| LinkBack | Thread Tools | Display Modes |
07-24-2002, 02:49 | #1 (permalink) |
Freak Poster Join Date: Jul 2002 Location: MAD Age: 50
Posts: 483
Member: 13545 Status: Offline Thanks Meter: 2 | Program to read a sec. code... Can any one help me to develop a small program using BORLAND C++ BUILDER or C++ LANG. to read a security code from nokia 6120 TDMA for ex. ...? P.S.: I'm a programmer .. Thanks in advance ... Abed Nokia ******* Last edited by MrHazeem; 07-24-2002 at 02:54. |
01-17-2008, 01:56 | #10 (permalink) |
Freak Poster Join Date: Dec 2004 Location: GSM network (near HLR) Age: 47
Posts: 416
Member: 100920 Status: Offline Thanks Meter: 21 | ok Code: procedure TFormMain.Btn_ReadLockClick(Sender: TObject); var pck : t_intvect; i : integer; begin if not(FormMain.InitializeCOM) then exit; setlength(pck,133); pck[0] := $26; pck[1] := $52; for i:=2 to 133 do pck[i] := $00; DO_CMD(pck,True,True,False); pck := ReadCMD; if pck[0] = $13 then else EdtUSER_CODE.Text := Char(pck[3])+Char(pck[4])+Char(pck[5])+Char(pck[6]); end; Code: procedure TFormMain.Btn_WriteLockClick(Sender: TObject); var pck : t_intvect; i : integer; begin if not(FormMain.InitializeCOM) then exit; setlength(pck,133); pck[0] := $27; pck[1] := $52; for i:=2 to 133 do pck[i] := $00; pck[3] := Integer(EdtUSER_CODE.Text[1]); pck[4] := Integer(EdtUSER_CODE.Text[2]); pck[5] := Integer(EdtUSER_CODE.Text[3]); pck[6] := Integer(EdtUSER_CODE.Text[4]); DO_CMD(pck,True,True,False); pck := ReadCMD; end; |
01-17-2008, 11:05 | #12 (permalink) |
Freak Poster Join Date: Dec 2004 Location: GSM network (near HLR) Age: 47
Posts: 416
Member: 100920 Status: Offline Thanks Meter: 21 | DO_CMD(arg1,arg2,arg3,arg4) send arg1 to device arg1 = array of byte arg2 = add 2 byte(z) CRC ? y or n arg3 = add 1 byte EOq ($7E) ? y or n arg4 = read after write ? y or n --- |
01-18-2008, 08:07 | #14 (permalink) |
Insane Poster Join Date: Feb 2007 Location: Right beside you
Posts: 84
Member: 453484 Status: Offline Thanks Meter: 5 | Ack***, FormMain.InitializeCOM (FormMain) - this part is missing from the program you have posted, if you have it, pls upload it too so we may start playing with it BR |
Bookmarks |
Thread Tools | |
Display Modes | |
| |
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Which program to read the flash of CX65?? | gianlukko | Siemens-Benq RingTones and WallPapers | 9 | 07-04-2005 16:21 |
Wot is best program to read a orange sim | JPM646 | Sim Cloning and Scaning | 2 | 03-15-2003 18:11 |
What program to read eeprom V50 at presence EMMIBOX ??? | dms3000 | Motorola Old Legacy (EMMI) | 0 | 07-24-2002 12:11 |
Problems reading 8310 sec. code using Neelix | NUGSM | Nokia Digital Core Technology 4 ( DCT-4 ) | 5 | 02-02-2002 15:39 |
Need program to read & write part of flash be4 (not full flash) | maks | Alcatel & TCL Old Models | 2 | 11-16-2001 13:26 |
|