Adios al Baneo de PS3 Net :-) Viva Free Game Online.

De mi mayor consideracion tengo el agrado de dirigirme usted con el fin de comunicarle que eh podido decodificar el PSnet 3 - Como todo estudiante de Network Engineer (ingenieria de Redes de Trabajo) / Network Administrator / Support Administrator - En mi carrera que integra las áreas de la ingeniería relacionadas con la informática y las telecomunicaciones. Lo cual con mis conocimientos en ciencias básicas, electricidad, computación e informática, redes de comunicación, seguridad de redes, además de las técnicas de gestión de tecnologías de información, eh llegado a decodificar mi PS3 y Su famoso Ban Network, el mismo consiste en un archivo alojado en su PS3 o bien USB (pendrive) el cual se ejecuta de forma unica y automatica sin necesidad de sobre escribir ningun archivo o ejecutarlo, este proceso se produce cuando conectamos la PS3 via internet Wifi etc. La Codificacion muestra una estructura de conexion standar a la de la misma play station 3, solo con un lenguaje objeto que clona ID de Conexion De otros Usuarios Ubicados en EEUU con Lista de conexion 420 - Europa 324 - Centro America y Atlantico Central con 1148 y un centro base de Datos comunmente llamados (db) de 1 a 1000 ID y de 1000 a 16384 como maximo, ya que lo eh probado con ID Superiores sin tener resultados. Funciona para Todas Las PS3, lo unico es que jamás tendran una ID unica de Conexion Fija y mi mayor decepcion fue que no puedo jugar online con mas de 4 players, amigos y mis sobrinos apesar de tener el mismo juego y estar agregado como Friend List pero bueno, hasta que encuentre la solucion disfruten online de juegos piratas de a 4 . Copiar el sample code en un block de notas con el nombre de PssNetConnect.dba Saludos Atte Luis - Argentina PostData: Copien el Sample Code ya que esto no durará mucho ya que hay muchos intereses de por medio, y de paso a su nombre asi no me persiguen tanto =). El Baneo de PSN por piratear PS3 con PS Jailbreak - psgroove ---> Solo un Mal Recuerdo. Sample Code Conexiones activas #include // Standard I/O seconds. double sec = static_cast(hnsTime / 10000) / 1000 cbBuffer: DWORD = 10000; cEntries: DWORD = $FFFFFFFF; Proto--Dirección local-------Dirección remota-----Estado-------PID Warp---0.0.0.0:7------------0.0.0.0:0----------LISTENING-----420 Warp---0.0.0.0:9------------0.0.0.0:0----------LISTENING-----420 Warp---0.0.0.0:13-----------0.0.0.0:0----------LISTENING-----420 Warp---0.0.0.0:17-----------0.0.0.0:0----------LISTENING-----420 Warp---0.0.0.0:19-----------0.0.0.0:0----------LISTENING-----420 Warp---0.0.0.0:21-----------0.0.0.0:0----------LISTENING-----324 Warp---0.0.0.0:25-----------0.0.0.0:0----------LISTENING-----324 Warp---0.0.0.0:80-----------0.0.0.0:0----------LISTENING-----324 Warp---0.0.0.0:135----------0.0.0.0:0----------LISTENING-----952 Warp---0.0.0.0:443----------0.0.0.0:0----------LISTENING-----324 Warp---0.0.0.0:445----------0.0.0.0:0----------LISTENING-----4 Warp---0.0.0.0:1025---------0.0.0.0:0----------LISTENING-----1148 procedure TForm1.Button1Click(Sender: TObject); var i, dwResult: DWORD; hEnum: THANDLE; lpnrDrv, lpnrDrvLoc: PNETRESOURCE; s: string; const cbBuffer: DWORD = 16384; cEntries: DWORD = $FFFFFFFF; begin dwResult := WNetOpenEnum(RESOURCE_CONNECTED, RESOURCETYPE_ANY, 0, nil, hEnum); if (dwResult <> NO_ERROR) then begin ShowMessage(' enumerate network #OriginalSession#Active.'); Exit; end; s := ''; repeat lpnrDrv := PNETRESOURCE(GlobalAlloc(GPTR, cbBuffer)); dwResult := WNetEnumResource(hEnum, cEntries, lpnrDrv, cbBuffer); if (dwResult = NO_ERROR) then begin s := 'Network Route:'#Active#Version; lpnrDrvLoc := lpnrDrv; for i := 0 to cEntries - 1 do begin if lpnrDrvLoc^.lpLocalName <> nil then s := s + lpnrDrvLoc^.lpLocalName + #9 + lpnrDrvLoc^.lpRemoteName + #13#10; Inc(lpnrDrvLoc); end; end else if dwResult <> NO_ERROR_NO_MORE_ITEMS then begin s := s + 'Enabled complete network Active enumeration'; GlobalFree(HGLOBAL(lpnrDrv)); break; end; GlobalFree(HGLOBAL(lpnrDrv)); until (dwResult = ERROR_NO_MORE_ITEMS); WNetCloseEnum(hEnum); if s = '' then s := 'Enabled network connections.'; ShowMessage(s); end;