PowerShell

A simple tool to encode and decode files using base64 encoding. Works on Windows only, because it is using certutil.exe which is a standard part of Windows 10 installation.

Usage:

input folder - here you should put files which you want to encode

encoded folder - here will all your encoded files appear

decoded folder - this is where all your decoded files will be (script picks files from encoded folder)

pwsh_encode_file_v2.ps1 source:

1. Remove-Item "./encoded/*"

2. Remove-Item "./decoded/*"

3. $files = Get-ChildItem -path "./input/*"

4. ForEach ($file in $files){

5.     $filename = $file.BaseName+$file.Extension

6.     Write-Host "---------------------"

7.     Write-Host "Encoding: "$filename

8.     Write-Host ""

9.     certutil -encode ("./input/"+$filename) ("./encoded/"+$filename+".b64")

10.     Write-Host ($filename+".b64")"file Encoded Successfully!"

11.     Write-Host "---------------------"

12. }

13. Write-Host ""

14. Read-Host "Press enter to exit"

pwsh_decode_file_v2.ps1 source:

1. $files = Get-ChildItem -path "./encoded/*"

2. ForEach ($file in $files){

3.     $filename = $file.BaseName+$file.Extension

4.     Write-Host "---------------------"

5.     Write-Host "Decoding: "$filename

6.     Write-Host ""

7.     certutil -decode ("./encoded/"+$filename) ("./decoded/"+$filename.Substring(0,$filename.Length-4))

8.     Write-Host ($filename)"file decoded Successfully!"

9.     Write-Host "---------------------"

10. }

11. Remove-Item "./encoded/*"

12. Write-Host ""

13. Read-Host "Press enter to exit"

Download 

This is a tool to merge and split PDF files. It uses a PSWritePDF module which needs to be installed first before running the script.

Usage:

Before first run:

Open PowerShell as Admin and then issue the command: Install-Module -Name PSWritePDF

Then: 

1) Prepare files:

Input folder - place pdf file to split or place pdf files to merge (they go in alphabetical order when merged)

Output folder - there will be your result.

2) Run the script via start.bat

start.bat source:

1. powershell.exe -ExecutionPolicy unrestricted -NoExit -command "Start-Process powershell ./pdf-tools.ps1"

pdf-tools.ps1 source:

1. $global:extension_pdf = ".pdf"

2. $global:path_output = $PSScriptRoot.ToString()+"\output\"

3. $global:path_input = $PSScriptRoot.ToString()+"\input\"

4. function menu{

5.     Clear-Host

6.     Write-Host "Welcome to PDF-Tools"

7.     Write-Host ""

8.     Write-Host "Menu:"  

9.     Write-Host "1. Merge PDF files into one"

10.     Write-Host "2. Split PDF files into separate pages"

11.     Write-Host "3. Exit program"

12.     Write-Host ""

13.     $choice = Read-Host "Selection: [1],[2],[3]"

14.     if ($choice -eq 1){

15.         merge

16.     } 

17.     if ($choice -eq 2){

18.         split

19.     }

20.     if ($choice -eq 3){

21.         Exit

22.     }

23.     else {

24.         Write-Host "Error... incorrect input"

25.     }   

26.     Read-Host "Press any key to continue"

27. }

28. function merge{

29.     $files = (Get-ChildItem $path_input -File).FullName

30.     Write-Host ($files -join "`n")

31.     Write-Host "This may take a while... be patient"

32.     $file_name = Get-Random -Minimum 0 -Maximum 100000000

33.     Merge-PDF -InputFile $files -OutputFile "$path_output\$file_name$extension_pdf"

34.     Read-Host "Done. Press any key to leave program"

35.     Exit

36. }

37. function split{

38.     $file_name = Read-Host "Please enter filename (without extension) which you want to be split: "

39.     Write-Host "This may take a while... be patient"

40.     Split-PDF -FilePath "$path_input$file_name$extension_pdf" -OutputFolder "$path_output"

41.     Read-Host "Done. Press any key to leave program"

42.     Exit    

43. }

44. while ($true){

45.     menu

46. }

Download

A simple network interface traffic monitoring tool. Shows how many GB were downloaded/uploaded with a given update threshold. I did not test it on Linux, but I think it will only run on Windows as from what I recall I was not very successful with Get-NetAdapter command on Linux on which this tool is based.

netstat.ps1 source:

1. Get-NetAdapter

2. $ifIndex = Read-Host "Enter ifIndex of network adapter you want to monitor"

3. $interval = Read-Host "Enter interval in seconds between the stats will update"

