nate – NateRice.com

Let’s Draw Pictures! / PowerShell Drawing

August 21, 2019August 20, 2019 by nate

I discovered that it’s possible to draw any color character I wanted to the PowerShell console, so that obviously begged the question, can I draw ANY picture to the console? Well it turns out that the answer to that question is yes, I can. So I did: As always, questions and comments are welcome!

'This script is provided under the Creative Commons license located
'at http://creativecommons.org/licenses/by-nc/2.5/ . It may not
'be used for commercial purposes with out the expressed written consent
'of NateRice.com#
# Use by typing: 
# 	.\DrawPicture.ps1 .\picture.png
#
#	.\DrawPicture.ps1 -path C:\full\path\picture.png
#
# Date: 2019-03-12
#

param([String] [parameter(mandatory = $true)] $path)

[void] [System.Reflection.Assembly]::LoadWithPartialName('System.drawing') 
$BitMap = [System.Drawing.Bitmap]::FromFile((Get-Item $path).fullname) 

$ansi_escape = [char]27

Function DrawColor{
	param([decimal]$r, [decimal]$g, [decimal]$b)

	$ansi_command = "$ansi_escape[48;2;{0};{1};{2}m" -f $r, $g, $b
	$text = " "
	$ansi_terminate = "$ansi_escape[0m"
	$out = $ansi_command + $text + $ansi_terminate
	write-host -nonewline $out
}

Foreach($y in (0..($BitMap.Height-1))){ 
	Foreach($x in (0..($BitMap.Width-1))){ 
		$Pixel = $BitMap.GetPixel($X,$Y)         
		DrawColor -r $($Pixel).R -g $($Pixel).G -b $($Pixel).B
	}
	Write-Host ""
}

$BitMap.dispose()

Copyright 2019 naterice.com

Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the following conditions:

The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software.

THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

'This script is provided under the Creative Commons license located

'at http://creativecommons.org/licenses/by-nc/2.5/ . It may not

'be used for commercial purposes with out the expressed written consent

'of NateRice.com#

# Use by typing:

# .\DrawPicture.ps1 .\picture.png

# .\DrawPicture.ps1 -path C:\full\path\picture.png

# Date: 2019-03-12

param([String] [parameter(mandatory = $true)] $path)

[void] [System.Reflection.Assembly]::LoadWithPartialName('System.drawing')

$BitMap = [System.Drawing.Bitmap]::FromFile((Get-Item $path).fullname)

$ansi_escape = [char]27

Function DrawColor{

param([decimal]$r, [decimal]$g, [decimal]$b)

$ansi_command = "$ansi_escape[48;2;{0};{1};{2}m" -f $r, $g, $b

$text = " "

$ansi_terminate = "$ansi_escape[0m"

$out = $ansi_command + $text + $ansi_terminate

write-host -nonewline $out

}

Foreach($y in (0..($BitMap.Height-1))){

Foreach($x in (0..($BitMap.Width-1))){

$Pixel = $BitMap.GetPixel($X,$Y)

DrawColor -r $($Pixel).R -g $($Pixel).G -b $($Pixel).B

}

Write-Host ""

}

$BitMap.dispose()

Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the following conditions:

The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software.

THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

Windows 7 and 7.1 ISO Names and SHA1 Hashes

May 20, 2015May 20, 2015 by nate

I talked about this in a similar article about the Windows 8 and 8.1 ISO’s. You can get those SHA1 hashes and ISO names from my other post here. Also, I realize that the table is clipping but I wanted to make sure all of the information was listed. On more than one occasion I’ve … Read moreWindows 7 and 7.1 ISO Names and SHA1 Hashes

Windows 8 and 8.1 ISO Names and SHA1 Hashes

July 29, 2015April 16, 2015 by nate

On more than one occasion I’ve wanted to know if the Windows ISO I have is legitimate or has been corrupted in some way. The only way to know for sure is to hash the file and compare the hash with a known good hash. Fortunately Microsoft has provided those hashes on it’s MSDN site. … Read moreWindows 8 and 8.1 ISO Names and SHA1 Hashes

Reading, Writing, Deleting and Renaming Registry Keys in VBScript

April 21, 2015April 16, 2015 by nate

Manipulating the registry is one of the most common tasks a Windows system administrator runs into. It can often become a time consuming task. When you have to change a registry setting on hundreds or even thousands of computers, manipulating a particular key or setting can be next to impossible if you had to do … Read moreReading, Writing, Deleting and Renaming Registry Keys in VBScript

VBScript Find and Replace in File Names – fnfindandreplace.vbs

April 15, 2015 by nate

I have found, lately, that updating file names for large numbers of files to be tedious and time consuming. Lots of times I’ll find myself going through hundreds of files changing the underscore character to space, or removing some tag. Finding this really annoying and time consuming, I decided to write and share another script … Read moreVBScript Find and Replace in File Names – fnfindandreplace.vbs

ASP Verify Credentials Against a Domain – IsAuthenticated

April 15, 2015 by nate

A few months ago I ran into a bit of a problem. I was programming a front end for web application, and in that web application I wanted to prompt for the users username and password, and then verify that that user was, in fact, a user in the domain. I then wanted to pull … Read moreASP Verify Credentials Against a Domain – IsAuthenticated

More Really Useful VBScript Array Functions – ArraySort and DoubleArraySort

April 15, 2015 by nate

A while back I wrote an article about VBScript arrays and their various shortcomings entitled “VBScript Array Functions – DeleteFromArray, InArray”. I love these functions because they really simplify the manipulation of arrays and directly address some of the obvious flaws with the initial implementation of arrays in VBScript. At the end of that article, … Read moreMore Really Useful VBScript Array Functions – ArraySort and DoubleArraySort

SQL Server Database Mirroring Limitations and Gotchas

April 15, 2015April 15, 2015 by nate

I have been working pretty extensively with SQL Server Mirroring in Microsoft SQL Server 2005. It seems to work pretty effectively, though setup outside a domain configuration is convoluted to say the least. I have posted in the past about some problems I have had setting it up. My difficulties with the configuration aspect actually … Read moreSQL Server Database Mirroring Limitations and Gotchas

Simple XML Tool Written with VBScript in HTA

April 15, 2015 by nate

I don’t know how many of you out there have had the pleasure of trying to integrate a website into the Google Checkout API but it’s a surprisingly painless process. They have a bunch of sample code that helps to streamline and accelerate the process drastically. Google has this nice control panel where it tells … Read moreSimple XML Tool Written with VBScript in HTA

VBScript Array Functions – DeleteFromArray, InArray

April 15, 2015 by nate

VBScript has a infamously weak implementation of array capabilities. There often comes situations where you’d like to manipulate an array and VBScript just doesn’t have the functionality built in natively. One of the things that I need to do frequently is delete a value from an array. Well to do this you have too loop … Read moreVBScript Array Functions – DeleteFromArray, InArray