GCM exsetup |%{$_.Fileversioninfo}

Note the ProductVersion number

Check against Microsoft Exchange version referrence

http://technet.microsoft.com/en-us/library/hh135098.aspx

No related posts.

I plan to do more work on the expressions used and colors for various themes but for now this is pretty good, much better than using the VB Brush as I was before. I used Scite script editor as a rough guide for the color scheme and if your using the default or another light theme the colors should be near identical. One exception is the  Preprocessor and Special Keywords which I just lumped together in the same category since there is only 3 special keywords and a handful of Preprocessor keywords which are as follows.

au3.keywords.preprocessor=#ce #comments-end #comments-start #cs #include #include-once \
#noautoit3execute #notrayicon #onautoitstartregister #requireadmin
au3.keywords.special=#endregion #forceref #region

Another change I made to help lighten up the code and keep the syntax checking fast was to remove the keywords and use regular expressions for Preprocessor, Special, Sendkeys and Macros which means the Highlighter may match some keywords that don’t actually exists if you put an @ symbol before a word or enclose it in {} brackets.

I made 2 different CSS color themes, one for dark and one for light themes. I will copy and paste the instructions from the last Brush I made for installation so excuse me for being lazy.

Screen shots of the before and after, before using VB as language and after using the AutoIT custom Brush.

Syntax Highlighter using VB for AutoIT Code

Syntax Highlighter using AIT for AutoIT Code

I couldn’t find solid instruction on how to install these brushes so I just figured out a way to make it work on my own and I like the way this works so I don’ t plan to change it. First download the shBrushWiring.js file that I have attached to this post.

shBrushAutoIT

Next upload the file to the “/wp-content/plugins/syntaxhighlighter/third-party-brushes/” folder.

Now we need to edit a few files, you can either do this directly in WordPress by going to Plugins and then the editor and choosing the files or you can download them via FTP and edit them in an editor which I think is the better way to go because you will get more predictable results.

First we need to edit the main php file called “syntaxhighlighter.php” it’s located in ”/wp-content/plugins/syntaxhighlighter/”
Find the line that reads ”// Register some popular third-party brushes” and after the last entry add the following line

“wp_register_script( ‘syntaxhighlighter-brush-autoit’, plugins_url(‘syntaxhighlighter/third-party-brushes/shBrushAutoIT.js’), array(‘syntaxhighlighter-core’), ’20120504? );”

Now find the line that reads “// Create list of brush aliases and map them to their real brushes” and at the top of the list before “‘as3′           => ‘as3′,” Add the following lines

‘ait’ => ‘autoit’,
‘AIT’ => ‘autoit’,
‘AutoIT’ => ‘autoit’,
‘Autoit’ => ‘autoit’,
‘autoit’ => ‘autoit’,

Save, Close and upload the file if you downloaded it via FTP

Next we need to go into the “/wp-content/plugins/syntaxhighlighter/syntaxhighlighter3/styles/” folder and edit the file which correlates to the theme you are using or you can edit all of the theme files which I recommend. The files we want to edit are the ones with THEME in the name, i.e. “shThemeDefault.css” At the end of the file we need to add the following lines. These lines control the colors so if you want to edit them you can do that here. If you think a specific word should be in a different category, i.e. function labeled as a keyword, just drop me a comment below and I will fix it.

LIGHT COLORED THEME FILES, i.e. Default Theme

.syntaxhighlighter .aitcomment {
color: #2e7b59 !important;
}
.syntaxhighlighter .aitvariables {
color: #7b1415 !important;
}
.syntaxhighlighter .aitfunctions {
color: #01042f !important;
}
.syntaxhighlighter .aitudfs {
color: #376fac !important;
}
.syntaxhighlighter .aitkeywords {
color: #1f1198 !important;
}
.syntaxhighlighter .aitmacros {
color: #d14ec0 !important;
}
.syntaxhighlighter .aitpreprocessor {
color: #9342a9 !important;
}
.syntaxhighlighter .aitspecial {
color: #6f4090 !important;
}
.syntaxhighlighter .aitsendkeys {
color: #000005 !important;
}

DARK COLORED THEME FILES, i.e. EMacs Theme

.syntaxhighlighter .aitcomment {
color: #00da17 !important;
}
.syntaxhighlighter .aitvariables {
color: #ff0106 !important;
}
.syntaxhighlighter .aitfunctions {
color: #0b25ff !important;
}
.syntaxhighlighter .aitudfs {
color: #0bccff !important;
}
.syntaxhighlighter .aitkeywords {
color: #0b76ff !important;
}
.syntaxhighlighter .aitmacros {
color: #ff49f8 !important;
}
.syntaxhighlighter .aitpreprocessor {
color: #b41fff !important;
}
.syntaxhighlighter .aitspecial {
color: #870fff !important;
}
.syntaxhighlighter .aitsendkeys {
color: #ffffff !important;
}

Save, Close and upload the files if you downloaded them via FTP

That’s it your all done, to use the new code you can use the following example in your post, you must enclose these in brackets and follow them up with /code in brackets [].

code lang=”AutoIT”
code lang=”AIT”

1. AutoIT coming to DavidOrlo.com I love the AutoIT language as it is very easy...

I’m going to work on the colors more and make specific colors for each theme in the future. Check out the before and after pictures, the before is using standard C++ code and the after is using the custom wiring code.

Syntax Highlighter using C++ for Arduino Code

Syntax Highlighter using Wiring for Arduino Code

I couldn’t find solid instruction on how to install these brushes so I just figured out a way to make it work on my own and I like the way this works so I don’ t plan to change it. First download the shBrushWiring.js file that I have attached to this post.

shBrushWiring

Next upload the file to the “/wp-content/plugins/syntaxhighlighter/third-party-brushes/” folder.

Now we need to edit a few files, you can either do this directly in WordPress by going to Plugins and then the editor and choosing the files or you can download them via FTP and edit them in an editor which I think is the better way to go because you will get more predictable results.

First we need to edit the main php file called “syntaxhighlighter.php” it’s located in ”/wp-content/plugins/syntaxhighlighter/”
Find the line that reads  ”// Register some popular third-party brushes” and after the last entry add the following line

“wp_register_script( ‘syntaxhighlighter-brush-wiring’,     plugins_url(‘syntaxhighlighter/third-party-brushes/shBrushWiring.js’),           array(‘syntaxhighlighter-core’), ’20120503′     );”

Now find the line that reads “// Create list of brush aliases and map them to their real brushes” and in between “‘vbnet’         => ‘vb’,” And “‘xml’           => ‘xml’,” Add the following lines

‘arduino’ => ‘wiring’,
‘Arduino’ => ‘wiring’,
‘wiring’ => ‘wiring’,
‘Wiring’ => ‘wiring’,

Save, Close and upload the file if you downloaded it via FTP

Next we need to go into the “/wp-content/plugins/syntaxhighlighter/syntaxhighlighter3/styles/” folder and edit the file which correlates to the theme you are using or you can edit all of the theme files which I recommend. The files we want to edit are the ones with THEME in the name, i.e. “shThemeDefault.css” At the end of the file we need to add the following lines. These lines control the colors so if you want to edit them you can do that here. If you think a specific word should be in a different category, i.e. function labeled as a keyword, just drop me a comment below and I will fix it.

