IT 15 by mario kuum

IT 15 by mario kuum https://padlet.com/mariokuum/skriptit15 Scripts en-us 2017-01-17 06:37:36 UTC 2023-04-05 14:57:37 UTC hello@padlet.com Juhuslikstring https://padlet.com/mariokuum/skriptit15/wish/147451769 # Script: Juhuslikstring

# Date: 11.01.2017

# Author: M. Kuum

# Description: Funktsioon, mis teeb x pikkusega stringi

CLS # Peale uuesti sisestamist ta kustutab vanad ära.

function Gen-RandomString { #Funktsioon, mis genereerib juhusliku tähtede/numbrite rea

param([int]$Length)



$set = "abcdefghijklmnopqrstuwvxyzABCDEFGHIJKLMNOPQRSTUWVXYZ1234567890".ToCharArray()

$result = ""

$setSize = $set.Length

if($Length -gt 1) {

for($i = 0; $i -lt $Length; $i++) {

$nr = Get-Random -Minimum 1 -Maximum $setSize

$result += $set[$nr]

}

return $result

}

return "Length Error!"

}

$string = Gen-RandomString -Length 10

#Write-Host $string

for($i = 0; $i -lt 10; $i++) {

$string = Gen-RandomString -Length 10

Write-Host "$($i+1)." $string

}]]> 2017-01-17 06:41:04 UTC https://padlet.com/mariokuum/skriptit15/wish/147451769 mphtokmh https://padlet.com/mariokuum/skriptit15/wish/147451886 function Convert-MPHtoKMHvv {

param([string]$Unit, [int]$Speed)



if($Unit -eq "MPH") {

#Arvutada KMH

if($Speed -gt 0) {

#Saab arvutada kiirust

$newSpeed = $Speed * 1.609344

Write-Host $Speed "mph on" $newSpeed "kmh"

} else {

Write-Host "Kiirus on puudu"

}

} else {

#Arvutada MPH

#Arvutada MPH

if($Speed -gt 0) {

#Saab arvutada kiirust

$newSpeed = $Speed * 0.621371192

Write-Host $Speed "kmh on" $newSpeed "mph"

} else {

Write-Host "Kiirus on puudu"

}

}



}

Convert-MPHtoKMHvv -Unit "MPH" -Speed 100]]> 2017-01-17 06:42:44 UTC https://padlet.com/mariokuum/skriptit15/wish/147451886 Failiscript https://padlet.com/mariokuum/skriptit15/wish/147451919 $UserName = [environment]::Username
$global:FullPath = "C:\Users\$UserName\Desktop\Temp\"
$global:InsideLog = "A,01012017","A,02012017","A,03012017",
"A,04012017","A,05012017","A,06012017",
"A,01072017","A,08012017","A,09012017",
"V,09012017","A,10012017"

function Create-NewLogFile {
param($HowMany)
#param([int]$HowMany) kui on kasutusel siis võtta int ära

if($HowMany -isnot [int]) {
$HowMany = 50
Write-Host "Failide arv pole number. Muudetud 50ks."
}
if($HowMany -lt 1 -or $HowMany -gt 999) {
$HowMany = 100
Write-Host "Failide arv vales vahemikus. muudeti 100ks."
}

if(!(Test-Path $global:FullPath)) {
New-Item -ItemType directory -Path $global:FullPath | Out-Null
} else {
Remove-Item $global:FullPath"*.*"
}
$k = 0
for($i = 0; $i -lt $HowMany; $i++) {
if($i -lt 10) {
$k = $i
} elseif($i -lt 100) {
if($k -lt $global:InsideLog.Count-1) {
$k++
} else {
$k = 0
}
} else {
if($k -lt $global:InsideLog.Count-1) {
$k++
} else {
$k = 0
}
}
$string = Gen-RandomString -Length (Get-Random -minimum 2 -maximum 21)
$fn = $global:FullPath + $string + ".txt"
Write-Output $global:InsideLog[$k] | Out-File -FilePath $fn
}
Write-Host "Failid tehtud" $HowMany "tükki"
}
function Merge-Files {
param([string]$FileName)
$thisFullPath = $global:FullPath + $FileName
if(Test-Path $thisFullPath) {
Remove-Item $thisFullPath
New-Item -ItemType file -Path $thisFullPath -Force | Out-Null
} else {
New-Item -ItemType file -Path $thisFullPath -Force | Out-Null
}
Get-ChildItem $global:FullPath -Filter *.txt | ForEach-Object {
$content = Get-Content $_.Fullname
Write-Output $content | Out-File -FilePath $ThisFullPath -Append
}
}