4. while ($true){

5.     Clear-Host

6.     $ReceivedBytes = Get-NetAdapter -ifIndex $ifIndex | Get-NetAdapterStatistics | select ReceivedBytes

7.     $SentBytes = Get-NetAdapter -ifIndex $ifIndex | Get-NetAdapterStatistics | select SentBytes

8.     $ReceivedBytes = $ReceivedBytes -replace "[^0-9]" , ""

9.     $SentBytes = $SentBytes -replace "[^0-9]" , ""

10.     $ReceivedGBytes = $ReceivedBytes / (1024 * 1024 * 1024)

11.     $SentGBytes = $SentBytes / (1024 * 1024* 1024)

12.     Write-Host "Downloaded "$ReceivedGBytes" GB"

13.     Write-Host "Sent "$SentGBytes" GB"

14.     Start-Sleep -seconds $interval

15. }

Download 

A simple Windows tool to monitor CPU usage and how much RAM is free.

syschk.ps1 source:

1. $interval = Read-Host "Enter interval in seconds between the stats will update"

2. while ($true){

3.     Clear-Host

4.     $cpu_usage = Get-WmiObject Win32_Processor | Measure-Object -Property LoadPercentage -Average | Select Average

5.     $cpu_usage = $cpu_usage -replace "[^0-9]" , ""

6.     $ram_usage = Get-CIMInstance Win32_OperatingSystem | Select FreePhysicalMemory

7.     $ram_usage = $ram_usage -replace "[^0-9]" , ""

8.     Write-Host "CPU usage: "$cpu_usage" %"

9.     Write-Host "RAM free: "$($ram_usage/1000)" MB"

10.     Start-Sleep -seconds $interval

11. }

Download

A simple tool to take a full screen screenshot and save it to file at given interval. The script will stop running at a time user will set in the script or when there is less than 30GB free on drive C: For Windows only.

Usage:

screens folder - this is where all your screenshots will appear

screen.ps1 - main script

screen.ps1 source:

1. Add-Type -AssemblyName System.Windows.Forms

2. Add-Type -AssemblyName System.Drawing

3. $Screen = [System.Windows.Forms.SystemInformation]::VirtualScreen

4. $Width = $Screen.Width

5. $Height = $Screen.Height

6. $Left = $Screen.Left

7. $Top = $Screen.Top

8. $path = $PSScriptRoot.ToString()+"\screens\"

9. $number_taken = 0

10. $interval = 30

11. Clear-Host

12. Write-Host "The script will stop running if there is less that 30GB space left on C drive"

13. Write-Host "It is thus advisable to run this script from anywhere on drive C"

14. Start-Sleep -Seconds 5

15. function Set-Interval($interval_s) {

16.     Read-Host "Please input interval in seconds between screenshots: [integer number]"

17. }

18. $interval = Set-Interval

19. $test = $interval -match '^[0-9]+$'

20. $time_stop = Read-Host "What time should the screenshoter stop working? [yyyyMMdd_HHmmss_fff]"

21. $power_off = Read-Host "Should your computer be turned off afterwards? [Y/N]"

22. if ($test.ToString() -eq "False")

23. {

24.     Write-Host "Interval must be an integer number of seconds"

25.     Start-Sleep -Seconds 2

26. }

27. else 

28. {

29.     do 

30.     {

31.         $file_name = Get-Random -Minimum 0 -Maximum 100000000

32.         $time_stamp = Get-Date -Format "yyyyMMdd_HHmmss_fff"

33.         $time_stamp2 = $time_stamp

34.         $path = $path.ToString()

35.         $file_name = $file_name.ToString()+".png"

36.         $time_stamp = $time_stamp.ToString()+"_"

37.         $file_name = $time_stamp+$file_name

38.         $bitmap  = New-Object System.Drawing.Bitmap $Width, $Height

39.         $graphic = [System.Drawing.Graphics]::FromImage($bitmap)

40.         $graphic.CopyFromScreen($Left, $Top, 0, 0, $bitmap.Size)

41.         $bitmap.Save($path+$file_name)

42.         $file_size = [INT]((Get-Childitem -Path $path$file_name).Length / 1KB)

43.         $number_taken = $number_taken+1

44.         Write-Host "================================================================================"

45.         Write-Host "[$($number_taken.ToString())] Screenshot saved to:"

46.         Write-Host $path$file_name

47.         Write-Host "Filesize: "$file_size" KB"

48.         $free_space = Get-PSDrive C

49.         Write-Host "Free space left on drive C: "($free_space.Free / 1KB).ToString()"KB"

50.         if (($free_space.Free / 1KB) -le 30000000)

51.         {   

52.             Break

53.         }

54.         Write-Host "================================================================================"

55.         Write-Host "Waiting $($interval.ToString()) seconds..."

56.         Start-Sleep -Seconds $interval

57.         Write-Host "Current timestamp: "$time_stamp2.ToString()

58.         Write-Host "Script will run until: "$time_stop.ToString()

59.         if ($power_off -eq "Y") 

60.         {

61.             Write-Host "System will shut down once the target is reached"

62.         }

63.     } while ($time_stamp2 -le $time_stop)

64.     if ($power_off -eq "Y") 

65.     {

66.         Write-Host "System will power down now"

67.         Write-Host "Written "$number_taken.ToString()" screenshots"

68.         Start-Sleep -Seconds 2

69.         Stop-Computer

70.     }

71.     else 

72.     {

73.         Write-Host "Done"

74.         Write-Host "Written "$number_taken.ToString()" screenshots"

75.     }

76. }

