Episode #173: Tis the Season

Hal finds some cheer From somewhere near the borders of scriptistan, we send you:function t { for ((i=0; $i < $1; i++)); do s=$((8-$i)); e=$((8+$i)); for ((j=0; j <= $e; j++)); do [ $j -ge $s ] && echo -n ‘^’ || echo -n …

Hal finds some cheer
From somewhere near the borders of scriptistan, we send you:

function t { 
    for ((i=0; $i < $1; i++)); do
        s=$((8-$i)); e=$((8+$i));
        for ((j=0; j <= $e; j++)); do [ $j -ge $s ] && echo -n '^' || echo -n ' '; done;
        echo;
    done
}
function T {
    for ((i=0; $i < $1; i++)); do
        for ((j=0; j < 10; j++)); do [ $j -ge 7 ] && echo -n '|' || echo -n ' '; done;
        echo;
    done
    echo
}
t 3; t 5; t 7; T 2; echo -e "Season's Greetings\n    from CLKF"



Ed comes in out of the cold:


Gosh, I missed you guys.  It’s nice to be home with my CLKF family for the holidays.  I brought you a present:


c:\>cmd.exe /v:on /c "echo. & echo A Christmas present for you: & color 24 & 
echo. & echo     0x0& for /L %a in (1,1,11) do @(for /L %b in (1,1,10) do @ set /a
%b%2) & echo 1"& echo. & echo Merry Christmas!


 
Tim awaits the new year:


Happy New Year from within the borders of Scriptistan!



Function Draw-Circle {
    Param( $Radius, $XCenter, $YCenter )
    
    for ($x = -$Radius; $x -le $Radius ; $x++) {
        $y = [int]([math]::sqrt($Radius * $Radius - $x * $x))
        Set-CursorLocation -X ($XCenter + $x) -Y ($YCenter + $y)
        Write-Host "*" -ForegroundColor Blue -NoNewline
        Set-CursorLocation -X ($XCenter + $x) -Y ($YCenter - $y)
        Write-Host "*" -ForegroundColor Blue -NoNewline
    }
}

Function Draw-Hat {
    Param( $XCenter, $YTop, $Height, $Width, $BrimWidth )
    
    $left = Round($XCenter - ($Width / 2))
    $row = "#" * $Width
    for ($y = $YTop; $y -lt $YTop + $Height - 1; $y++) {
        Set-CursorLocation -X $left -Y $y
        Write-Host $row -ForegroundColor Black -NoNewline
    }
    
    Set-CursorLocation -X ($left - $BrimWidth) -Y ($YTop + $Height - 1)
    $row = "#" * ($Width + 2 * $BrimWidth)
    Write-Host $row -ForegroundColor Black -NoNewline
}

Function Set-CursorLocation {
    Param ( $x, $y )

    $pos = $Host.UI.RawUI.CursorPosition
    $pos.X = $x
    $pos.Y = $y
    $Host.UI.RawUI.CursorPosition = $pos
}

Function Round {
    Param ( $int )
    # Stupid banker's rounding
    return [Math]::Round( $int, [MidpointRounding]'AwayFromZero' )
}

Clear-Host
Write-Host "Happy New Year!"
Draw-Circle -Radius 4 -XCenter 10 -YCenter 8
Draw-Circle -Radius 5 -XCenter 10 -YCenter 17
Draw-Circle -Radius 7 -XCenter 10 -YCenter 29
Draw-Hat -XCenter 10 -YTop 2 -Height 5 -Width 7 -BrimWidth 2
Set-CursorLocation -X 0 -Y 38

			
			

			
			
			

Print
				
				Share
		
				
				Comment
				
				
				Cite
		
		Upload
				
					Translate
				

			


  

    
	



		
			
		
	
		
			
		
			

		
		
		
	 
			


		


    
				
	
			


				
			

			
	
	 

			
				
			
		


    
				
	APA
 ()  » Episode #173: Tis the Season. Retrieved from https://www.truth.cx/2013/12/31/episode-173-tis-the-season/.

MLA
" » Episode #173: Tis the Season."  - , https://www.truth.cx/2013/12/31/episode-173-tis-the-season/

HARVARD
   » Episode #173: Tis the Season., viewed ,

VANCOUVER
 -  » Episode #173: Tis the Season. [Internet]. [Accessed ]. Available from: https://www.truth.cx/2013/12/31/episode-173-tis-the-season/

CHICAGO
" » Episode #173: Tis the Season."  - Accessed . https://www.truth.cx/2013/12/31/episode-173-tis-the-season/

IEEE
" » Episode #173: Tis the Season."  [Online]. Available: https://www.truth.cx/2013/12/31/episode-173-tis-the-season/. [Accessed: ]

				
	 

				
				


    
				
				
	 

	
				
				
				
				
				
						


    
		
		

		
		Select a language: 

		
			
							
			 
  

  

  

  


  

 	
				
			
			
			
	 

	
				
				

				
				
				
				
				
		


		

		
				

				

		
	




		


			
Related Posts