-
Posts
1,362 -
Credits
0 -
Joined
-
Last visited
-
Feedback
0%
Content Type
Articles
Profiles
Forums
Store
Everything posted by tiranous
-
I have tried the 1st :P I am going to w8 you for your save :P and I'll give the adena exept if someone share one 40 lvl :P
-
hi, I need One ready profile lvl 40 for game Tom Clancy's H.A.W.X If the profile work I will give 200 adena ... thx (When I say profile I mean ready save {for them who don't know what is profile at hawx} ) P.S take care.. I don't need hack for Unlocks.. I have it.. I need profile lvl 40
-
I have Nod32 ... and its fine.. it doesn't find it like a virus also I have the original msn... and this eror is not only for msn when I close msn I get the same eror with diferent name.. for example (lineage II) and if i close Lineage II the same eror with diferent name :S
-
yes but no answers :S I thout that it can be bought only 1 time per day .. but I think I am wrong
-
WTS [wts] Donate char l2mafia 02 kvn
tiranous replied to tiranous's topic in Marketplace [Items & Chars]
bumpz I think that l2 is now old :P noone want to start? :P -
[gr} tsouk.. tpt apo ta duo.. sinexia to idio eror :S
-
well I want to buy one this staff ( Get a random amount of money, between -3000 and +3000! ) but it always says sold out.. .. It is sold out for ever? noone can buy it>?
-
pws 8a kanw install to antivirus me antivirus energopoiimeno re c.. auto p les dn stekei.... panw leei msnmsg.exe auto einai to msn.. omws an klisw to msn auto to eror allazei kai leei alla diafora...
-
I get this eror again and again.. what is this ? and how can I fix it :S and also .. antivirus finds all time viruses :S .... Where all this viruses got in my pc :S lawl
-
[request]shit protection
tiranous replied to tiranous's question in Request Server Development Help [L2J]
oh yeah you are right thx :D and this is for all atackers or only for shit and noobish eror? -
[request]shit protection
tiranous replied to tiranous's question in Request Server Development Help [L2J]
You didn't understood me.. i don't need a program that atack a server.. I need one that Protect server from atack called "shit" and other atacks -
WTS [wts] Donate char l2mafia 02 kvn
tiranous replied to tiranous's topic in Marketplace [Items & Chars]
lol you bump at my topiC? take care because you have -3.. one more - and you'll banned bump -
You all know the program shit.. that atacks and close the server in 2 sec... I need one protection for this program .. thx
-
Well I will show you how to make a 21 cards game in VB this game is not like normal 21cards game.. you can't stop at 2-3 cards... you must take cards untill you get 21 or burst.... the program will look like this: ok we can now start :P Firstly, follow the instructions below to add the right components and give them the right properties: - Click on Form1, and change the text to "21", change the STARTPOSITION property to "CENTERSCREEN", change the MAXIMIZEBOX property to "FALSE", change the FORMBORDERSTYLE property to "FIXEDSINGLE", and finally the BACKCOLOUR property to "GREEN". - Add Label1, and change the text to "Player 1 Cards: 0" - Add Label2, change the VISIBLE property to "FALSE" and delete it's text. It doesn't matter where you put this label on the form - Add Label3, and change the text to "Target: 21" - Add Label4, change the VISIBLE property to "FALSE" and delete it's text. It doesn't matter where you put this label on the form - Add Label5, and change the text to "Player 2 Cards: 0" - Add Label6, and change the text to "First Player To Fill Their Progress Bar Wins!" - Add Label7, change the VISIBLE property to "FALSE" and delete it's text. It doesn't matter where you put this label on the form. - Add Button1 and change it's text to "Player 1" - Add Button2, change the ENABLED property to "FALSE" and change the text to "Player 2" - Add Button 3, and change the text to "New Game" - Add 2 progress bars - Add 5 picture boxes and change the VISIBLE property to "FALSE" for all of them. Save the pictures of the cards(download them from the end of topiC) to your computer. Then, go to PictureBox1, and click on the IMAGE property. Click "Local Resource" and "Import", then find the picture of the ace. For PictureBox2, do the same but select the picture of the 2 of Spades, for PictureBox3 select the 3 of Hearts etc. - Position all the PictureBoxes on top of each other - If you haven't done already, move all the different components about so that they are in the correct places (as shown in the video). Now we can start to programme the game, so switch to Code View and follow these instructions: Enter the following code at the top (below "Public Class Form1") Public P1Cards As Integer = 0 Public P2Cards As Integer = 0 Public P1Score As Integer = 0 Public P2Score As Integer = 0 Double click Button1 and copy + paste this: Dim TheRandomClass As New Random Dim i As Integer = 0 i = TheRandomClass.Next(1, 6) Label2.Text = i.ToString P1Cards += i Label1.Text = "Player 1 Cards: " + P1Cards.ToString If Label2.Text = 1 Then PictureBox1.Visible = True PictureBox2.Visible = False PictureBox3.Visible = False PictureBox4.Visible = False PictureBox5.Visible = False End If If Label2.Text = 2 Then PictureBox1.Visible = False PictureBox2.Visible = True PictureBox3.Visible = False PictureBox4.Visible = False PictureBox5.Visible = False End If If Label2.Text = 3 Then PictureBox1.Visible = False PictureBox2.Visible = False PictureBox3.Visible = True PictureBox4.Visible = False PictureBox5.Visible = False End If If Label2.Text = 4 Then PictureBox1.Visible = False PictureBox2.Visible = False PictureBox3.Visible = False PictureBox4.Visible = True PictureBox5.Visible = False End If If Label2.Text = 5 Then PictureBox1.Visible = False PictureBox2.Visible = False PictureBox3.Visible = False PictureBox4.Visible = False PictureBox5.Visible = True End If If P1Cards > 21 Then MsgBox("Bust!", MsgBoxStyle.Critical, "End Of Turn") P1Cards = 0 Label2.Text = "" Label1.Text = "Player 1 Cards: 0" Button1.Enabled = False Button2.Enabled = True PictureBox1.Visible = False PictureBox2.Visible = False PictureBox3.Visible = False PictureBox4.Visible = False PictureBox5.Visible = False End If If P1Cards = 21 Then MsgBox("21!", MsgBoxStyle.Information, "End Of Turn") P1Cards = 0 Label2.Text = "" Label1.Text = "Player 1 Cards: 0" Dim o As Integer = 0 o = 1 P1Score += o Label4.Text = P1Score * 20 ProgressBar1.Value = Label4.Text Button1.Enabled = False Button2.Enabled = True PictureBox1.Visible = False PictureBox2.Visible = False PictureBox3.Visible = False PictureBox4.Visible = False PictureBox5.Visible = False End If If ProgressBar1.Value = 100 Then MsgBox("Player 1 Wins!", MsgBoxStyle.Information, "End Of Game") Button1.Enabled = False Button2.Enabled = False Label1.Text = "Player 1 Cards: 0" Label5.Text = "Player 2 Cards: 0" End If Double click Button2 and copy + paste this: Dim TheRandomClass As New Random Dim i As Integer = 0 i = TheRandomClass.Next(1, 6) Label2.Text = i.ToString P2Cards += i Label5.Text = "Player 2 Cards: " + P2Cards.ToString If Label2.Text = 1 Then PictureBox1.Visible = True PictureBox2.Visible = False PictureBox3.Visible = False PictureBox4.Visible = False PictureBox5.Visible = False End If If Label2.Text = 2 Then PictureBox1.Visible = False PictureBox2.Visible = True PictureBox3.Visible = False PictureBox4.Visible = False PictureBox5.Visible = False End If If Label2.Text = 3 Then PictureBox1.Visible = False PictureBox2.Visible = False PictureBox3.Visible = True PictureBox4.Visible = False PictureBox5.Visible = False End If If Label2.Text = 4 Then PictureBox1.Visible = False PictureBox2.Visible = False PictureBox3.Visible = False PictureBox4.Visible = True PictureBox5.Visible = False End If If Label2.Text = 5 Then PictureBox1.Visible = False PictureBox2.Visible = False PictureBox3.Visible = False PictureBox4.Visible = False PictureBox5.Visible = True End If If P2Cards > 21 Then MsgBox("Bust!", MsgBoxStyle.Critical, "End Of Turn") P2Cards = 0 Label2.Text = "" Label5.Text = "Player 2 Cards: 0" Button2.Enabled = False Button1.Enabled = True PictureBox1.Visible = False PictureBox2.Visible = False PictureBox3.Visible = False PictureBox4.Visible = False PictureBox5.Visible = False End If If P2Cards = 21 Then MsgBox("21!", MsgBoxStyle.Information, "End Of Turn") P2Cards = 0 Label2.Text = "" Label5.Text = "Player 2 Cards: 0" Dim o As Integer = 0 o = 1 P2Score += o Label7.Text = P2Score * 20 ProgressBar2.Value = Label7.Text Button2.Enabled = False Button1.Enabled = True PictureBox1.Visible = False PictureBox2.Visible = False PictureBox3.Visible = False PictureBox4.Visible = False PictureBox5.Visible = False End If If ProgressBar2.Value = 100 Then MsgBox("Player 2 Wins!", MsgBoxStyle.Information, "End Of Game") Button1.Enabled = False Button2.Enabled = False Label1.Text = "Player 1 Cards: 0" Label5.Text = "Player 2 Cards: 0" End If Double Click Button3 and copy + paste this: P1Cards = 0 P2Cards = 0 P1Score = 0 P2Score = 0 Label1.Text = "Player 1 Cards: 0" Label5.Text = "Player 2 Cards: 0" Label2.Text = "" Button1.Enabled = True Button2.Enabled = False ProgressBar1.Value = 0 ProgressBar2.Value = 0 PictureBox1.Visible = False PictureBox2.Visible = False PictureBox3.Visible = False PictureBox4.Visible = False PictureBox5.Visible = False Click Start Debugging, and the game should work! ok that was all .. code credits to : Davidboskett text credits to : Davidboskett Download pictures for last step from Here Download game from Here
-
xD i am trying this :D
-
WTS [wts] Donate char l2mafia 02 kvn
tiranous replied to tiranous's topic in Marketplace [Items & Chars]
bumpz0r -
is greek/brazilian not only brazilian
-
[help] how to exclude a file from antivirus scanning
tiranous replied to tiranous's topic in Off-Topics
that was.. I found it thx :D it can be locked -
[help] how to exclude a file from antivirus scanning
tiranous replied to tiranous's topic in Off-Topics
well I need antivirus for all others files but not for this one.. ... and also I don't need it for porn xD and also if I stop it Some others fiels maybe destroy my pc :P I just want to exclude 1 file -
I have antivirus No32 and.. I want to exclude a file from scanning ... and also .. when I also want when I try to open it antivirus to allow me to open it and not delete it :S anyone know how? :S
-
Αλλάξτε τους δείκτες του ποντικιού σας με κάτι special
tiranous replied to ˚°▫•Eмiизм●▫°˚™'s topic in Guides & Tutorials
credits to who? xD i have found it to other site.. stop sharing stolen credits check this : http://oktabitos.wordpress.com/page/13/ (go a bit down ) kai episis.. auto to pragma m xalase to pontiki :p twra sernete :P -
that removes voice? or just remix?
-
I just created account in english... and work perfeclty...
-
WTS [wts] Donate char l2mafia 02 kvn
tiranous replied to tiranous's topic in Marketplace [Items & Chars]
bump -
[help] when ppl restart lose their items
tiranous replied to tiranous's question in Request Server Development Help [L2J]
upsolutely nothink .. gameserver is normal...