.syntaxhighlighter .wirekeyword {
color: #ff5105 !important;
}
.syntaxhighlighter .wirefunction {
color: #ff5105 !important;
}
.syntaxhighlighter .wirefunctionb {
font-weight: bold !important;
color: #ff5105 !important;
}
.syntaxhighlighter .wirepinmode {
color: #1b79ff !important;
}
.syntaxhighlighter .wirecomment {
color: #8d8d8d !important;
}

Save, Close and upload the files if you downloaded them via FTP

That’s it your all done, to use the new code you can use the following example in your post, you must enclose these in brackets and follow them up with /code in brackets [].

code lang=”Arduino”
code lang=”Wiring”

1. Arduino – GettingStarted ~A Must Read Arduino Duemilanove I have always been into Electrical Engineering and...
2. Arduino Getting Started Pt.1 So your ready to jump into the vastly complex world...
3. Arduino – Advanced LED Blink By now you should have your Arduino and have gone...

Completed project is located at the link below with a self extracting installer

http://ittechtools.net/windows/admin/logflush-intelligent-log-maintenance-application-with-recursive-folder-scanning

The closest Syntax I could find is VB so some of the code isn’t highlighted properly. I am going to work on making my own plugin for AutoIT and Arduino Wiring Language once I have some time.

Source
Main GUI

#cs ----------------------------------------------------------------------------

	App: LogFlush
	By: David Orlo
	www.DavidOrlo.com

	Artistic License 2.0

http://www.perlfoundation.org/artistic_license_2_0

	Creative Commons License
	Attribution Non-Commercial Share Alike (cc by-nc-sa)

http://creativecommons.org/licenses/by-nc-sa/3.0/

#ce ----------------------------------------------------------------------------

#include <StringSize.au3>
#include <GDIPlus.au3>
#include <WinAPI.au3>
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GuiConstantsEx.au3>
#include <FontConstants.au3>
#include <File.au3>
#include <Array.au3>
#include <Date.au3>
#include <Math.au3>

Global $AppName = "LogFlush"
Global $AppVersion = "2.8"
Global $machinename = @ComputerName
Global $time = @HOUR & ":" & @MIN & ":" & @SEC
Global $date = @YEAR & "/" & @MON & "/" & @MDAY

Global Const $AC_SRC_ALPHA = 1
Dim $title[20] = ["Log Flush", _ ;Borrowed this cool little idea from UEZ (Thanks Man You Rock)
		"Version " & $AppVersion, _
		"Flush Your Log Files", _
		"Recursive Folder Scaning", _
		"Log Aging", _
		"Need Help?", _
		"View the ReadME File", _
		"Log Flush", _
		"By: David Orlo", _
		"www.DavidOrlo.com", _
		"Programmed In", _
		"100% Pure AutoIT", _
		"•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*.¸ .. ¥ .. ¸.•*´¯", _
		"•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*.¸ .. ¥ .. ¸.•*´¯", _
		"•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*.¸ .. ¥ .. ¸.•*´¯", _
		"•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*.¸ .. ¥ .. ¸.•*´¯", _
		"•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*.¸ .. ¥ .. ¸.•*´¯", _
		"•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*.¸ .. ¥ .. ¸.•*´¯", _
		"•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*.¸ .. ¥ .. ¸.•*´¯", _
		"•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*.¸ .. ¥ .. ¸.•*´¯"]
Global $c = 0 ;counter for sleep
Global $i = 1 ;for character
Global $j = 0 ;for array
Global $k = UBound($title) - 1
Global $s = 150 ;sleep time
Global $in = True
Global $effect = Random(1, 2, 1)
Global $igui
Global $lfgui
Global $guiimg
Global $time = @HOUR & ":" & @MIN & ":" & @SEC
Global $date = @YEAR & "/" & @MON & "/" & @MDAY
Global $inifile = "includes\LogFlush.ini"

If FileExists("includes\LogFlush.ini") = 0 Then
	createini()
EndIf

$RAppVersion = RegRead("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Options", "AppVersion")
If $RAppVersion <> $AppVersion Then
	createini()
EndIf

Global $startlocation = IniRead($inifile,"Options","Startlocation","C:\inetpub")
Global $filetype = IniRead($inifile,"Options","filetype",".log")
Global $recursion = IniRead($inifile,"Options","recursion",5)
Global $ignorefolders = IniRead($inifile,"Options","ignorefolders","NONE")
Global $usefolders = IniRead($inifile,"Options","usefolders","*")
Global $aging = IniRead($inifile,"Options","aging",15)

_GDIPlus_Startup()
introgui()
Sleep(5000)
maingui()

While 1
	$Msg = GUIGetMsg()
	Display_Info()
	Switch $Msg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Browse
			$var = FileSelectFolder("Choose a folder.", "")
			GUICtrlSetData($InputLoc, $var)
		Case $Save
			writeini()
			$winpos = WinGetPos("","Start Log Location")
			SplashTextOn("LogFlush", "Configuration Saved", 250, 55, $winpos[0] +10, $winpos[1] +180, 1, "", 18)
			Sleep(1500)
			SplashOff()
		Case $Flush
			writeini()
			runflush()
	EndSwitch
WEnd

Func introgui()
	$igui = GUICreate("", 265, 330, -1, -1, $WS_POPUP, $WS_EX_TOPMOST + $WS_EX_LAYERED + $WS_EX_TOOLWINDOW)
	$guiimg = _GDIPlus_ImageLoadFromFile("includes\LogFlush.png")
	SETBITMAP($igui, $guiimg, 255)
	DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $igui, "int", 500, "long", 262160)
	GUISetState(@SW_SHOW, $igui)
EndFunc   ;==>introgui