Download

Warning this game has many profanities!

This is a very early stage of a text based adventure game with randomly generated rooms. It is easily expandable using plain txt files. So far only room generation and walking around is implemented.

Usage:

data folder - this is where all the words are stored. File structure is self-explanatory so I will not get much deeper into it

poweruserdung.ps1 - main script

poweruserdung.ps1 source:

1. $global:room_size = Get-Content .\data\room_sizes.txt

2. $global:room_shape = Get-Content .\data\room_shapes.txt

3. $global:room_type = Get-Content .\data\room_types.txt

4. $global:room_exits = Get-Content .\data\room_exits.txt

5. $global:room_contents = Get-Content .\data\room_contents.txt

6. $global:room_areas = Get-Content .\data\room_areas.txt

7. $global:room_floors = Get-Content .\data\room_floors.txt

8. $global:room_fragnances = Get-Content .\data\room_fragnances.txt

9. $global:room_walls = Get-Content .\data\room_walls.txt

10. $global:general_adjectives = Get-Content .\data\general_adjectives.txt

11. $global:room_size_count = 0

12. $global:room_shape_count = 0

13. $global:room_type_count = 0

14. $global:room_exits_count = 0

15. $global:room_contents_count = 0

16. $global:room_areas_count = 0

17. $global:room_floors_count = 0

18. $global:room_fragnances_count = 0

19. $global:room_walls_count = 0

20. $global:general_adjectives_count = 0

21. 
    

22. function game_init {

23.     Clear-Host

24.     Write-Host "Loadingu!!!!!1one"

25.     Start-Sleep -Milliseconds 400

26.     foreach ($item in $room_size) {$room_size_count++}

27.     foreach ($item in $room_shape) {$room_shape_count++}

28.     foreach ($item in $room_type) {$room_type_count++}

29.     foreach ($item in $room_exits) {$room_exits_count++}

30.     foreach ($item in $room_contents) {$room_contents_count++}

31.     foreach ($item in $room_areas) {$room_areas_count++}

32.     foreach ($item in $room_floors) {$room_floors_count++}

33.     foreach ($item in $room_fragnances) {$room_fragnances_count++}

34.     foreach ($item in $room_walls) {$room_walls_count++}

35.     foreach ($item in $general_adjectives) {$general_adjectives_count++}

36.     game_menu

37. }

38. function load_game{

39.     Write-Host "Not implemented yet."

40.     Read-Host

41.     game_menu

42. }

43. function scores{

44.     Write-Host "Not implemented yet."

45.     Read-Host

46.     game_menu

47. }

48. function game_menu{

49.     while($true){

50.         Clear-Host

51.         Write-Host "Welcome to PowerUser Dungeon. A random game about tesseract exploration.`n`n"

52.         Write-Host "There are" $room_size_count" different room sizes in the database."

53.         Write-Host "There are" $room_shape_count" different room shapes in the database."

54.         Write-Host "There are" $room_type_count" different room types in the database."

55.         Write-Host "There are" $room_contents_count" different room contents in the database."

56.         Write-Host "There are" $room_areas_count" different room areas in the database."

57.         Write-Host "There are" $room_floors_count" different room floors in the database."

58.         Write-Host "There are" $room_fragnances_count" different room fragnances in the database."

59.         Write-Host "There are" $room_walls_count" different room walls in the database."

60.         Write-Host "There are" $general_adjectives_count" different adjectives in the database."

61.         Write-Host "There are" $room_exits_count" different room exits in the database.`n"

62.         Write-Host "Currently there are"($room_size_count*$room_shape_count*$room_type_count*`

63.         $room_contents_count*$room_areas_count*$room_floors_count*$room_fragnances_count*$room_walls_count`

64.         *$general_adjectives_count*$room_exits_count*$general_adjectives_count)"possible tesseract configurations.`n"

65.         Write-Host "=========Game=Menu=========`n"

66.         Write-Host "1 Start Game"

67.         Write-Host "2 Load Game"

68.         Write-Host "3 Scores"

69.         Write-Host "4 Quit`n"

70.         $selection = Read-Host "Please enter your choice: "

71.         if($selection -eq 1){game_main}

72.         if($selection -eq 2){load_game}

73.         if($selection -eq 3){scores}

74.         if($selection -eq 4){Exit}

75.         else{Write-Host "Wrong selection";Start-Sleep -Seconds 2}

76.     }

77. }

