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

 AutoIt Version: 3.1.1.0
 Author:         tAK Telapis

 Script Function: Grab MegaTokyo Comics
	Template AutoIt script.

NOTES:
	Create the directory c:\MegaTokyo\ before starting this script
	im not sure if it gets auto created. and its neater if it doesnt.
	on the 4th line up from the bottom, $i is matched to a number,
	this number should be set to the number of the most current comic
	as viewable at http://www.megatokyo.com , simple right click the
	current comic, and choose properties. the number is used as part
	of the filename.

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

; Script Start - Add your code below here

; ---------------------------------
; Set main variables here - directory for comics to be saved here, startubg comic number ($i), set file types
; ---------------------------------
$MTFolder = "C:\MegaTokyo\"
$i = 1
$gif = ".gif"
$jpg = ".jpg"

While 1 ; begin the loop
; ---------------------------------
; Set the file name for the comics as 000 is lost in calculations, default to .gif files
; ---------------------------------
$len = StringLen($i)
	If $len = 1 then
		$ComicName = ("000"&$i)
	ElseIf $len = 2 then
		$ComicName = ("00"&$i)
	ElseIf $len = 3 Then
		$ComicName = ("0"&$i)
	EndIf

; ---------------------------------
; Set the URL of the comic wanted, this keeps the InetGet function clean, check if .gif is valid, if not, change to .jpg
; ---------------------------------
$Url = "http://www.megatokyo.com/strips/"
$URLSize = InetGetSize("http://www.megatokyo.com/strips/"&$ComicName&$gif)
	If $URLSize = 0 then
		$ComicName = ($ComicNAme&$jpg)
	Else
		$ComicName = ($ComicName&$gif)
	EndIf

; ---------------------------------
; get the file, and save it to the MTFolder with the calculated ComicName
; ---------------------------------
InetGet ($url&$ComicName, $MTFolder&$ComicNAme)
; Check to see if the file exists
	If $MTFolder&$ComicName = -1 then
		MsgBox(16, "Error", "Failed to get comic # "&$ComicName)
		Exit
	EndIf
; Check to see that the file has size
$Size = FileGetSize($MTFolder&$ComicName)
	If $Size <= 1 then
		MsgBox(16, "File size is null for", $MTFolder&$ComicName" File size was "&$size)
		Exit
	EndIf
; increase the comic number by 1 to get the next comic
$i = $i + 1
If $i == 887 Then
	MsgBox(0, "End of Comics", "there are only 886 comics at the time of this script, happy reading")
	Exit
EndIf
Wend