Setvirtualresolution(640,480)
SetPrintSize(25)
ResetTimer()
date$=GetCurrentDate()
unix=GetUnixFromDate(Val(Left(date$,4)),Val(Mid(date$,6,2)),Val(Right(date$,2)),0,0,0)
//Add 7 days (in seconds) to the Unix value
secs=7*60*60*24
unix=unix+secs
year=GetYearFromUnix(unix)
month=GetMonthFromUnix(unix)
days=GetDaysFromUnix(unix)
Repeat
Print ("In 7 days the date will be")
Printc ("Year: ")
Print (year)
Printc ("Month: ")
Print (month)
Printc ("Day: ")
Print (days)
Sync()
Until Timer()>15
End
Help make AGK better by submitting an example for this command! (All examples are subject to approval)
Setvirtualresolution(640,480) SetPrintSize(25) ResetTimer() date$=GetCurrentDate() unix=GetUnixFromDate(Val(Left(date$,4)),Val(Mid(date$,6,2)),Val(Right(date$,2)),0,0,0) //Add 7 days (in seconds) to the Unix value secs=7*60*60*24 unix=unix+secs year=GetYearFromUnix(unix) month=GetMonthFromUnix(unix) days=GetDaysFromUnix(unix) Repeat Print ("In 7 days the date will be") Printc ("Year: ") Print (year) Printc ("Month: ") Print (month) Printc ("Day: ") Print (days) Sync() Until Timer()>15 End