function Split-OneFile {
param([string]$FileName)
$FullPathFileName = $global:FullPath + $FileName
if(Test-Path $FullPathFileName) {
$content = Get-Content $FullPathFileName
$counter = 0
for($i = 0; $i -lt $content.Length; $i++) {
if($content[$i].Split(",")[0] -eq "V") {
Write-Host $content[$i].Split(",")
$counter++
}
}
Write-Host "V-ga algavaid on $counter"
} else {
Write-Host "Faili ei leitud" $FullPathFileName
}
#Write-Host "$($content.Length)"
}
function Gen-RandomString { #Funktsioon, mis genereerib juhusliku tähtede/numbrite rea
param([int]$Length)#annab funktsioonile kaasa antud parameetrid
#annab kõik võimalikud tähemärgid
$set = "abcdefghijklmnopqrstuwvxyzABCDEFGHIJKLMNOPQRSTUWVXYZ".ToCharArray()
$result = ""#vastus
$setSize = $set.Length#määrab $set-i lõppu

for($i = 0; $i -lt $Length; $i++) {
$nr = Get-Random -Minimum 1 -Maximum $setSize
$result += $set[$nr]
}
return $result#läheb tagasi vastuse juurde

}

$string = Gen-RandomString -Length (Get-Random -minimum 2 -maximum 21) #genereerib juhusliku stringi pikkusega kümme märki

Create-NewLogFile -HowMany 999
Merge-Files -FileName fail.log
Split-OneFile -Filename fail.log]]> 2017-01-17 06:43:24 UTC https://padlet.com/mariokuum/skriptit15/wish/147451919 skript rockpaperscissors https://padlet.com/mariokuum/skriptit15/wish/147452004 #Script: KiviPaberKaarid

#Date: 11.01.2017

#Author: M. Kuum

#Description: Kivi-Paber-Käärid

CLS

$global:pc = 0

$global:user = 0

$global:viik = 0

function Gen-Number {

return Get-Random -Minimum 1 -Maximum 4

}

function Show-Text {

para([int]$Number)



switch($Number) {

1 {return "Kivi"; break}

2 {return "Paber"; break}

3 {return "Käärid"; break}

default {return "Error"; break}

}

}

function Check-Result {

param([int]$Kasutaja, [int]$pc)

if($Kasutaja -eq $PC) {

Write-Host "Viik"

$global:viik++

} elseif($Kasutaja -eq 1) { # Kivi

if($PC -eq 3) { #Käärid

Write-Host "Sina võitsid"

$global:user++

} else {

Write-Host "Arvuti võitis"

$global:pc++

}

} elseif($Kasutaja -eq 2) { # Paber

if($PC -eq 1) { #Kivi

Write-Host "Sina võitsid"

$global:user++

} else {

Write-Host "Arvuti võitis"

$global:pc++

}

} elseif($Kasutaja -eq 3) { # Käärid

if($PC -eq 1) { #Kivi

Write-Host "Arvuti võitis"

$global:pc++

} else {

Write-Host "Sina võitsid"

$global:user++

}



}

}

function Lets-Play {

param(

[Parameter(mandatory=$true)]

[int]$MituKordaMangida

)

}

Lets-Play -MituKordaMangida 5]]> 2017-01-17 06:44:45 UTC https://padlet.com/mariokuum/skriptit15/wish/147452004 50 000 nime https://padlet.com/mariokuum/skriptit15/wish/147497941 # Script: Nimed
# Date: 17.01.2017
# Author: M.Viirok
# Description: Pagulasfirma 50 000 inimest

$UserName = [environment]::Username
$global:FullPath = "C:\Users\$UserName\Desktop\Nimed\"
$global:InsideLog = "eesnimi;perenimi;sugu;sunniaeg;vanus;kasutajanimi;mail;parool"
$global:newFile = "C:\Users\$UserName\Desktop\Nimed\5000_ready.csv"

function Split-OneFile {
param([string]$FileName)
$FullPathFileName = $global:FullPath + $FileName
if(Test-Path $global:newFile) {
Remove-Item $global:newFile
New-Item -ItemType file -Path $global:newFile -Force | Out-Null
} else {
New-Item -ItemType file -Path $global:newFile -Force | Out-Null
}
Write-OutPut $global:InsideLog | Out-File -FilePath $global:newFile -Append
if(Test-Path $FullPathFileName) {
$content = Get-Content $FullPathFileName
for($i = 0; $i -lt $content.Length; $i++) {
if($i -gt 0) {
$eesnimi = $content[$i].Split(";")[0]
$perenimi = $content[$i].Split(";")[1]
$sugu = $content[$i].Split(";")[2]
$sunniaeg = $content[$i].Split(";")[3]
$aasta = $sunniaeg.Split(".")[2]
$today = (Get-Date).year
$vanus = $today - $aasta
$kasutajanimi = $eesnimi + "_" + $perenimi
$mail = $eesnimi + "." + $perenimi + "@asutus.com"
$Parool = "LammasShaun"
#Write-Host $newline

$newLine = $eesnimi + ";" + $perenimi + ";" + $sugu + ";" + $sunniaeg + ";" + $vanus + ";" + $kasutajanimi + ";" + $mail + ";" + $parool
Write-Output $newLine | Out-File -FilePath $global:newFile -Append

}
}
}
}
Split-OneFile -Filename Nimed.csv
Write-Host "Tehtud"]]> 2017-01-17 11:26:27 UTC https://padlet.com/mariokuum/skriptit15/wish/147497941 Ristküliku/ruuda arvutamine https://padlet.com/mariokuum/skriptit15/wish/148089272 cls
[int]$valik = Read-Host -Prompt "sisesta valik kas 1(pindala) v 2(ümbermõõt)"#küsib sultkas tahad arvurada pindala v ümbermõõdu
if($valik -eq 1){Calc-Pindala
#ütleb kui vastus on üks et läheks pindala arvutama
return #lõpetab
} elseif($valik -eq 2){Calc-Umber #ütleb et läheks arvutama ümbermõõtu kui vastus on 2
return #lõpetab

}

