hannes08 39 Posted April 1, 2011 (edited) #Include <Date.au3> For $i = 2011 To 2099 For $j = 1 To 12 If _DateToDayOfWeek($i, $j, 13) = 6 Then ConsoleWrite(13 & "." & $j & "." & $i & @CRLF) EndIf Next Next 5 Minutes of distraction on a friday afternoon. Edited April 1, 2011 by Hannes123 Regards,Hannes[spoiler]If you can't convince them, confuse them![/spoiler] Share this post Link to post Share on other sites