• The forum has been updated. For an explanation of some of the changes, head over here.

Recent content by Ducksrulez

  1. Ducksrulez

    Resolved Turning off corpses doesn't do anything

    Version: 1.2.1e Computer Specs: OS: Windows 10 GPU: GTX 970 CPU: i5 7600 RAM: 16 gb Motherboard: gigabyte h270n Storage Device (HDD/SSD): WDS500g2b0a ssd I turned corpses off in the settings menu and it doesn't seem to do anything. I join servers and I still end up seeing bodies. Which sucks...
  2. Ducksrulez

    Balion Mercenaries - Official Clan Thread 2.0

    yeah I think its an april fools thing :roll: Currently the logistics of multiplayer are jankier than warband's beta. probably wait a bit for them to get everything sorted out before investing too much time in the multiplayer.
  3. Ducksrulez

    Balion Mercenaries - Official Clan Thread 2.0

    Ron Burgundy said:
    Aha! I knew I must've forgotten someone. Updated the roster.

    hey
  4. Ducksrulez

    Balion Mercenaries - Official Clan Thread 2.0

    ehh from what i remember warband was also pretty janky on release. they will probably fix it up 
  5. Ducksrulez

    Balion Mercenaries - Official Clan Thread 2.0

    people still  :roll:

    anyways are you guys gonna be playing viking conquest next week?
  6. Ducksrulez

    The War Z

    just gonna leave this here if it hasn't been posted yet...

    http://www.youtube.com/watch?v=FXKu5lV69V8
  7. Ducksrulez

    Ra - The Following

    yolo swag
  8. Ducksrulez

    Ra - The Following

    sala, I hate you.
  9. Ducksrulez

    Balion Mercenaries - Official Clan Thread 2.0

    ^^

    and amazingly bigboss wasn't shooting a teammate in that picture
  10. Ducksrulez

    Fight Simulator on Visual Basic 2010 made by Tansvanio

    http://patorjk.com/programming/tutorials/vbarrays.htm

    so it would be some thing like
    Public i As Integer
    Public strAtk (0 to 2) As String

    strAtk (0) = "Punch"
    strAtk (1) = "kick"
    strAtk (2) = "headbutt"
    i = 1

    RichTextBox1.Text = strAtk (i)
    this will print kick into your text box thing probably...
    I don't really now visual basic so who knows its probably wrong  :neutral:
  11. Ducksrulez

    Fight Simulator on Visual Basic 2010 made by Tansvanio

    tansvanio said:
    I am not sure I even used a seed. I am quite new at these things. Here is the code I used.



    Public Class Form1
        Dim Fighter1 As String
        Dim Fighter2 As String
        Dim Num1 As Single
        Public Class GlobalVariable
            Public Shared intVariable As Integer
        End Class






        Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
            Close()
        End Sub


        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            Fighter1 = CObj(TextBox1.Text)
            Fighter2 = CObj(TextBox2.Text)


    Simulation_Start:
            If GlobalVariable.intVariable <= 19 Then
                'Add one to the intVariable
                GlobalVariable.intVariable = GlobalVariable.intVariable + 1
                'Do the common action
                Dim x As Integer
                Dim Num1 As Integer
                Randomize()


                For x = 1 To 20
                    Num1 = Rnd() * 20


                    If Num1 = 1 Then
                        RichTextBox1.Text = Fighter1 + " kicks " + Fighter2 + " in the stomach!"


                    ElseIf Num1 = 2 Then
                        RichTextBox1.Text = Fighter2 + " kicks " + Fighter1 + " in the stomach!"


                    ElseIf Num1 = 3 Then
                        RichTextBox1.Text = Fighter1 + " punches " + Fighter2 + " in his jaw!"


                    ElseIf Num1 = 4 Then
                        RichTextBox1.Text = Fighter2 + " punches " + Fighter1 + " in his jaw!"


                    ElseIf Num1 = 5 Then
                        RichTextBox1.Text = Fighter1 + " hits " + Fighter2 + " with a flying kick!"


                    ElseIf Num1 = 6 Then
                        RichTextBox1.Text = Fighter2 + " hits " + Fighter1 + " with a flying kick!"


                    ElseIf Num1 = 7 Then
                        RichTextBox1.Text = Fighter1 + " introduces his finger into " + Fighter2 + "´s eye! " + Fighter2 + " is half blind."


                    ElseIf Num1 = 8 Then
                        RichTextBox1.Text = Fighter2 + " introduces his finger into " + Fighter1 + "´s eye! " + Fighter1 + " is half blind."


                    ElseIf Num1 = 9 Then
                        RichTextBox1.Text = Fighter1 + " throws " + Fighter2 + " to the ground!"


                    ElseIf Num1 = 10 Then
                        RichTextBox1.Text = Fighter2 + " throws " + Fighter1 + " to the ground!"


                    ElseIf Num1 = 11 Then
                        RichTextBox1.Text = Fighter1 + " breaks " + Fighter2 + "´s nose! " + Fighter2 + " is bleeding!"


                    ElseIf Num1 = 12 Then
                        RichTextBox1.Text = Fighter2 + " breaks " + Fighter1 + "´s nose! " + Fighter1 + " is bleeding!"


                    ElseIf Num1 = 13 Then
                        RichTextBox1.Text = Fighter1 + " breaks " + Fighter2 + "´s arm!"


                    ElseIf Num1 = 14 Then
                        RichTextBox1.Text = Fighter2 + " breaks " + Fighter1 + "´s arm!"


                    ElseIf Num1 = 15 Then
                        RichTextBox1.Text = Fighter1 + " tries to choke " + Fighter2 + "!"


                    ElseIf Num1 = 16 Then
                        RichTextBox1.Text = Fighter2 + " tries to choke " + Fighter1 + "!"


                    ElseIf Num1 = 17 Then
                        RichTextBox1.Text = Fighter1 + " bites off " + Fighter2 + "´s ear!"


                    ElseIf Num1 = 18 Then
                        RichTextBox1.Text = Fighter2 + " bites off " + Fighter1 + "´s ear!"


                    End If




                Next


                If GlobalVariable.intVariable = 20 Then
                    Button1.Text = "Finish him!"


                    If Num1 = 19 Then
                        RichTextBox1.Text = Fighter1 + " punches " + Fighter2 + " in his balls! Ouch!"


                    ElseIf Num1 = 20 Then
                        RichTextBox1.Text = Fighter2 + " punches " + Fighter1 + " in his balls! Ouch!"


                    End If
                End If




                Else


                    'Do the alternate action


                    Dim x As Integer
                    Dim Num1 As Integer
                    Randomize()


                    For x = 1 To 2
                        Num1 = Rnd() * 2


                    If Num1 = 1 Then
                        RichTextBox1.Text = Fighter1 + " lands a punch so hard in " + Fighter2 + "´s head that he decapitates him!"
                        RichTextBox2.Text = Fighter1 + " wins!"
                        GoTo Simulation_Start


                    ElseIf Num1 = 2 Then
                        RichTextBox1.Text = Fighter2 + " lands a punch so hard in " + Fighter1 + "´s head that he decapitates him!"
                        RichTextBox2.Text = Fighter2 + " wins!"
                        GoTo Simulation_Start


                    End If


                    Next
                End If
        End Sub




        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load


            'initalize the variable
            GlobalVariable.intVariable = 1


        End SubEnd Class

    you could probably make this a lot simpler if you used arrays for the attacks and body parts
  12. Ducksrulez

    Ultra-realistic games with your input!

    this is unity right?

    anyway good luck!
  13. Ducksrulez

    Ra - The Following

    but wai???
Top Bottom