Wrarthis Application Arma 3 Exile - Epoch - [PENDING REVIEW]

Moderator: Server Staff

User avatar
Wrarthis
Posts: 54
Joined: Tue Jan 05, 2016 12:35 am
Location: NSW

Re: Wrarthis Application Arma 3 Exile - Epoch - [PENDING REVIEW]

Postby Wrarthis » Wed Feb 03, 2016 4:53 am

Just cracked 243hours on server :P
USE THIS CODE TO GET 5,000 UEC For Star Citizen :) STAR-GH5M-MJDN
User avatar
[Reavers]Suicide
Posts: 237
Joined: Thu Dec 17, 2015 1:22 am

Re: Wrarthis Application Arma 3 Exile - Epoch - [PENDING REVIEW]

Postby [Reavers]Suicide » Thu Feb 04, 2016 12:55 am

Seeing as our group rarely rolls out en masse these days, I can't forsee any major issues. Wrarthis has been helpful to not only new players, but also the moderating team and in testing future additions to the server.

He is on when majority of us are asleep or at work, he's always in TS.

He is also of a sound mind and a decent fellow, which is hard to say about a Cav Scout...

His application has my full support.

+1.8
User avatar
[Reavers]Diablous
Posts: 142
Joined: Fri Dec 18, 2015 7:07 am
Location: Canberra

Re: Wrarthis Application Arma 3 Exile - Epoch - [PENDING REVIEW]

Postby [Reavers]Diablous » Thu Feb 04, 2016 4:48 am

What Suicide said.

Sub MyVote (Vote as Variant, MyVote as Variant)
Vote = Suicide.Stupid.OverVote
If Vote > 1 and Vote < 2 then
Do until Vote <= 1
Vote = Vote - 1
Next
If Vote <> 1 then
MyVote = Vote - 1
Else
MyVote = Vote
End if
End if
Msg.Reply = "+ " & MyVote
End Sub

+ 0.2
"Don't do it, Suicide, everything will explode..."
User avatar
BornLucky
Founder
Posts: 436
Joined: Sun Dec 13, 2015 11:55 pm

Re: Wrarthis Application Arma 3 Exile - Epoch - [PENDING REVIEW]

Postby BornLucky » Thu Feb 04, 2016 9:33 am

[Reavers]Diablous wrote:What Suicide said.

Sub MyVote (Vote as Variant, MyVote as Variant)
Vote = Suicide.Stupid.OverVote
If Vote > 1 and Vote < 2 then
Do until Vote <= 1
Vote = Vote - 1
Next
If Vote <> 1 then
MyVote = Vote - 1
Else
MyVote = Vote
End if
End if
Msg.Reply = "+ " & MyVote
End Sub

+ 0.2


dafuq are you trying to do ... Mr.OldSchoolVB


