Tom's Guide | Tom's Hardware | Tom's Games
 |
 |
 |
Name: Judago
[edit]Please forgive my horrendous spelling.[/edit]
I wrote this for a little project for the pc at work and thought
someone might get a laugh out of it.I'm not really allowed to install anything (so it's batch or vbs)
and getting better at vbs is still "to do" for me, is there a nice
way to display something like this using vbs that's pretty
easy? I ask this because I'm considering re-writing it
vbs instead, but my skills are so-so.
@ECHO OFF :: Xp batch for generating calendars :: Chances look good for win 2000 and above(untested) :: By Judago, may 2009 IF "%~1"=="/?" ( ECHO START "%~NX0" WITHOUT ARGUMENTS AND THEN ENTER THE YEAR. ECHO "%~NX0" WILL OPEN IN IT'S OWN WINDOW TO AVOID RESIZING ECHO AN EXISTING WINDOW. ECHO. ECHO A SCREEN RESOLUTION AND/OR FONT SIZE THAT CAN DISPLAY ECHO CMD WINDOWS OF 96 COLUMNS AND 39 LINES IS REQUIRED. ECHO SOME CONFIGURATIONS MAY USE SCROLL BARS TO ACHIEVE ECHO THIS. EXIT /B ) :: The title can be used to falicitate custom window :: positioning via the properties menu of "calendars..." :: /max is used so as much content as possible is visable :: without moving the window. IF NOT "%~1 %~2"=="WINDOW SIZE" ( START "CALENDARS..." /MAX CMD /C "%~F0" WINDOW SIZE EXIT /B ) MODE CON:COLS=96 LINES=39 SETLOCAL ENABLEDELAYEDEXPANSION :loop FOR %%Z IN (jan feb mar apr may jun jul aug sep oct nov dec year day leap noleap length test) DO SET %%Z= SET /P year=Enter a year to see it's calendar, or nothing to exit, then press enter: IF NOT DEFINED year EXIT /B ::Test that the input is only numbers... SET test=!year! FOR /l %%Z IN (0 1 9) DO IF DEFINED test SET "test=!test:%%Z=!" IF DEFINED test CLS&GOTO loop :zero IF NOT DEFINED year ( :error cls echo The year entered can not be accepted. echo. pause CLS GOTO loop ) :: remove leading zeros, if any... IF "%year:~0,1%"=="0" SET year=%year:~1%&&GOTO zero :: The %processor_architecture% test is used to test :: limits of caculations, if the variable is undefined :: or unrecognised the test will fall through and complete :: anyway, if the limit is surpassed this way the results may :: not be valid. The tested number is ~80% of the limit of the :: os so that year + year / 4 yields a valid result. IF /I "!processor_architecture!"=="x86" ( IF !year! gtr 1717986917 GOTO :error ) else ( IF NOT "!processor_architecture:64=!"=="!processor_architecture!" ( IF !year! gtr 7378697629483820645 GOTO :error ) ) :: Generate the first day of the year, 0=sun, 1=mon,...,6=sat :: A 365 day year ofsets by one day, so the next year will start :: the next day (i.e. 2009 starts on thr and 2010 starts on fri) :: an extra day must be added for every leapyear. Using modulo :: 7 on the total of offset days reviels the starting day of the :: year. one day must also be removed if the year is a leap year :: because the below will add one for it, the remainder for non :: leap years is not an issue because set /a only returns whole :: numbers. SET /A day=((year + year / 4) - (year / 100 - year / 400)) %% 7 SET /A leap=year %% 400 SET /A noleap=year %% 100 IF !leap! gtr 0 ( IF !noleap! neq 0 SET /A leap=year %% 4 ) IF %leap%==0 SET /A day-=1 :: For each year every month is padded to is starting offset :: with spaces, january has the original offset generated above. :: each additional offset is generated by adding the total days of :: the previous month then processing it by modulo 7. :: The days are stored in a varianle to display later, these variables :: are padded to 111 characters using spaces for display purposes. FOR %%U IN (jan feb mar apr may jun jul aug sep oct nov dec) DO ( FOR %%V IN (jan mar may jul aug oct dec) DO IF /I %%U==%%V SET length=31 FOR %%W IN (apr jun sep nov) DO IF /I %%U==%%W SET length=30 IF /I %%U==feb ( IF !leap!==0 ( SET length=29 ) else ( SET length=28 ) ) FOR /l %%X IN (1 1 !day!) DO SET "%%U=!%%U! " FOR /l %%Y IN (1 1 !length!) DO ( IF %%Y lss 10 ( SET "%%U=!%%U!%%Y " ) else ( SET "%%U=!%%U!%%Y " ) ) FOR /l %%Z IN (!length! 1 54) DO IF "!%%U:~110!"=="" SET "%%U=!%%U! " SET /A day=^(day + length^) %% 7 ) :test :: The results are displayed below using substrings of each month's variable. cls TITLE THE CALENDAR FOR THE YEAR OF %YEAR% echo. ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ echo. ³ JANUARY ³ ³ FEBUARY ³ ³ MARCH ³ ³ APRIL ³ echo. ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ echo. ³S M T W T F S ³ ³S M T W T F S ³ ³S M T W T F S ³ ³S M T W T F S ³ echo. ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ echo. ³%JAN:~0,20%³ ³%FEB:~0,20%³ ³%MAR:~0,20%³ ³%APR:~0,20%³ echo. ³%JAN:~21,20%³ ³%FEB:~21,20%³ ³%MAR:~21,20%³ ³%APR:~21,20%³ echo. ³%JAN:~42,20%³ ³%FEB:~42,20%³ ³%MAR:~42,20%³ ³%APR:~42,20%³ echo. ³%JAN:~63,20%³ ³%FEB:~63,20%³ ³%MAR:~63,20%³ ³%APR:~63,20%³ echo. ³%JAN:~84,20%³ ³%FEB:~84,20%³ ³%MAR:~84,20%³ ³%APR:~84,20%³ echo. ³%JAN:~105% ³ ³%FEB:~105% ³ ³%MAR:~105% ³ ³%APR:~105% ³ echo. ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ echo. echo. ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ echo. ³ MAY ³ ³ JUNE ³ ³ JULY ³ ³ AUGUST ³ echo. ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ echo. ³S M T W T F S ³ ³S M T W T F S ³ ³S M T W T F S ³ ³S M T W T F S ³ echo. ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ echo. ³%MAY:~0,20%³ ³%JUN:~0,20%³ ³%JUL:~0,20%³ ³%AUG:~0,20%³ echo. ³%MAY:~21,20%³ ³%JUN:~21,20%³ ³%JUL:~21,20%³ ³%AUG:~21,20%³ echo. ³%MAY:~42,20%³ ³%JUN:~42,20%³ ³%JUL:~42,20%³ ³%AUG:~42,20%³ echo. ³%MAY:~63,20%³ ³%JUN:~63,20%³ ³%JUL:~63,20%³ ³%AUG:~63,20%³ echo. ³%MAY:~84,20%³ ³%JUN:~84,20%³ ³%JUL:~84,20%³ ³%AUG:~84,20%³ echo. ³%MAY:~105% ³ ³%JUN:~105% ³ ³%JUL:~105% ³ ³%AUG:~105% ³ echo. ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ echo. echo. ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ echo. ³ SEPTEMBER ³ ³ OCTOBER ³ ³ NOVEMBER ³ ³ DECEMBER ³ echo. ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ echo. ³S M T W T F S ³ ³S M T W T F S ³ ³S M T W T F S ³ ³S M T W T F S ³ echo. ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ echo. ³%SEP:~0,20%³ ³%OCT:~0,20%³ ³%NOV:~0,20%³ ³%DEC:~0,20%³ echo. ³%SEP:~21,20%³ ³%OCT:~21,20%³ ³%NOV:~21,20%³ ³%DEC:~21,20%³ echo. ³%SEP:~42,20%³ ³%OCT:~42,20%³ ³%NOV:~42,20%³ ³%DEC:~42,20%³ echo. ³%SEP:~63,20%³ ³%OCT:~63,20%³ ³%NOV:~63,20%³ ³%DEC:~63,20%³ echo. ³%SEP:~84,20%³ ³%OCT:~84,20%³ ³%NOV:~84,20%³ ³%DEC:~84,20%³ echo. ³%SEP:~105% ³ ³%OCT:~105% ³ ³%NOV:~105% ³ ³%DEC:~105% ³ echo. ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ GOTO loop
very nice batch calendar. how do you display that line in ascii? haven't seen it in a long time since the day of word processor in DOS, in DOS, it used to be pressing ALT-xxxx to get ascii character.
judago, for vbscript, you could try hta, it will give visual GUI,
first googling result in this sample code that use activex
http://community.scriptingprovip.co...
or if you insist in doing it in pure vbscript, vbs provides a few good methods for date manipulation.
0 
Yeah, an HTA with an ActiveX MSCAL.Calendar would be the way I'd do it, but the method is apparently dependent on having MS Office installed.
0
i didn't realize that, try the script from google and it works. the code is only few lines, but too bad it's dependent on ms office.
i don't know any other way except doing it manually. =p
0
Thanks for the replys, unfortunately ms office is a killer because some of the pc's don't have it (nor does my home pc so testing would be hard). I did try the scripts but they wouldn't work for me only showing a button that didn't do anything after allowing the activex.
I had also thought of using html, but would rather steer clear if possible, but that did give me a good idea if it's the only way to go....
I think I've got the logic right I just need a way to display the results, I was thinking a giant dialog box or something, the details I can google up and put together myself(learn better that way).
My searches were fruitless so if anyone know of a nice way(or if there isn't besides html) to display something like this I'll be happy to hear it. The only reason I'm looking for an alternative is that 99 cols and 39 lines is a bit much for 1024x768.
Reno, I believe the characters are still the same as they were but display differently, they can be picked the character map(run>charmap) on xp via arial font and character set of dos:untied states. There is probably a better way but to "ansifiy" them I simply copied them from the character map into a cmd window and echo'd them into a file, and built list I can copy from, with descriptions for when I need them as the show up as accented characters.
0
Maybe you can get away with using something like Rainlendar; just copy its program folder to a removable drive and you're good to go.
0
I guess it's probably either a dialog box or html then? I expected as much...
It's basically just for a little reference for when we need to quickly have to look at a calender for other years or just to see what days line up dates, it will only be used once or twice a month. my batch works well enough for that so I might just stick to it for now...
I had a quick look at Rainlendar, it's nice but it I'm really after something very simple, a point-and-shoot sort of thing, so I don't have to explain it over and again, then eventually give up and delete it. The whole thing is basically a nicety I'm adding to a quick and dirty script that handles customer address label along with specific scheduled tasks.
I'm sure I sound very much like a fussy cat, but at least I'm not asking anyone to write it for me ;).
0
Reno this may save you the work if you haven't already got
something, I find it helps use the type command on it so I
can see what the characters are, but still need to copy them
from the text document...I'm using codepage 850, I assume using a different code
page(non english) would change the results:The phrasing isn't the best but it wasn't intended for
anyone besides myself....***************************************************** ***************DISPLAY CHARACTERS******************** ***************************************************** SINGLE BAR: Ä - Horizontial single bar. Á - Horizontial single bar with upward connector. Â - Horizontial single bar with downward connector. ³ - Vertical single bar. ´ - Vertical single bar with leftward connector. Ã - Vertical single bar with rightward connector. Å - Intersection, single bar. Ú - Top left corner, single bar. ¿ - Top right corner, single bar. À - Bottom left corner, single bar. Ù - Bottom right corner, single bar. DOUBLE BAR: Í - Horizontial double bar. Ê - Horizontial double bar with upward connector. Ë - Horizontial double bar with downward connector. º - Vertical double bar. ¹ - Vertical double bar with leftward connector. Ì - Vertical double bar with rightward connector. Î - Intersection, double bar. É - Top left corner, double bar. » - Top right corner, double bar. È - Bottom left corner, double bar. ¼ - Bottom Right corner, double bar. JOINT BARS µ - Single vertical bar to horizontal double bar on the left. · - Top right corner from horizontal single bar to vertical double bar. ¸ - Top right corner from horizontal double bar to vertical single bar. ¾ - Bottom right corner from horizontal double bar to vertical single bar. Æ - Single vertical bar to horizontal double bar on the right. Ñ - Double horizontal bar to downwards single bar. Ï - Double horizontal bar to upwards single bar. Ð - Single horizontal bar to to upwards double bar. Ô - Bottom left corner from horizontal double bar to vertical single bar. Õ - Top left corner from horizontal double bar to vertical single bar. Ö - Top left corner from horizontal single bar to vertical double bar. Ø - Horizontal Double bar to vertical single bar intersection ½ - Bottom right corner from horizontal single bar to vertical double bar. Ó - Bottom left corner from horizontal single bar to vertical double bar. × - Horizontal single bar to vertical double bar intersection Ò - Single horizontal bar to to downwards double bar. ¶ - Double horizontal bar to leftwards single bar. Ç - Double horizontal bar to rightwards single bar. OTHER: ® - Leftward shift character. ¯ - Rightward shift character. ° - Light shaded block. ± - Medium shaded block. ² - Dark shaded block. Û - Solid block Ý - Left side of block. Þ - Right side of block. Ü - Bottom half block. ß - Top half block. þ - Other block. - Translucent smiley face (^A). - Smiley face (^B) - Heart (^C) - Diamond (^D) - Club (^E) - Spade (^F) - Circle with lines (^O) - Left pointing triangle (^Q) - Right pointing triangle - Upward triangle - Downwawrd triangle - Up and down arrow (^R) - Upward arrow (^X) - Left pointing arrow - Left and right pointing arrow - Downward pointing arrow (^Y) « - 1/2 ¬ - 1/4 NON DISPLAY CODES THAT MAY BE USEFUL. - Beep (^G) - Backspace (^H)
0
great list. thank you thank you.
i save it in txt files, then use 'type judago.txt' and there i can see each of the character display.this forum is certainly the best, i learn all about batch here. thanks to all the active members who consistenly give batch solution, thank you.
0
Hi Judago
Great Batch program.
I think there a problem in the code somewhere.
Year 2000 started on a Saturday not a Sunday.
Years 1999 is correct.
0
Thank you Dtech10, I didn't notice that, it turns out it was a very simple problem:
set /a day=(2000 + 2000/4)-(2000/100-2000/400) day=2485 set /a day=((2000 + 2000/4)-(2000/100-2000/400))%%7 day=0 ... ... if leap=0 set /a day=day-1 day=-1Fixed quite simply:
set /a day=(2000 + 2000/4)-(2000/100-2000/400) day=2485 ... ... if leap=0 set /a day=day-1 day=2484 set /a day=day%%7 day=6 (saturday)Here's the updated script, if you spot any more errors let me know ;).
@ECHO OFF :: Xp batch for generating calendars :: Chances look good for win 2000 and above(untested) :: By Judago, may 2009 :: Credit to dtech10 for spotting a calculation error. IF "%~1"=="/?" ( ECHO START "%~NX0" WITHOUT ARGUMENTS AND THEN ENTER THE YEAR. ECHO "%~NX0" WILL OPEN IN IT'S OWN WINDOW TO AVOID RESIZING ECHO AN EXISTING WINDOW. ECHO. ECHO A SCREEN RESOLUTION AND/OR FONT SIZE THAT CAN DISPLAY ECHO CMD WINDOWS OF 96 COLUMNS AND 39 LINES IS REQUIRED. ECHO SOME CONFIGURATIONS MAY USE SCROLL BARS TO ACHIEVE ECHO THIS. EXIT /B ) :: The title can be used to falicitate custom window :: positioning via the properties menu of "calendars..." :: /max is used so as much content as possible is visable :: without moving the window. /max must be removed for :: custom window positing..... IF NOT "%~1 %~2"=="WINDOW SIZE" ( START "CALENDARS..." /MAX CMD /C "%~F0" WINDOW SIZE EXIT /B ) MODE CON:COLS=96 LINES=39 >NUL 2>&1 MODE CON:CP SELECT=850 SETLOCAL ENABLEDELAYEDEXPANSION :loop FOR %%Z IN (jan feb mar apr may jun jul aug sep oct nov dec year day leap noleap length test) DO SET %%Z= SET /P year=Enter a year to see it's calendar, or nothing to exit, then press enter: IF NOT DEFINED year EXIT /B ::Test that the input is only numbers... SET test=!year! FOR /l %%Z IN (0 1 9) DO IF DEFINED test SET "test=!test:%%Z=!" IF DEFINED test CLS&GOTO loop :zero IF NOT DEFINED year ( :error cls echo The year entered can not be accepted. echo. pause CLS GOTO loop ) :: remove leading zeros, if any... IF "%year:~0,1%"=="0" SET year=%year:~1%&&GOTO zero :: The %processor_architecture% test is used to test :: limits of caculations, if the variable is undefined :: or unrecognised the test will fall through and complete :: anyway, if the limit is surpassed this way the results may :: not be valid. The tested number is ~80% of the limit of the :: os so that year + year / 4 yields a valid result. IF /I "!processor_architecture!"=="x86" ( IF !year! gtr 1717986917 GOTO :error ) else ( IF NOT "!processor_architecture:64=!"=="!processor_architecture!" ( IF !year! gtr 7378697629483820645 GOTO :error ) ) :: Generate the first day of the year, 0=sun, 1=mon,...,6=sat :: A 365 day year ofsets by one day, so the next year will start :: the next day (i.e. 2009 starts on thr and 2010 starts on fri) :: an extra day must be added for every leapyear. Using modulo :: 7 on the total of offset days reviels the starting day of the :: year. one day must also be removed if the year is a leap year :: because the below will add one for it, the remainder for non :: leap years is not an issue because set /a only returns whole :: numbers. SET /A day=(year + year / 4) - (year / 100 - year / 400) SET /A leap=year %% 400 SET /A noleap=year %% 100 IF !leap! gtr 0 ( IF !noleap! neq 0 SET /A leap=year %% 4 ) IF %leap%==0 SET /A day-=1 set /a day=day%%7 :: For each year every month is padded to is starting offset :: with spaces, january has the original offset generated above. :: each additional offset is generated by adding the total days of :: the previous month then processing it by modulo 7. :: The days are stored in a varianle to display later, these variables :: are padded to 111 characters using spaces for display purposes. FOR %%U IN (jan feb mar apr may jun jul aug sep oct nov dec) DO ( FOR %%V IN (jan mar may jul aug oct dec) DO IF /I %%U==%%V SET length=31 FOR %%W IN (apr jun sep nov) DO IF /I %%U==%%W SET length=30 IF /I %%U==feb ( IF !leap!==0 ( SET length=29 ) else ( SET length=28 ) ) FOR /l %%X IN (1 1 !day!) DO SET "%%U=!%%U! " FOR /l %%Y IN (1 1 !length!) DO ( IF %%Y lss 10 ( SET "%%U=!%%U!%%Y " ) else ( SET "%%U=!%%U!%%Y " ) ) FOR /l %%Z IN (!length! 1 54) DO IF "!%%U:~110!"=="" SET "%%U=!%%U! " SET /A day=^(day + length^) %% 7 ) :test :: The results are displayed below using substrings of each month's variable. cls TITLE THE CALENDAR FOR THE YEAR OF %YEAR% echo. ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ echo. ³ JANUARY ³ ³ FEBUARY ³ ³ MARCH ³ ³ APRIL ³ echo. ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ echo. ³S M T W T F S ³ ³S M T W T F S ³ ³S M T W T F S ³ ³S M T W T F S ³ echo. ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ echo. ³%JAN:~0,20%³ ³%FEB:~0,20%³ ³%MAR:~0,20%³ ³%APR:~0,20%³ echo. ³%JAN:~21,20%³ ³%FEB:~21,20%³ ³%MAR:~21,20%³ ³%APR:~21,20%³ echo. ³%JAN:~42,20%³ ³%FEB:~42,20%³ ³%MAR:~42,20%³ ³%APR:~42,20%³ echo. ³%JAN:~63,20%³ ³%FEB:~63,20%³ ³%MAR:~63,20%³ ³%APR:~63,20%³ echo. ³%JAN:~84,20%³ ³%FEB:~84,20%³ ³%MAR:~84,20%³ ³%APR:~84,20%³ echo. ³%JAN:~105% ³ ³%FEB:~105% ³ ³%MAR:~105% ³ ³%APR:~105% ³ echo. ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ echo. echo. ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ echo. ³ MAY ³ ³ JUNE ³ ³ JULY ³ ³ AUGUST ³ echo. ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ echo. ³S M T W T F S ³ ³S M T W T F S ³ ³S M T W T F S ³ ³S M T W T F S ³ echo. ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ echo. ³%MAY:~0,20%³ ³%JUN:~0,20%³ ³%JUL:~0,20%³ ³%AUG:~0,20%³ echo. ³%MAY:~21,20%³ ³%JUN:~21,20%³ ³%JUL:~21,20%³ ³%AUG:~21,20%³ echo. ³%MAY:~42,20%³ ³%JUN:~42,20%³ ³%JUL:~42,20%³ ³%AUG:~42,20%³ echo. ³%MAY:~63,20%³ ³%JUN:~63,20%³ ³%JUL:~63,20%³ ³%AUG:~63,20%³ echo. ³%MAY:~84,20%³ ³%JUN:~84,20%³ ³%JUL:~84,20%³ ³%AUG:~84,20%³ echo. ³%MAY:~105% ³ ³%JUN:~105% ³ ³%JUL:~105% ³ ³%AUG:~105% ³ echo. ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ echo. echo. ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ echo. ³ SEPTEMBER ³ ³ OCTOBER ³ ³ NOVEMBER ³ ³ DECEMBER ³ echo. ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ echo. ³S M T W T F S ³ ³S M T W T F S ³ ³S M T W T F S ³ ³S M T W T F S ³ echo. ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´ echo. ³%SEP:~0,20%³ ³%OCT:~0,20%³ ³%NOV:~0,20%³ ³%DEC:~0,20%³ echo. ³%SEP:~21,20%³ ³%OCT:~21,20%³ ³%NOV:~21,20%³ ³%DEC:~21,20%³ echo. ³%SEP:~42,20%³ ³%OCT:~42,20%³ ³%NOV:~42,20%³ ³%DEC:~42,20%³ echo. ³%SEP:~63,20%³ ³%OCT:~63,20%³ ³%NOV:~63,20%³ ³%DEC:~63,20%³ echo. ³%SEP:~84,20%³ ³%OCT:~84,20%³ ³%NOV:~84,20%³ ³%DEC:~84,20%³ echo. ³%SEP:~105% ³ ³%OCT:~105% ³ ³%NOV:~105% ³ ³%DEC:~105% ³ echo. ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ GOTO loop
0  |
 |
 |
This post is quite old and has been locked from receiving new replies. Please create a new posting instead.
| Ads by Google |
