onyx_online/q3rcon-ps
1
0
Fork 0
mirror of https://github.com/onyx-and-iris/q3rcon-ps.git synced 2025-01-18 16:50:52 +00:00
Code Issues Packages Projects Releases Wiki Activity

upd function names, use approved verbs

Browse Source
This commit is contained in:
onyx-and-iris 2023-12-01 09:35:37 +00:00
parent 0e5ee0e523
commit 22d036cbab
1 changed files with 23 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

43
examples/gui.ps1
View File

@ -12,7 +12,7 @@ $CAB = New-Object System.Windows.Forms.Button
$Lbl = New-Object System.Windows.Forms.Label $Lbl = New-Object System.Windows.Forms.Label
$RLbl = New-Object System.Windows.Forms.Label $RLbl = New-Object System.Windows.Forms.Label
Function InitForm { Function New-Form {
$form = New-Object System.Windows.Forms.Form $form = New-Object System.Windows.Forms.Form
$form.Text = "Q3Rcon Client" $form.Text = "Q3Rcon Client"
$form.Size = New-Object System.Drawing.Size(275, 200) $form.Size = New-Object System.Drawing.Size(275, 200)
@ -20,17 +20,17 @@ Function InitForm {
return $form return $form
} }
Function AddOkButton { Function Add-OkButton {
param($form, $rcon) param($form, $rcon)
$OKB.Location = New-Object System.Drawing.Size(65, 100) $OKB.Location = New-Object System.Drawing.Size(65, 100)
$OKB.Size = New-Object System.Drawing.Size(65, 23) $OKB.Size = New-Object System.Drawing.Size(65, 23)
$OKB.Text = "Send" $OKB.Text = "Send"
$OKB.Add_Click({ SendRconCommand -rcon $rcon }) $OKB.Add_Click({ Send-RconCommand -rcon $rcon })
$form.Controls.Add($OKB) $form.Controls.Add($OKB)
} }
Function AddCloseButton($form) { Function Add-CloseButton($form) {
$CAB.Location = New-Object System.Drawing.Size(140, 100) $CAB.Location = New-Object System.Drawing.Size(140, 100)
$CAB.Size = New-Object System.Drawing.Size(65, 23) $CAB.Size = New-Object System.Drawing.Size(65, 23)
$CAB.Text = "Close" $CAB.Text = "Close"
@ -38,39 +38,40 @@ Function AddCloseButton($form) {
$form.Controls.Add($CAB) $form.Controls.Add($CAB)
} }
Function AddLabel($form) { Function Add-Label($form) {
$Lbl.Location = New-Object System.Drawing.Size(10, 20) $Lbl.Location = New-Object System.Drawing.Size(10, 20)
$Lbl.Size = New-Object System.Drawing.Size(260, 20) $Lbl.Size = New-Object System.Drawing.Size(260, 20)
$Lbl.Text = "Input Rcon Command:" $Lbl.Text = "Input Rcon Command:"
$form.Controls.Add($Lbl) $form.Controls.Add($Lbl)
} }
Function AddTextBox { Function Add-TextBox {
param($form, $rcon) param($form, $rcon)
$OTB.Location = New-Object System.Drawing.Size(10, 50) $OTB.Location = New-Object System.Drawing.Size(10, 50)
$OTB.Size = New-Object System.Drawing.Size(240, 20) $OTB.Size = New-Object System.Drawing.Size(240, 20)
$OTB.Add_KeyDown({ $OTB.Add_KeyDown({
if ($_.KeyCode -eq [System.Windows.Forms.Keys]::Enter) { if ($_.KeyCode -eq [System.Windows.Forms.Keys]::Enter) {
SendRconCommand -rcon $rcon Send-RconCommand -rcon $rcon
} }
}) })
$form.Controls.Add($OTB) $form.Controls.Add($OTB)
} }
Function AddResponseLabel($form) { Function Add-ResponseLabel($form) {
$RLbl.Location = New-Object System.Drawing.Size(10, 75) $RLbl.Location = New-Object System.Drawing.Size(10, 75)
$RLbl.Size = New-Object System.Drawing.Size(260, 20) $RLbl.Size = New-Object System.Drawing.Size(260, 20)
$RLbl.Text = "" $RLbl.Text = ""
$form.Controls.Add($RLbl) $form.Controls.Add($RLbl)
} }
Function FinalizeForm($form) { Function Start-Form($form) {
$form.Topmost = $true $form.Topmost = $true
$form.Add_Shown({ $form.Activate() }) $form.Add_Shown({ $form.Activate() })
[void] $form.ShowDialog()
} }
Function SendRconCommand() { Function Send-RconCommand() {
param($rcon) param($rcon)
$line = $OTB.Text $line = $OTB.Text
@ -102,22 +103,22 @@ Function Get-ConnFromPSD1 {
} }
Function Main { Function Main {
try { BEGIN {
$conn = Get-ConnFromPSD1 $conn = Get-ConnFromPSD1
$rcon = Connect-Rcon -hostname $conn.host -port $conn.port -passwd $conn.passwd $rcon = Connect-Rcon -hostname $conn.host -port $conn.port -passwd $conn.passwd
Write-Host $rcon.base.ToString() -ForegroundColor Green Write-Host $rcon.base.ToString() -ForegroundColor Green
$form = InitForm $form = New-Form
AddOkButton -form $form -rcon $rcon Add-OkButton -form $form -rcon $rcon
AddCloseButton($form) Add-CloseButton($form)
AddLabel($form) Add-Label($form)
AddResponseLabel($form) Add-ResponseLabel($form)
AddTextBox -form $form -rcon $rcon Add-TextBox -form $form -rcon $rcon
FinalizeForm($form)
[void] $form.ShowDialog()
} }
finally { PROCESS {
Start-Form($form)
}
END {
Disconnect-Rcon -rcon $rcon Disconnect-Rcon -rcon $rcon
} }
} }