function Calc-Pindala { #arvutab pindala kõigebealt küsides pikkust ja laiust
param(
[Parameter(mandatory=$true)]
[int]$Pindala
)
$x = 0
while($x -lt $Pindala) {

$x++
}
[int]$pikkus = Read-Host -Prompt "sisesta pikkus:"
[int]$laius = Read-Host -Prompt "sisesta laius:"
{

}
Write-Host "Pindala on:" ($pikkus*$laius)
}
Calc-Pindala -Pindala 1

#arvutab ümbermõõdu kõigepealt küsides pikkust ja laiust ning väljastab vastuse
function Calc-Umber {
param(
[Parameter(mandatory=$true)]
[int]$umber
)
$x = 0
while($x -lt $Pindala) {

$x++
}
[int]$pikkus = Read-Host -Prompt "sisesta pikkus:"
[int]$laius = Read-Host -Prompt "sisesta laius:"
{
}
Write-Host "Ümbermõõt on:" ($pikkus*2+$laius*2)
}
Calc-Umber -umber 1

]]> 2017-01-19 14:32:10 UTC https://padlet.com/mariokuum/skriptit15/wish/148089272 installitud programmid https://padlet.com/mariokuum/skriptit15/wish/148282787

Get-ItemProperty HKLM:\Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\* | Select-Object DisplayName, DisplayVersion, Publisher, InstallDate | Format-Table –AutoSize > C:\Users\Kasutaja\Documents\InstalledtPrograms-PS.txt]]> 2017-01-20 07:05:36 UTC https://padlet.com/mariokuum/skriptit15/wish/148282787 FailidArvutist https://padlet.com/mariokuum/skriptit15/wish/148304064 CLS
function show-installedsoftware {
param([Parameter(mandatory=$true)]
[ValidateSet("Full", "Search")]
[string]$Action,

[string]$Phrase
)
$regKey = "HKLM:\software\Wow6432Node\Microsoft\windows\CurrentVersion\Uninstall\*"

if($Action -eq "Full") {
Get-ItemProperty $regKey | Select-Object DisplayName |
Where-Object { $_.DisplayName -ne $null} |
Sort-Object DisplayName
} else {
if($Phrase -ne "") {
Get-ItemProperty $regKey |
ForEach-Object {Get-ItemProperty $_.PSPath} |
Select-Object DisplayName |
Sort-Object DisplayName
} else {
Write-Host "Otsingu fraas on puudu"
}
}

}
show-installedsoftware]]> 2017-01-20 09:28:25 UTC https://padlet.com/mariokuum/skriptit15/wish/148304064 https://padlet.com/mariokuum/skriptit15/wish/252514268 2018-04-17 11:38:17 UTC https://padlet.com/mariokuum/skriptit15/wish/252514268 https://padlet.com/mariokuum/skriptit15/wish/252514486 2018-04-17 11:39:07 UTC https://padlet.com/mariokuum/skriptit15/wish/252514486 https://padlet.com/mariokuum/skriptit15/wish/252903616 2018-04-18 09:18:33 UTC https://padlet.com/mariokuum/skriptit15/wish/252903616 https://padlet.com/mariokuum/skriptit15/wish/252903784 2018-04-18 09:18:44 UTC https://padlet.com/mariokuum/skriptit15/wish/252903784 https://padlet.com/mariokuum/skriptit15/wish/252903950 2018-04-18 09:18:54 UTC https://padlet.com/mariokuum/skriptit15/wish/252903950 https://pauliggroup.sharepoint.com/sites/projects2/PG_EST_HUB_STICKERING/STICKERS%20BALTIC/Forms/AllItems.aspx?viewpath=%2Fsites%2Fprojects2%2FPG%5FEST%5FHUB%5FSTICKERING%2FSTICKERS%20BALTIC%2FForms%2FAllItems%2Easpx&id=%2Fsites%2Fprojects2%2FPG%5FEST%5FHUB%5FSTICKERING%2FSTICKERS%20BALTIC%2FWORK%20INSTRUCTIONS https://padlet.com/mariokuum/skriptit15/wish/351585719 2019-04-15 08:15:34 UTC https://padlet.com/mariokuum/skriptit15/wish/351585719