#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.6.1
 Author:         tobi_girst@autoit.de

 Script Function:
	laedt die letzte news of the world von der offiziellen seite herunter
	 ~ Standardausgabe (finalissue)
	 ~ Schottische Ausgabe (scotfinal)
	 ~ Herasnehmbares "Souvenier" (FINAL)

#ce ----------------------------------------------------------------------------

_get ("finalissue", 68)
_get ("FINAL", 47)
_get ("scotfinal", 73)
MsgBox (64, "Fertig!", "Download abgeschlossen!")
Func _get ($zid, $cnt)
	$i = 1
	If DirGetSize (@scriptdir & "\News of the World") Then DirCreate (@scriptdir & "\News of the World")
	If DirGetSize (@scriptdir & "\News of the World\" & $zid) Then DirCreate (@scriptdir & "\News of the World\" & $zid)
;~ 	If DirGetSize (@scriptdir & "\News of the World\" & $zid & "\small") Then DirCreate (@scriptdir & "\News of the World\" & $zid & "\small")
;~ 	If DirGetSize (@scriptdir & "\News of the World\" & $zid & "\medium") Then DirCreate (@scriptdir & "\News of the World\" & $zid & "\medium")
	If DirGetSize (@scriptdir & "\News of the World\" & $zid & "\large") Then DirCreate (@scriptdir & "\News of the World\" & $zid & "\large")
	Do
;~ 		InetGet ("http://www.newsoftheworld.co.uk/downloads/" & $zid & "/small/" & $i & ".jpg", @scriptdir & "\News of the World\" & $zid & "\small\" & $i & ".jpg")
;~ 		InetGet ("http://www.newsoftheworld.co.uk/downloads/" & $zid & "/medium/" & $i & ".jpg", @scriptdir & "\News of the World\" & $zid & "\medium\" & $i & ".jpg")
		InetGet ("http://www.newsoftheworld.co.uk/downloads/" & $zid & "/large/" & $i & ".jpg", @scriptdir & "\News of the World\" & $zid & "\large\" & $i & ".jpg")
		$i += 1
	Until $i = $cnt+1
EndFunc