78. function game_main{

79.     while($true){

80.         Clear-Host

81.         $choice="A"

82.         Write-Host "You are standing in a"(Get-Random -InputObject $room_size)`

83.         (Get-Random -InputObject $room_shape)`

84.         (Get-Random -InputObject $room_type)"with"(Get-Random -InputObject $general_adjectives)`

85.         (Get-Random -InputObject $room_walls)"There is"(Get-Random -InputObject $room_contents)`

86.         (Get-Random -InputObject $room_areas)

87.         Write-Host "The floor is made of"(Get-Random -InputObject $general_adjectives)`

88.         (Get-Random -InputObject $room_floors)"The whole area"(Get-Random -InputObject $room_fragnances)       

89.         

90.         $room_ex=(Get-Random -InputObject $room_exits)

91.         Write-Host "`nPossible exit is "$room_ex

92.         $choice = Read-Host "Please input your command: "

93.         if($choice -eq $room_ex){game_main}

94.         else{Write-Host "`nDespite of no obvious way of going the direction you choose, you went"$choice".";

95.              Write-Host "`rMoments later you realized you ended up in a dark void of interspatial nothingness where you gonna spend the rest of your days.";

96.              Read-Host;game_menu}

97.     }

98. }

99. game_init

Download

This is a very early prototype of a game? a simulator? Well, a something that would simulate very early days of how I imagine 80s net could have looked like in some alternative universe.

Usage:

help folder - here is a simple help, accessible from the script as well

pages folder - here are "webpages" they are in TXT form and you can easily add your own content and new pages as well. You do not need to change anything in the code - script will autoupdate its website directory and available commands to access them

read_page.ps1 - main script which you should run

any available commands are explained in script by executing help command

read_page.ps1 source:

1. $global:path = $PSScriptRoot.ToString()+"\pages\"

2. $global:block_filename = "block.txt"

3. 
   

4. function read_page ($page){

5.     $page_name = $page

6.     $lines = Get-Content -Path $global:path$page_name -Raw

7.     $block_char = Get-Content -Path $global:path$global:block_filename -Raw -Encoding utf8

8.     $interpreted = $lines -replace "#", $block_char

9.     Write-Host ""

10.     Write-Host $interpreted

11.     Write-Host ""

12. }

13. 
    

14. function web_directory{

15.     Write-Host "Currently there are following pages available online: "

16.     Write-Host ""

17.     Get-ChildItem $global:path -Exclude $global:block_filename | ForEach-Object -Process {[System.IO.Path]::GetFileNameWithoutExtension($_)} 

18.     Write-Host ""

19. }

20. 
    

21. function browser{

22.     $page = Read-Host "Please enter the webpage name you want to visit: "

23.     $page = $page+".txt"

24.     Write-Host $page

25.     Read-Host "Press any key to continue..."

26.     read_page($page)

27. }

28. 
    

29. function help{

30.     $help_path = $PSScriptRoot.ToString()+"\help\"

31.     $help_txt ="help_site.txt"

32.     $lines = Get-Content -Path $help_path$help_txt -Raw

33.     Write-Host $lines

34.     Write-Host ""

35. }

36. 
    

37. while ($true){

38.     Clear-Host

39.     Write-Host "Welcome to NECOnet v0.5. Available commands are: browser, netdir, help, exit"

40.     Write-Host ""

41.     $command = Read-Host "Command: "

42.     if ($command -eq "browser"){

43.         browser

44.     }

45.     if ($command -eq "help"){

46.         help

47.     }

48.     if ($command -eq "exit"){

49.         Exit

50.     }

51.     if ($command -eq "netdir"){

52.         web_directory

53.     }

54.     Read-Host "Press any key to continue..."

55. }

Download