You gotta powershell this mofo (just cause I have been doing PS scripts all bloody week :( )..


Note: Doesnt work yet but by goddamn I will get it working lol ... 5 Second script... so logic bug in there somewhere :P

Code: Select all

#'--------------------------------------------------------------------
<#
    Script: Get-MyVote.ps1
    Author: BornLucky
    Date: 2016/02/04
    Description: This script will get your vote calculation based on the input provided
#>
#'--------------------------------------------------------------------
#'START FUNCTION - Calculate-MyVoteScore
#'--------------------------------------------------------------------
Function Calculate-MyVoteScore{
    [CmdletBinding()]
    Param(
        [Parameter(
            Position=0,
            Mandatory=$True,
            ValueFromPipeLine=$True,
            ValueFromPipeLineByPropertyName=$True
        )]
        [Boolean]$playerIstLiked,
        [Parameter(
            Position=1,
            Mandatory=$True,
            ValueFromPipeLine=$True,
            ValueFromPipeLineByPropertyName=$True
        )]
        [Int]$previousVote
    )
#'--------------------------------------------------------------------
#'Variable declaration
#'--------------------------------------------------------------------
    [Int]$i                  = 0
    [Int]$myVoteScore        = 0
#'--------------------------------------------------------------------
#'Executed CmdLet
#'--------------------------------------------------------------------
    If($previousVote -gt 1 -AND $previousVote -lt 2){
        Do{
            $previousVote --
        }Until($i -le 1 )
        If(!($previousVote -eq 1)){
            $myVoteScore     = $previousVote + 1
        }Else{
            $myVoteScore     = $previousVote
        }
    }Else{
        If($previousVote -gt 2){
            $myVoteScore     = ($previousVote / 2)
        }
        If($previousVote -lt 2){
            If($playerIstLiked -eq $True){
                $myVoteScore = 1
            }Else{
                $myVoteScore = -1
            }
        }
    }   
    Return $myVoteScore;
}
#'--------------------------------------------------------------------
#'END FUNCTION - Calculate-MyVoteScore
#'--------------------------------------------------------------------
#'--------------------------------------------------------------------
#'START FUNCTION - Is-Numeric
#'--------------------------------------------------------------------
function Is-Numeric {
    [CmdletBinding()]
    Param(
        [Parameter(
            Position=0,
            Mandatory=$True,
            ValueFromPipeLine=$True,
            ValueFromPipeLineByPropertyName=$True
        )]
        [Boolean]$numToCheck
    )
#'--------------------------------------------------------------------
    Try{
        0 + $x | Out-Null
        return $true
    }Catch{
        return $false
    }
}
#'--------------------------------------------------------------------
#'END FUNCTION - Is-Numeric
#'--------------------------------------------------------------------
#'--------------------------------------------------------------------
#'START - CODE BODY
#'--------------------------------------------------------------------
#'--------------------------------------------------------------------
#'Variable declaration
#'--------------------------------------------------------------------
[String]$myName                = ""
[String]$applicantName         = ""
[String]$playerLikedQuestion   = ""
[Boolean]$answerValid          = $false
[Boolean]$numberValid          = $false
[Boolean]$playerLiked          = $false
[Int]$previousPersonVote       = 0
[Int]$myVote                   = 0
[String]$myMessage             = ""
#'--------------------------------------------------------------------
#'Main Code Body - Funcationality / Logic
#'--------------------------------------------------------------------
$myName                        = Read-Host "What is your name: "
#'--------------------------------------------------------------------
$applicantName                 = Read-Host "What is Applicant's name: "
#'--------------------------------------------------------------------
$answerValid                   = $false
$playerLikedQuestion           = Read-Host "Do you like the player (Y/N) : "
$playerLikedQuestion           = $playerLikedQuestion.ToUpper()
Do{
    if($playerLikedQuestion -eq "Y" -OR $playerLikedQuestion -eq "N"){
        $answerValid           = $True
    }Else{   
        $answerValid           = $False
        $playerLikedQuestion   = Read-Host "Invalid Response... Do you like the player (Y/N) : "
    }
}Until($answerValid = $True)
If($playerLikedQuestion -eq "Y"){
    $playerLiked           = $True
}Else{
    $playerLiked           = $False
}
#'--------------------------------------------------------------------
$answerValid                   = $false
$previousPersonVote            = Read-Host "What was the previous persons vote (numerical values only): "
$numberValid                   = Is-Numeric -numToCheck $previousPersonVote
Do{
    if($numberValid -eq $True){
        $answerValid           = $True
    }Else{   
        $answerValid           = $False
        $previousPersonVote    = Read-Host "What was the previous persons vote (numerical values only): "
        $numberValid           = Is-Numeric -numToCheck $previousPersonVote
    }
}Until($answerValid = $True)
#'--------------------------------------------------------------------
$myVote                        = Calculate-MyVoteScore -playerIstLiked $playerLiked -previousVote $previousPersonVote
#'--------------------------------------------------------------------
#'END   - CODE BODY
#'--------------------------------------------------------------------
#'--------------------------------------------------------------------
#'CODE OUTPUT / RESULT
#'--------------------------------------------------------------------
$myMessage                     = "I, " + $myName + ", give " + $applicantName + " a vote of " + $myVote
Write-Host $myMessage
DigitalCruiser
Posts: 7
Joined: Fri Feb 05, 2016 5:10 am
Location: Brisbane, QLD

Re: Wrarthis Application Arma 3 Exile - Epoch - [PENDING REVIEW]

Postby DigitalCruiser » Fri Feb 05, 2016 6:54 am

Here's the easier to read version

Code: Select all

Vote = Suicide.Stupid.OverVote
Vote = 1.8

Code: Select all

If Vote > 1 and Vote < 2 then
If 1.8 > 1 (true) and 1.8 < 2 (true) then

Code: Select all

Do until Vote <= 1
Minus 1 until less than or equal to 1

Code: Select all

Vote = Vote - 1
Vote = 0.8

Code: Select all

Next

Code: Select all

If Vote <> 1 then
if 0.8 not equal to 1 then

Code: Select all

MyVote = Vote - 1
myvote = 0.8 - 1 == -0.2

Code: Select all

Else
if 0.8 is equal to 1 then

Code: Select all

MyVote = Vote 
myvote = 0.8

Code: Select all

End if

Code: Select all

End if

Code: Select all

Msg.Reply = "+ " & MyVote
Reply "+ " -0.2

So diablous actually gives -0.2 not +0.2
User avatar
[Reavers]Diablous
Posts: 142
Joined: Fri Dec 18, 2015 7:07 am
Location: Canberra

Re: Wrarthis Application Arma 3 Exile - Epoch - [PENDING REVIEW]

Postby [Reavers]Diablous » Fri Feb 05, 2016 8:37 am

Lolz. Good pickup DC. I should've changed it to another loop within the if...

Code: Select all

MyVote = Vote
If MyVote <> 1 then
Do until MyVote + Vote = 1
MyVote = MyVote - 0.1
Loop
End if
This is why we don't do random crap on the forums while having a 'conversation' and a smoke. I also stated next not loop in the first until... Christ.
"Don't do it, Suicide, everything will explode..."
User avatar
BornLucky
Founder
Posts: 436
Joined: Sun Dec 13, 2015 11:55 pm

Re: Wrarthis Application Arma 3 Exile - Epoch - [PENDING REVIEW]

Postby BornLucky » Fri Feb 05, 2016 10:26 am

Thats why I couldnt follow it... I was that doesnt equal a positive number...

lol havent had time to go remake mine. Was thinking of adding a rand function to get a value in decimal 0.00 between 0.00 and 5.00 :P




---------------


Trying to get this topic back on track, you are making great progress Wrarthis is both helping the staff and the community keep it up :)
DigitalCruiser
Posts: 7
Joined: Fri Feb 05, 2016 5:10 am
Location: Brisbane, QLD