Func maingui()
	DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $igui, "int", 1000, "long", 0x00090000)
	$lfgui = GUICreate("Log Flush", 266, 379, -1, -1)
	GUISetBkColor(0x3c3c3c)
	GUICtrlCreatePic("includes\LFHeader.jpg", 0, 0, 265, 39, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
	$Group1 = GUICtrlCreateGroup("Start Log Location", 5, 42, 255, 80, BitOR($BS_CENTER, $BS_FLAT))
	DllCall("UxTheme.dll", "int", "SetWindowTheme", "hwnd", GUICtrlGetHandle($Group1), "wstr", 0, "wstr", 0)
	GUICtrlSetColor(-1, 0xFFFFFF)
	Global $InputLoc = GUICtrlCreateInput($startlocation, 10, 61, 245, 21)
	Global $Browse = GUICtrlCreateButton("Browse", 180, 88, 75, 25, $WS_GROUP)
	GUICtrlSetBkColor(-1, 0x07d9ff)
	GUICtrlCreateGroup("", -99, -99, 1, 1)
	$Group2 = GUICtrlCreateGroup("File Types", 5, 124, 255, 50)
	DllCall("UxTheme.dll", "int", "SetWindowTheme", "hwnd", GUICtrlGetHandle($Group2), "wstr", 0, "wstr", 0)
	GUICtrlSetColor(-1, 0xFFFFFF)
	Global $InputType = GUICtrlCreateInput($filetype, 10, 143, 245, 21)
	GUICtrlCreateGroup("", -99, -99, 1, 1)
	$Group4 = GUICtrlCreateGroup("Use Folders", 5, 178, 255, 46)
	DllCall("UxTheme.dll", "int", "SetWindowTheme", "hwnd", GUICtrlGetHandle($Group4), "wstr", 0, "wstr", 0)
	GUICtrlSetColor(-1, 0xFFFFFF)
	Global $InputUse = GUICtrlCreateInput($usefolders, 10, 194, 245, 21)
	GUICtrlCreateGroup("", -99, -99, 1, 1)
	$Group5 = GUICtrlCreateGroup("Ignore Folders", 5, 230, 255, 46)
	DllCall("UxTheme.dll", "int", "SetWindowTheme", "hwnd", GUICtrlGetHandle($Group5), "wstr", 0, "wstr", 0)
	GUICtrlSetColor(-1, 0xFFFFFF)
	Global $InputIgnore = GUICtrlCreateInput($ignorefolders, 10, 248, 245, 21)
	GUICtrlCreateGroup("", -99, -99, 1, 1)
	$Group3 = GUICtrlCreateGroup("Recursion", 5, 279, 125, 48)
	DllCall("UxTheme.dll", "int", "SetWindowTheme", "hwnd", GUICtrlGetHandle($Group3), "wstr", 0, "wstr", 0)
	GUICtrlSetColor(-1, 0xFFFFFF)
	Global $InputRecursion = GUICtrlCreateCombo("", 15, 298, 105, 25)
	GUICtrlSetData(-1, "6|5|4|3|2|1", $recursion)
	GUICtrlCreateGroup("", -99, -99, 1, 1)
	$Group6 = GUICtrlCreateGroup("Aging", 135, 279, 125, 48)
	DllCall("UxTheme.dll", "int", "SetWindowTheme", "hwnd", GUICtrlGetHandle($Group6), "wstr", 0, "wstr", 0)
	GUICtrlSetColor(-1, 0xFFFFFF)
	Global $InputAging = GUICtrlCreateInput($aging, 143, 298, 105, 21)
	GUICtrlCreateGroup("", -99, -99, 1, 1)
	Global $Save = GUICtrlCreateButton("Save", 5, 329, 65, 44, $WS_GROUP)
	GUICtrlSetBkColor(-1, 0x068dff)
	Global $Flush = GUICtrlCreateButton("FLUSH 'EM", 74, 330, 186, 44, $WS_GROUP)
	GUICtrlSetState(-1, $GUI_FOCUS)
	GUICtrlSetBkColor(-1, 0x068dff)
	GUISetState(@SW_SHOW, $lfgui)
EndFunc   ;==>maingui

Func Display_Info()
	Sleep(10)
	If $in Then
		If $i <> StringLen($title[$j]) + 1 Then
			If $effect = 1 Then
				WinSetTitle($lfgui, "", StringLeft($title[$j], $i)) ;effect 1a, 1 by 1
			Else
				WinSetTitle($lfgui, "", StringRight($title[$j], $i)) ;effect 2a, scroll to right
			EndIf
			$i += 1
		Else
			If $c = $s Then
				$i = 1
				$in = False
				$c = 0
				$effect = Random(1, 2, 1)
			Else
				$c += 1
			EndIf
		EndIf
	Else
		If $i <> StringLen($title[$j]) + 1 Then
			If $effect = 1 Then
				WinSetTitle($lfgui, "", StringLeft($title[$j], StringLen($title[$j]) - $i)) ;effect 1b, 1 by 1
			Else
				WinSetTitle($lfgui, "", StringRight($title[$j], StringLen($title[$j]) - $i)) ;effect 2b, scroll to left
			EndIf
			$i += 1
		Else
			$i = 1
			$in = True
			$effect = Random(1, 2, 1)
			If $j = $k Then
				$j = 0
			Else
				$j += 1
			EndIf
		EndIf
	EndIf
EndFunc   ;==>Display_Info

Func writeini()
If RegRead("HKEY_LOCAL_MACHINE\Software\IT3\IT-Tech-Tools","IT Tech Tools") = "" Then
	RegWrite("HKEY_LOCAL_MACHINE\Software\IT3", "IT-Tech-Tools", "REG_SZ", "IT Tech Tools")
EndIf

If RegRead("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush","LF") = "" Then
	RegWrite("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush", "LF", "REG_SZ", "Log Flush")
EndIf
RegWrite("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Options", "startlocation", "REG_SZ", GUICtrlRead($InputLoc))
RegWrite("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Options", "filetype", "REG_SZ", GUICtrlRead($InputType))
RegWrite("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Options", "recursion", "REG_SZ", GUICtrlRead($InputRecursion))
RegWrite("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Options", "ignorefolders", "REG_SZ", GUICtrlRead($InputIgnore))
RegWrite("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Options", "usefolders", "REG_SZ", GUICtrlRead($InputUse))
RegWrite("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Options", "aging", "REG_SZ", GUICtrlRead($InputAging))
RegWrite("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Options", "appversion", "REG_SZ", $AppVersion)

	$inifile = "includes\LogFlush.ini"
	IniWrite($inifile, "options", "startlocation", GUICtrlRead($InputLoc))
	IniWrite($inifile, "options", "filetype", GUICtrlRead($InputType))
	IniWrite($inifile, "options", "recursion", GUICtrlRead($InputRecursion))
	IniWrite($inifile, "options", "ignorefolders", GUICtrlRead($InputIgnore))
	IniWrite($inifile, "options", "usefolders", GUICtrlRead($InputUse))
	IniWrite($inifile, "options", "aging", GUICtrlRead($InputAging))
EndFunc

Func runflush()
$winpos = WinGetPos("","Start Log Location")
SplashTextOn("LogFlush", "Running", 250, 55, $winpos[0] +10, $winpos[1] +180, 1, "", 18)
writeini()
RunWait("LFTask.exe")
$tfoldercount = RegRead("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats","Folders Processed TD")
$tfilecount = RegRead("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats","Files Processed TD")
$foldercount = RegRead("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats", "Folders Processed")
$filecount = RegRead("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats", "Files Processed")
$skippedfolder = RegRead("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats", "Folders Skipped")
$skippedfiletotal = RegRead("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats", "Files Skipped")
$skippedfileage = RegRead("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats", "Skipped Aging")
$skippedfileext = RegRead("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats", "Skipped Extension")
SplashOff()
MsgBox(0, "Log Flush Report", "Machine Name: " & $machinename & @CRLF & _
		"Folders Processed Total: " & $foldercount & @CRLF & _
		"Files Processed Total: " & $filecount & @CRLF & _
		"Folders Skipped Total: " & $skippedfolder & @CRLF & _
		"Files Skipped Total: " & $skippedfiletotal & @CRLF & _
		"Skipped due to Aging: " & $skippedfileage & @CRLF & _
		"Skipped due to Extension: " & $skippedfileext & @CRLF & _
		"----------------------------" & @CRLF & _
		"Folders Processed Lifetime: " & $tfoldercount & @CRLF & _
		"Files Processed Lifetime: " & $tfilecount)
EndFunc

Func createini()
$ANLEN = StringLen ($AppName)
$eo = _MathCheckDiv ($ANLEN,2)
$starcount = (22 - $ANLEN) / 2
$starcount = Round($starcount, 0)
If $eo = 1 Then
	$starcount = $starcount -1
EndIf
If $starcount = 11 Then
$star = "***********"
ElseIf $starcount = 10 Then
$star = "**********"
ElseIf $starcount = 9 Then
$star = "*********"
ElseIf $starcount = 8 Then
$star = "********"
ElseIf $starcount = 7 Then
$star = "*******"
ElseIf $starcount = 6 Then
$star = "******"
ElseIf $starcount = 5 Then
$star = "*****"
ElseIf $starcount = 4 Then
$star = "****"
ElseIf $starcount = 3 Then
$star = "***"
ElseIf $starcount = 2 Then
$star = "**"
ElseIf $starcount = 1 Then
$star = "*"
Else
$star = ""
EndIf

$file = FileOpen($inifile, 2)
FileWrite($file, "¸.•*´¯`*•*´¯`*•.¸ .. ¥ .. ¸.•*´¯`*•*´¯`*•.¸" & @CRLF)
FileWrite($file, $star & " " & $AppName & " " & $AppVersion & " by: David Orlo " & $star & @CRLF)
FileWrite($file, "************ www.DavidOrlo.com ************" & @CRLF)
FileWrite($file, "******* Creative Commons (BY-NC-SA) *******" & @CRLF)
FileWrite($file, "-- Please Read the ReadME File for HELP --" & @CRLF)
FileWrite($file, "¸.•*\_/*•*\_/*•.¸ .. ¥ .. ¸.•*\_/*•*\_/*•.¸" & @CRLF)
FileWrite($file, "" & @CRLF)
FileWrite($file, "[Options]" & @CRLF)
FileWrite($file, "startlocation=C:\inetpub" & @CRLF)
FileWrite($file, "filetype=.log" & @CRLF)
FileWrite($file, "recursion=5" & @CRLF)
FileWrite($file, "ignorefolders=NONE" & @CRLF)
FileWrite($file, "usefolders=*" & @CRLF)
FileWrite($file, "aging=15" & @CRLF)
FileClose($file)
EndFunc

Func _GUICtrlCreateGroup($sText, $iLeft, $iTop, $iWidth, $iHeight, $bColor = 0x000000)
	Local $aLabel[6] = [5]
	Local $aStringSize = _StringSize($sText)
	$aLabel[1] = GUICtrlCreateLabel("", $iLeft + 1, $iTop + 1, 1, $iHeight) ; Left Line.
	$aLabel[2] = GUICtrlCreateLabel("", $iLeft + 1, $iTop + 1, 10, 1) ; Top Left Line.
	GUICtrlCreateLabel(" " & $sText, $iLeft + 7, $iTop - 6, $aStringSize[2] - 3, 15)
	$aLabel[3] = GUICtrlCreateLabel("", $iLeft + $aStringSize[2] + 4, $iTop + 1, $iWidth - $aStringSize[2] - 3, 1) ; Top Right Line.
	$aLabel[4] = GUICtrlCreateLabel("", $iLeft + $iWidth + 1, $iTop + 1, 1, $iHeight) ; Right Line.
	$aLabel[5] = GUICtrlCreateLabel("", $iLeft + 1, $iTop + $iHeight + 1, $iWidth + 1, 1) ; Bottom Line.
	For $i = 1 To $aLabel[0]
		GUICtrlSetBkColor($aLabel[$i], $bColor)
	Next
EndFunc   ;==>_GUICtrlCreateGroup

Func WM_HSCROLL($HWND, $IMSG, $IWPARAM, $ILPARAM)
	SETBITMAP($igui, $guiimg, 255)
EndFunc   ;==>WM_HSCROLL
Func WM_NCHITTEST($HWND, $IMSG, $IWPARAM, $ILPARAM)
	If ($HWND = $igui) And ($IMSG = $WM_NCHITTEST) Then Return $HTCAPTION
EndFunc   ;==>WM_NCHITTEST
Func SETBITMAP($HGUI, $guiimg, $IOPACITY)
	Local $HSCRDC, $HMEMDC, $HBITMAP, $HOLD, $PSIZE, $TSIZE, $PSOURCE, $TSOURCE, $PBLEND, $TBLEND
	$HSCRDC = _WinAPI_GetDC(0)
	$HMEMDC = _WinAPI_CreateCompatibleDC($HSCRDC)
	$HBITMAP = _GDIPlus_BitmapCreateHBITMAPFromBitmap($guiimg)
	$HOLD = _WinAPI_SelectObject($HMEMDC, $HBITMAP)
	$TSIZE = DllStructCreate($TAGSIZE)
	$PSIZE = DllStructGetPtr($TSIZE)
	DllStructSetData($TSIZE, "X", _GDIPlus_ImageGetWidth($guiimg))
	DllStructSetData($TSIZE, "Y", _GDIPlus_ImageGetHeight($guiimg))
	$TSOURCE = DllStructCreate($TAGPOINT)
	$PSOURCE = DllStructGetPtr($TSOURCE)
	$TBLEND = DllStructCreate($TAGBLENDFUNCTION)
	$PBLEND = DllStructGetPtr($TBLEND)
	DllStructSetData($TBLEND, "Alpha", $IOPACITY)
	DllStructSetData($TBLEND, "Format", $AC_SRC_ALPHA)
	_WinAPI_UpdateLayeredWindow($HGUI, $HSCRDC, 0, $PSIZE, $HMEMDC, $PSOURCE, 0, $PBLEND, $ULW_ALPHA)
	_WinAPI_ReleaseDC(0, $HSCRDC)
	_WinAPI_SelectObject($HMEMDC, $HOLD)
	_WinAPI_DeleteObject($HBITMAP)
	_WinAPI_DeleteDC($HMEMDC)
EndFunc   ;==>SETBITMAP

Task Executable

#cs ----------------------------------------------------------------------------

	App: LogFlush
	By: David Orlo
	www.DavidOrlo.com

	Artistic License 2.0

http://www.perlfoundation.org/artistic_license_2_0

	Creative Commons License
	Attribution Non-Commercial Share Alike (cc by-nc-sa)

http://creativecommons.org/licenses/by-nc-sa/3.0/

#ce ----------------------------------------------------------------------------

#include <File.au3>
#include <Array.au3>
#include <Date.au3>

Global $time = @HOUR & ":" & @MIN & ":" & @SEC
Global $date = @YEAR & "/" & @MON & "/" & @MDAY
Global $inifile = "includes\LogFlush.ini"
Global $foldercount = 0
Global $filecount = 0
Global $skippedfolder = 0
Global $skippedfileage = 0
Global $skippedfileext = 0
Global $skippedfiletotal = 0

Global $Level1Folder = IniRead($inifile, "Options", "Startlocation", "C:\inetpub")
Global $filetype = IniRead($inifile, "Options", "filetype", ".log")
Global $recursion = IniRead($inifile, "Options", "recursion", 5)
Global $ignorefolders = IniRead($inifile, "Options", "ignorefolders", "NONE")
Global $usefolders = IniRead($inifile, "Options", "usefolders", "*")
Global $aging = IniRead($inifile, "Options", "aging", 15)

;List Folders on 1
$FoldersOnLevel1 = _FileListToArray($Level1Folder, "*", 2)
If UBound($FoldersOnLevel1, 1) <> 0 And $recursion > 1 Then
	For $r2a = 1 To UBound($FoldersOnLevel1) - 1 Step 1
		$foldercount = $foldercount +1
		$Level2Folder = $FoldersOnLevel1[$r2a]
		$FolderResultU = StringInStr($Level2Folder, $usefolders)
		If $FolderResultU <> 0 Or $usefolders = "*" Then
			$FolderResultI = StringInStr($Level2Folder, $ignorefolders)
			If $FolderResultI = 0 Then
				;List Folders on 2
				$FoldersOnLevel2 = _FileListToArray($Level1Folder & "\" & $Level2Folder, "*", 2)
				If UBound($FoldersOnLevel2, 1) <> 0 And $recursion > 2 Then
					For $r3a = 1 To UBound($FoldersOnLevel2) - 1 Step 1
						$foldercount = $foldercount +1
						$Level3Folder = $FoldersOnLevel2[$r3a]
						$FolderResultU = StringInStr($Level3Folder, $usefolders)
						If $FolderResultU <> 0 Or $usefolders = "*" Then
							$FolderResultI = StringInStr($Level3Folder, $ignorefolders)
							If $FolderResultI = 0 Then
								;List Folders on 3
								$FoldersOnLevel3 = _FileListToArray($Level1Folder & "\" & $Level2Folder & "\" & $Level3Folder, "*", 2)
								If UBound($FoldersOnLevel3, 1) <> 0 And $recursion > 3 Then
									For $r4a = 1 To UBound($FoldersOnLevel3) - 1 Step 1
										$foldercount = $foldercount +1
										$Level4Folder = $FoldersOnLevel3[$r4a]
										$FolderResultU = StringInStr($Level4Folder, $usefolders)
										If $FolderResultU <> 0 Or $usefolders = "*" Then
											$FolderResultI = StringInStr($Level4Folder, $ignorefolders)
											If $FolderResultI = 0 Then
												;List Folders on 4
												$FoldersOnLevel4 = _FileListToArray($Level1Folder & "\" & $Level2Folder & "\" & $Level3Folder & "\" & $Level4Folder, "*", 2)
												If UBound($FoldersOnLevel4, 1) <> 0 And $recursion > 4 Then
													For $r5a = 1 To UBound($FoldersOnLevel4) - 1 Step 1
														$foldercount = $foldercount +1
														$Level5Folder = $FoldersOnLevel4[$r5a]
														$FolderResultU = StringInStr($Level5Folder, $usefolders)
														If $FolderResultU <> 0 Or $usefolders = "*" Then
															$FolderResultI = StringInStr($Level5Folder, $ignorefolders)
															If $FolderResultI = 0 Then
																;List Folders on 5
																$FoldersOnLevel5 = _FileListToArray($Level1Folder & "\" & $Level2Folder & "\" & $Level3Folder & "\" & $Level4Folder & "\" & $Level5Folder, "*", 2)
																If UBound($FoldersOnLevel5, 1) <> 0 And $recursion > 5 Then
																	For $r6a = 1 To UBound($FoldersOnLevel5) - 1 Step 1
																		$foldercount = $foldercount +1
																		$Level6Folder = $FoldersOnLevel5[$r6a]
																		$FolderResultU = StringInStr($Level6Folder, $usefolders)
																		If $FolderResultU <> 0 Or $usefolders = "*" Then
																			$FolderResultI = StringInStr($Level6Folder, $ignorefolders)
																			If $FolderResultI = 0 Then
																				;List Files on 6
																				$FileList6 = _FileListToArray($Level1Folder & "\" & $Level2Folder & "\" & $Level3Folder & "\" & $Level4Folder & "\" & $Level5Folder & "\" & $Level6Folder, "*", 1)
																				For $r6b = 1 To UBound($FileList6) - 1 Step 1
																					$FilesLevel6 = $FileList6[$r6b]
																					$filecount = $filecount + 1
																					$FileResult = StringInStr($FilesLevel6, $filetype)
																					If $FileResult <> 0 Then
																						$filetime = FileGetTime($Level1Folder & "\" & $Level2Folder & "\" & $Level3Folder & "\" & $Level4Folder & "\" & $Level5Folder & "\" & $Level6Folder & "\" & $FilesLevel6)
																						$yyyymd = $filetime[0] & "/" & $filetime[1] & "/" & $filetime[2]
																						$daycount = _DateDiff('D', $yyyymd, $date)
																						If $daycount > $aging Then
																							FileDelete($Level1Folder & "\" & $Level2Folder & "\" & $Level3Folder & "\" & $Level4Folder & "\" & $Level5Folder & "\" & $Level6Folder & "\" & $FilesLevel6)
																						Else
																							$skippedfileage = $skippedfileage + 1
																						EndIf
																					Else
																						$skippedfileext = $skippedfileext + 1
																					EndIf
																				Next
																			Else
																				$skippedfolder = $skippedfolder + 1
																			EndIf
																		Else
																			$skippedfolder = $skippedfolder + 1
																		EndIf
																	Next
																EndIf
																;List Files on 5
																$FileList5 = _FileListToArray($Level1Folder & "\" & $Level2Folder & "\" & $Level3Folder & "\" & $Level4Folder & "\" & $Level5Folder, "*", 1)
																For $r5b = 1 To UBound($FileList5) - 1 Step 1
																	$FilesLevel5 = $FileList5[$r5b]
																	$filecount = $filecount + 1
																	$FileResult = StringInStr($FilesLevel5, $filetype)
																	If $FileResult <> 0 Then
																		$filetime = FileGetTime($Level1Folder & "\" & $Level2Folder & "\" & $Level3Folder & "\" & $Level4Folder & "\" & $Level5Folder & "\" & $FilesLevel5)
																		$yyyymd = $filetime[0] & "/" & $filetime[1] & "/" & $filetime[2]
																		$daycount = _DateDiff('D', $yyyymd, $date)
																		If $daycount > $aging Then
																			FileDelete($Level1Folder & "\" & $Level2Folder & "\" & $Level3Folder & "\" & $Level4Folder & "\" & $Level5Folder & "\" & $FilesLevel5)
																		Else
																			$skippedfileage = $skippedfileage + 1
																		EndIf
																	Else
																		$skippedfileext = $skippedfileext + 1
																	EndIf
																Next
															Else
																$skippedfolder = $skippedfolder + 1
															EndIf
														Else
															$skippedfolder = $skippedfolder + 1
														EndIf
													Next
												EndIf
												;List Files on 4
												$FileList4 = _FileListToArray($Level1Folder & "\" & $Level2Folder & "\" & $Level3Folder & "\" & $Level4Folder, "*", 1)
												For $r4b = 1 To UBound($FileList4) - 1 Step 1
													$FilesLevel4 = $FileList4[$r4b]
													$filecount = $filecount + 1
													$FileResult = StringInStr($FilesLevel4, $filetype)
													If $FileResult <> 0 Then
														$filetime = FileGetTime($Level1Folder & "\" & $Level2Folder & "\" & $Level3Folder & "\" & $Level4Folder & "\" & $FilesLevel4)
														$yyyymd = $filetime[0] & "/" & $filetime[1] & "/" & $filetime[2]
														$daycount = _DateDiff('D', $yyyymd, $date)
														If $daycount > $aging Then
															FileDelete($Level1Folder & "\" & $Level2Folder & "\" & $Level3Folder & "\" & $Level4Folder & "\" & $FilesLevel4)
														Else
															$skippedfileage = $skippedfileage + 1
														EndIf
													Else
														$skippedfileext = $skippedfileext + 1
													EndIf
												Next
											Else
												$skippedfolder = $skippedfolder + 1
											EndIf
										Else
											$skippedfolder = $skippedfolder + 1
										EndIf
									Next
								EndIf
								;List Files on 3
								$FileList3 = _FileListToArray($Level1Folder & "\" & $Level2Folder & "\" & $Level3Folder, "*", 1)
								For $r3b = 1 To UBound($FileList3) - 1 Step 1
									$FilesLevel3 = $FileList3[$r3b]
									$filecount = $filecount + 1
									$FileResult = StringInStr($FilesLevel3, $filetype)
									If $FileResult <> 0 Then
										$filetime = FileGetTime($Level1Folder & "\" & $Level2Folder & "\" & $Level3Folder & "\" & $FilesLevel3)
										$yyyymd = $filetime[0] & "/" & $filetime[1] & "/" & $filetime[2]
										$daycount = _DateDiff('D', $yyyymd, $date)
										If $daycount > $aging Then
											FileDelete($Level1Folder & "\" & $Level2Folder & "\" & $Level3Folder & "\" & $FilesLevel3)
										Else
											$skippedfileage = $skippedfileage + 1
										EndIf
									Else
										$skippedfileext = $skippedfileext + 1
									EndIf
								Next
							Else
								$skippedfolder = $skippedfolder + 1
							EndIf
						Else
							$skippedfolder = $skippedfolder + 1
						EndIf
					Next
				EndIf
				;List Files on 2
				$FileList2 = _FileListToArray($Level1Folder & "\" & $Level2Folder, "*", 1)
				For $r2b = 1 To UBound($FileList2) - 1 Step 1
					$FilesLevel2 = $FileList2[$r2b]
					$filecount = $filecount + 1
					$FileResult = StringInStr($FilesLevel2, $filetype)
					If $FileResult <> 0 Then
						$filetime = FileGetTime($Level1Folder & "\" & $Level2Folder & "\" & $FilesLevel2)
						$yyyymd = $filetime[0] & "/" & $filetime[1] & "/" & $filetime[2]
						$daycount = _DateDiff('D', $yyyymd, $date)
						If $daycount > $aging Then
							FileDelete($Level1Folder & "\" & $Level2Folder & "\" & $FilesLevel2)
						Else
							$skippedfileage = $skippedfileage + 1
						EndIf
					Else
						$skippedfileext = $skippedfileext + 1
					EndIf
				Next
			Else
				$skippedfolder = $skippedfolder + 1
			EndIf
		Else
			$skippedfolder = $skippedfolder + 1
		EndIf
	Next
EndIf
;List Files on 1
$FileList1 = _FileListToArray($Level1Folder, "*", 1)
For $r1b = 1 To UBound($FileList1) - 1 Step 1
	$FilesLevel1 = $FileList1[$r1b]
	$filecount = $filecount + 1
	$FileResult = StringInStr($FilesLevel1, $filetype)
	If $FileResult <> 0 Then
		$filetime = FileGetTime($Level1Folder & "\" & $FilesLevel1)
		$yyyymd = $filetime[0] & "/" & $filetime[1] & "/" & $filetime[2]
		$daycount = _DateDiff('D', $yyyymd, $date)
		If $daycount > $aging Then
			FileDelete($Level1Folder & "\" & $FilesLevel1)
		Else
			$skippedfileage = $skippedfileage + 1
		EndIf
	Else
		$skippedfileext = $skippedfileext + 1
	EndIf
Next

;Output Results
$skippedfiletotal = $skippedfileage + $skippedfileext
If RegRead("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats","Folders Processed TD") = "" Then
	$tfoldercount = $foldercount
	$tfilecount = $filecount
Else
	$tfoldercount = RegRead("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats","Folders Processed TD")
	If $tfoldercount <= $foldercount Then
		$tfoldercount = $foldercount
	EndIf

	$tfilecount = RegRead("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats","Files Processed TD")
	$tfilecount = $tfilecount + $filecount
EndIf

RegWrite("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats", "Folders Processed TD", "REG_SZ", ($tfoldercount))
RegWrite("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats", "Files Processed TD", "REG_SZ", ($tfilecount))
RegWrite("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats", "Folders Processed", "REG_SZ", $foldercount)
RegWrite("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats", "Files Processed", "REG_SZ", $filecount)
RegWrite("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats", "Folders Skipped", "REG_SZ", $skippedfolder)
RegWrite("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats", "Files Skipped", "REG_SZ", $skippedfiletotal)
RegWrite("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats", "Skipped Aging", "REG_SZ", $skippedfileage)
RegWrite("HKEY_LOCAL_MACHINE\Software\IT3\LogFlush\Stats", "Skipped Extension", "REG_SZ", $skippedfileext)

No related posts.

When I got the machine is was pretty beat up as you can see in the picture to the left. It looked like it was left out somewhere damp like a garage because the wood had swelled up slightly in spots. I was able to get it to turn on by simply cleaning some contacts and since then I have started a full blown project by cleaning the machine and all the little spring switch contacts but it still didn’t play well so I ended up ordered some new parts to get it back going again.

I have ordered and installed new flipper bushings and I cleaned the flipper parts but I think they will likely need to be rebuilt. I ran into several problems which I have been able to fix by cleaning contacts such as playfield lights not advancing or score wheels not advancing and the ball eject button not working. Another curious thing I noticed is since this machine has 2 sets of flippers the buttons on the sides have 2 sets of contacts. Why each set of flippers couldn’t share a single contact is beyond me unless it was intended this way. The reason I found this out was because I noticed if I pressed the button in slightly only one flipper would kick while the other would lay dead until depressing the button all the way. I thought if this was a deliberate feature it would be pretty cool for the pro who wanted to show off his skill by only activating the upper flippers when needed but the switch on the right side is opposite activating the upper flipper first which doesn’t make any sense.

I have noticed some coin mech parts missing and some newer wire going to the ball eject button so it is possible that someone re-wired that switch at one time or maybe this feature isn’t deliberate at all. Anyway I haven’t fully decided where I want to go with this thing just yet, My current options are just cleaning it up a bit and making it fully operational again, fully restoring it like new or as new as I can get it by fully ripping it down and rebuilding it, or doing one of the aforementioned items while converting it over to digital using a few Arduinos, one for the playfield and one for the scoreboard and use something like I2C to communicate.

So those are my four options but at this point with other more important things on the table I am leaning towards the simple restore. Some of my driving force towards going digital was the insane amount of switches, relays and banks of relays linked together with mechanical solenoids and linkages. I will upload some pictures of this stuff next post I make but in the meantime just think about making a complex game that has dozens of mini goals and larger goals with rules and score keeping and then think about not being able to use a single piece of silicon to make that happen and voila you got one of these mechanical beasts on your hands.

No related posts.

I have been bookmarking sites for quite some time now and for a while I was stuck on one component and that was the frame. The thing that makes my project different from most others is the desire to use the bigger 540 Can size RC Motors. These are the standard 1/10 Car and Truck electric motors while most other Quads and standard Heli’s use the much smaller 380 size motors. For all I know there called something different now but back when I was heavy into RC cars and trucks everything was brushed motors and brushless where literally just coming onto the scene, this was back in 2002-2003? somewhere around there maybe a little earlier.

I know much more than the average RC fan should know about brushed motors including how to proximate your RPM and torque based on the turns of wire on your armature and then factor in tire size and ring and pinion gear ratios for top speed vs. low end torque. However when it comes to brushless all I know is none of the old school rules apply, but I also know you can get a stock brushless car that hits 60MPH which is something you could only accomplish with an over-sized nitro (.18 instead of .15) in a stadium truck prior to brushless motors.

Well recently I figured out what I would like to attempt a frame out of, I always knew I would use a plastic base, maybe ABS or something and then I will make a mold from modeling clay which I will heat form Acrylic or Polycarbonate to using an oven and heat gun but I couldn’t figure out what to make the 4 shafts out of that would hold the motors or the landing gear. Well the landing gear is still up in the air but not as big of a deal but I have found what to make the 4 main shafts from and its relatively affordable less that fact you need to purchase 10′ of the material.

http://www.usplastic.com/catalog/item.aspx?itemid=23192&catid=561

It’s called Fibragate Dynaform and looks like its tough enough to handle the lift of the motors yet flexible enough that it won’t crack on a rough landing. I was looking at the 1.5″ wide which at 10′ will run me about $50 less tax and shipping. Some things I am still unsure of is which motors to get, what blades do I get? I know I need 2 different types and even more importantly because its the hardest to change is how long do I cut the shafts that will hold the motors? I would assume the longer they are the better stability will be to an extent but I am sure the shorter they are has some advantages as well. I figured I could use several completed projects as my guideline and scale up the designs proportionally and see what users say on how they fly.

Anyway that’s enough rambling here is my long list of must haves and would likes.

Arduino Mega Controlled (its the only language I know well enough to take this on)
Gyroscope, Accelerometer and Magnometer (3 Axis Each to detect exact orientation of the craft)
GPS with Compass (For unmanned flights or setting way points and taking video / photos)
Voltage and Current Sensors (Detection of batteries to know when to come home or emergency land)
Altimeter (So I know when I’m above the trees and telephone lines)
Barometric Pressure Sensor (Additional Altitude sensing)
Infrared Proximity Sensor and / or Ultrasonic Range Finder (Obstacle Avoidance)
FPV Camera with On Screen Display of above (This is for ground control and onboard data collection)
Micro SD Card Reader (Data Logging and Diagnostics)
XBee or other RF (Something to send signals back to ground control)
Ground Control Software (I have found a few open source that look like they will work good)

So as you can see the list of electronics is pretty exhaustive and thinking about connecting it all together is a nightmare. Recently I have been looking into pricing these parts and unless I want to buy surface mount and make my own custom boards it looks like Sparkfun is the only resource for everything on breakout boards but it doesn’t come cheap. Just the first item on my list after the Arduino itself is over $100 which got me looking back into the Ardupilot. As much as I want to build my own setup from scratch I think I am going to be stuck with getting one of these at $200 + the $65 MinimOSD which adds FPV / OSD and GPS.

https://store.diydrones.com/APM_2_0_Kit_p/br-ardupilotmega-03.htm

https://store.diydrones.com/Ardupilot_Mega_Minimal_OSD_p/br-apmminosd.htm

As you can see at $200 I will save over $100 easily on electronics so unless I can find a cheaper route I will have to investigate this further and see if it will truly work for my needs. In the meantime here are some links I have collected along my journey, chances are if your reading this you have already seen some if not all of these but if you just stumbled on this page and are interested in building a Quad yourself then these links may be of interest to you as well.

Arducopter Complete Kit
http://www.rcgroups.com/forums/member.php?u=316305
http://code.google.com/p/arducopter/wiki/ArduCopter?tm=6
http://code.google.com/p/arducopter/wiki/Purchase

Other Quads based on the Arduino
http://www.rcgroups.com/forums/showthread.php?t=1066119

AeroQuad Home Page
http://aeroquad.com/

AeroQuad Arduino Code
http://code.google.com/p/aeroquad/source/browse/#svn/branches/FlightControlMegaV1%3Fstate%3Dclosed

Flight Dynamics Wiki
http://en.wikipedia.org/wiki/Flight_dynamics

DIY Drones, Some GREAT Videos on this site
http://diydrones.com/

A LARGE Quad I found surfing for images on Google
http://www.cam-and-carrier.com/products.html

Cheap FPV Camera
http://www.fpvhobby.com/27-3-grams-cmos-ntsc-camera.html

FPV Servo Controlled Pan Tilt Device
http://www.urbandrones.com/FPV-Camera-Pan-and-Tilt_p_130.html

No related posts.

http://ittechtools.net/

Is the new site, I currently have 1 completed project up for download. I haven’t decided yet weather to keep the source code here or post it there. I would like to keep most of it here and link it back to some AutoIT tutorials since that’s the language its programmed in. Most of the programs listed on the site are 80-90% complete but I just need to polish them up and package them into an installer.

I have some other larger projects I am working on including a simple server / service monitoring tool and a more complex monitoring solution. Comments are welcome on all of the posts so please if you have a suggestion for a current piece of software or an idea for a program just drop me a comment and let me know what you think.

No related posts.

Anyway enough ranting let’s get into the mod. I wanted to keep everything stock looking so I needed a place to put the LED where it wouldn’t stand out or require any serious hacking. Originally I thought the sleep indicator light was the HD Activity light so it seems only natural that would be the perfect place to put the new LED. I wanted to keep the sleep LED so I knew some mods would be needed, one thought was replacing both LED’s with 3mm LED’s or I could use one of my RGB LED’s.

First I started with the hard drive and modded it by soldering a wire to pin 9 and pin 11 on the hard drive. Pin 9 is the 5 Volt Positive lead and pin 11 is the ground trigger, the positive lead is constant while the ground actually triggers the LED on and off. The thing I like about WD Hard drives is the solder points right on the drive which makes this mod much easier to perform. If the computer supplies ground to pin 11 on the hard drive then you must cut that connection, an easy way to do this is simply bend the pin up on the hard drive so you dont void the warranty (although the mod alone voids the warranty). You can see where to solder the wires and the bent pin in the gallery photos below.

You must add a resistor to the LED because the pin 9 on the drive is 5 Volt and the LED requires less voltage than that. You can use any resistor from about 400 ohm to 1k ohm, you can wire it to the positive or the ground. As a side note I highly recommend using one of those cheap 3in1 adapters or plugging the drive into a cheap power supply for testing just in case something goes wrong you will only be out of a drive and not a couple thousand dollars for a laptop too. After I wired up the drive and verified it worked I started looking into the sleep light on the Macbook. Unfortunately I found the sleep LED was positive triggered instead of negative so the RGB LED wouldn’t work and I couldn’t really fit two LED’s in the space needed so I would have to keep the factory LED. This actually wasn’t a problem once I removed the LED from the housing I found it to be very small and very bright, I was able to tape the LED in place just above where the new 3mm LED would be mounted. I drilled a hole for the new LED but did not affix it in place with any glue or tape because it would be fixed to the drive permanently.

I taped the LED wires up on the bottom of the drive so I would have some slack on the wires if needed later and to keep the LED in the relative position I needed. As a side note if you need small wire for a mod like this I found old ethernet cables to be perfect. I dissected an old programming CAT 5 cable from a Baystack unit that worked perfectly, I left the end on the cable to keep the wires in order for later use. After everything was put back together I tested the sleep light and hard drive activity light and both seemed perfect to me. I found the sleep light to be equal in brightness in comparison to before the mod and the new HD light was about as bright as I expected and desired. The light is just bright enough to be noticed but not distracting when your working, even in low light conditions the light isn’t distracting.

All in all I would say the mod was fairly easy but very time consuming because I didn’t have any guide to follow or know exactly how I was going to go about the mod. Everything turned out just as good as I had hoped and as long as your soldering skills are up to par I would say just about anyone could pull of this mod. I hope I included enough photos and later I will go through them and add some additional details to the photos to help describe the contents. I also included 2 short film clips of the sleep and HD activity LED in action so be sure to check those out as well.

Macbook Pro Modded HD Activity LED Video 1

Macbook Pro Modded Sleep LED Video 2

1. Upgrade ZT MS-16362 to 4GB of RAM This is a quick litle guide on upgrading a ZT...
2. Slow Disk to Disk File Transfers (Caching) Recently I ran into an issue that I would like...

I found this great article which details the Dell PERC 5/i, Dell PERC 6/i and goes into detail about reflashing the PERC 5/i with the MegaRAID 8480e firmware, there’s also a host of benchmarks including comparison to an onbaord Intel ICH9R.
http://www.overclock.net/t/359025/perc-5-i-raid-card-tips-and-benchmarks

So whats the catch? A few things actually, #1 and the most important is that you need specific cables to utilize these cards and they are not cheap. The first time around I bought the wrong cables and had to cut them in half and re-solder the wires in the opposite order, see my Article entitled “Dell PERC 5/i doesn’t detect hard drives”. I still haven’t got around to replacing my cables but as far as I know the correct cables are SAS SFF-8484 to 4xSATA  Pass Through NOT Backplane or Crossover.
http://www.dealextreme.com/p/4-in-1-sata-to-scsi-hard-disk-data-cable-1940

If those are no longer available then you might end up spending up to $50 per cable, yes they are expensive but if you can get those for $12 and if you only need to connect 4 or less drives than you are still doing pretty good but your not out of the water yet. We still have a couple more things to buy, If you want to enable Write-Back Cache without modding the card than you will need a backup battery. I bought mine on eBay for $25.00 each but I am sure they can be had elsewhere for less. I originally agreed to spend the $25.00 each because I assumed they would #1 fit perfectly in the Dell PowerEdge 2950 Chassis, and #2 come with the correct connection cable, I was wrong on both accounts. Because of this I would say either spend the money if you are sure it has the correct connection cable or buy the cheapest batter you can find that has been confirmed to work. http://www.ebay.com/itm/1890mAh-7Wh-Battery-DELL-Poweredge-M9602-X8483-PERC5e-PERC5i-IN-USA-/160687843246?pt=LH_DefaultDomain_0&hash=item2569bde7ae#ht_2674wt_905

As you can see from the auction photo the battery does come with a cable but its not the correct one. Even if it was the correct cable it still wouldn’t be long enough for most server applications.

I ended up needing the battery connection cables which ran me $10.00 each, I know isn’t that crazy? But I could only find one seller selling them on eBay and I didn’t really know what else would fit so I just decided to suck it up and buy them since it was the last thing I needed.
http://www.ebay.com/itm/Dell-PERC5-PERC5i-PERC-5i-Battery-Cable-JC881-/360420767070?pt=COMP_EN_Networking_Components&hash=item53eac0755e#ht_2074wt_1396

This auction looks like it has the correct cable and the battery for only $16, with some searching you can find a much better deal than what I got.
http://www.ebay.com/itm/Dell-Perc-5-i-Battery-Backup-Unit-BBU-w-35-40-Charge-BBU-Connector-Cable-/220970833481?pt=COMP_EN_Networking_Components&hash=item3372e35649

So in total I spent $35 for the controller, $25 for two SAS SFF-8484 cables, $25 for the battery and another $10 for the cable, which comes to $95 total. With some bargain shopping I could see you getting this whole setup for as little as $70. This is a huge difference from the $400 that the LSI equivalent card usually fetches and a small price to pay for true hardware RAID with 256MB of onboard memory and a nice Intel IOP333 Processor. So how does it perform? I thought you might ask that, check out the gallery below.

My current drive configuration is as follows (I recently switched to Hitachi’s after the WD price jump)
Hitachi 1TB 60GB Partition 1 / Drive C:
Hitachi 1TB 870GB Partition 2 / Drive D:
Hitachi 2TB x4 5.45TB RAID-5 Drive F:

No related posts.

Windows Drive Cache Options

As you can see my Disk Cache options where correct but something still wasn’t correct. Finally I fired up AMD / ATI RaidXpert and I found my issue, Although all disks had the correct options enabled (Caching & Native Command Queuing NCQ) I found the Raid settings were not setup correctly. I apologize ahead of time now that I no longer use the onboard Raid controller I don’t have the options to configure the controller any longer as well. Therefore I had to scour the web and find the best screen shots I could to help detail the settings.

The first screenshot shows the Windows Disk Caching Options, the second shows the individual drive options within RaidXpert and the third screen shot shows the Raid Controller options for the Array. Obviously not all options are shown but I will explain what is available.

The Disk caching option for each individual drive only tells the controller that the drive is capable of using this advanced feature, it doesn’t actually enable anything. The Raid controller itself has 2 sets of caching options, one for Reads and one for Writes. Read caching is a simple on or off switch while write caching has a few different modes. Write caching is available in Write-Back, Write-Through and a Hybrid mode. I don’t recall the actual term for the Hybrid mode but its usually a mesh of Write-Back and no Caching. Write-Back caching is generally the fastest option however its not recommended unless you have a Raid Controller Backup Battery, even Write-Through Caching is recommended unless you at least have a UPS backup battery for your PC.

With Write-Through cache data is written to both the drive and the cache thus there is a performance hit since the data is being written twice. The performance increase comes in IF the data is required it can then be read from the cache instead of the disk.

Write-Back cache only writes to the cache initially, once the cache is full or the cache is required is the data flushed to the disk. This is why this option is so risky without a backup battery, if you lose power while your data is in cache you will lose all of that data, the amount of data depends on the size of the cache and how much data was in the cache with the power failure occurred.

Hybrid cache differs from vendor to vendor but generally its similar to Write-Back for the performance increase but yet generally utilizes some sort of additional disk flushing to improve reliability.

 For additional reading I recommend checking on the Wiki article on Cache.
http://en.wikipedia.org/wiki/Cache

1. Macbook Pro Unibody Hard Drive Disk Activity Light – MOD Recently I started to run low on space so I...