Re: Wrarthis Application Arma 3 Exile - Epoch - [PENDING REVIEW]

Postby DigitalCruiser » Fri Feb 05, 2016 11:59 am

Diablous is killing me with the "FORMATTING"
User avatar
[AI] STALKER
Posts: 90
Joined: Mon Dec 14, 2015 2:10 am

Re: Wrarthis Application Arma 3 Exile - Epoch - [PENDING REVIEW]

Postby [AI] STALKER » Fri Feb 05, 2016 12:49 pm

Over 18 + 1
Mature player who is approachable and tolerant of people i would send to the ocean + 1
Generally a top bloke even if he does play with Suicide at times.

No problem supporting a moderator 3 week trial.
jubear
Posts: 3
Joined: Mon Feb 08, 2016 6:20 am

Re: Wrarthis Application Arma 3 Exile - Epoch - [PENDING REVIEW]

Postby jubear » Tue Feb 09, 2016 9:46 pm

While it is very noble that Wrathis wants to reduce the work load of the team, Is he play schedule the same as the other mods we have? I feel the 6-10pm slot is extremely well covered at the moment while we seem to have have one mod/admin trying to cover the rest of the times.

The server is basically the wild west outside of prime time because 95% of the mod time all play at the exact same times. Yes everyone has to work etc but there is no point having a huge mod team if they all cover the exact same time period.

Also as a community member I am simply not a fan of having a clan composed nearly entirely of mods (eXtreme gaming)

Remember the community at large does not frequent the forums so perhaps just getting the admin team to smurf for a bit to gain a feel for it themselves would be a good option.

Return to “Trial Passed”

Who is online

Users browsing this forum: No registered users and 1 guest