This program allows you to enter in ANY year and any month  to see what
that year's calendar will look like     -------------------
                                        |Su|M|Tu|W|TH|F|Sa|
					-------------------
					|  | |  | |1 |2|3 |
                                        -------------------
					|4| 5|6 |7|8 |9|10|
					-------------------
I'm not that good at ascii pictures  but its 
something to that affect     Now I wasn't sure whether to include the leap year for the year 2000 since people I have talked to have said that there won't be one in that year for some reason ????????????????   like because of THE "2000 bug" or something  if you have any info on that  e-mail me at Cw9000@aol.com   or   Aolcw@hotmail.com

History
--------
First I had it go through loops which took time and memory to do and was very sloppy    and you couldn't put in a date before 1997 since thats the year it uses as a marker    one nice thing was that I had a loop at the end so you could just hit the --> arrow to go to the next month   and <-- to get to the previous month     but if you put in a year like  3000    it would take a LONG time to display that month so it didn't have a great affect

Then I tried a formula to come up with the day the year started  so it wouldn't have to "figure out" what the starting day of that year was   it would just come up with that number by plugging the year into the formula   then going through loops for the month  well this worked out alright   but some months were comming up wrong

Then I tried using a formula for everything    The year AND the month   no more mr. looping     I now had a fast way of getting the values needed to setup the calendar     but when it was displaying it    it kept coming up with a domain problem     I thought it was the ti-82 because I isolated the problem and the values of X and Y were within the domain    I could not understand it for the life of me.   Finally one day I decided to put the X and Y in a matrix     it came up as a domain problem again    but this time I went to edit the matrix to see what values were in for X and Y    well  the problem was that I was dividing a number and coming up with a decimal then multiplying this decimal by the same number    for some reason I thought it would come up a whole number since I was dividing the same number I was multiplying.
Well I don't remember exactly what I was thinking and what I actually was multiplying and dividing since its been forever since I looked at the program     but anyway when you edit a matrix and go to a certain row/column with a value  it shows much more of the value than just by recalling that value in the regular text area   it always came up a whole value  no decimal ( which later I found very helpful that you can put pi in a matrix to see more of the decimal)
I found that my X value had many decimal places after it  all zeros until finally a 1.Well you can't display decimals on graph that is windowed for whole numbers  What I had contemplated and studied for the longest time was fixed with just two   integer statements  =(
--End of History--

So here it is CALENDAR   
   
I know there are other programs named calendar  but I've found that these just let you input text for a weeks worth of data  and you supply the date too      Actually I have only seen the TI-83 version of Calendar--assembly    but it was nothing like my version of Calendar    but even so    if this program has been done by someone else  please tell me so I may remove it   ( actually I have no idea how to remove something     but e-mail me at Cw9000@aol.com and tell me how to and I will) 

well if your impressed at all tell me at; already said;
Cw9000@aol.com       and also e-mail me if you find any bugs

I plan on trying to do this in assembly (for Ash) too hopefully it will be smaller size ??    but I'm JUST STARTING to learn Assembly   and it seems to be pretty hard to me
nevertheless  I'll give it a try

SIZE--
prgm	1024 
MATRIX[A]--224--------can be deleted-is made durring the program--made 			it easy to recall values
If you don't care about the added year and month your displaying at the bottom just delete after :Text(1,81,"SA") cause all those if/thens take space


if you don't have the software to open .82p  then here is the code for it    NOTE  's  = STO-->   the store symbol and some of the > or =
may be just > in this text file but I'm not sure if I used any >= or <= or <>    I would just download the free software off of www.ti.com even if you don't have a graphlink

:ClrHome
:Output(4,5,"CALENDAR")
:Output(5,2,"BY:CraIG WaLKer")
:Output(6,6,"1/5/98")
:Pause 
:0Xmin
:94Xmax
:1Xscl
:0Ymin
:62Ymax
:1Yscl
:CoordOff:RectGC:GridOff:LabelOff:AxesOff
:ClrDraw
:ClrHome
:Output(6,1,"ENTER ENTIRE")
:Output(7,1,"NUMBER OF YEAR +")
:Output(8,1,"NUMBER OF MONTH"
:Input "Year ",G
:If G=0
:Then
:1998G:1M
:Else
:Input "MOnTH ",M
:End
:(G/4)=int (G/4)L
:[[0,31][31,28+L][59+L,31][90+L,30][120+L,31][151+L,30][181+L,31][212+L,31][243+L,30][273+L,31][304+L,30][334+L,31]][A]
:(G-1997)X
:(X+(int (X/4))+4)-(7(int ((X+(int (X/4))+4)/7)))D
:If D=0:7D
:[A](M,1)I
:[A](M,2)E
:I/7C
:((C-(int C))*7)+DD
:int DD
:D>7A
:D-(A*7)D
:10H
:4+(13*(D-1))V
:For(X,1,E)
:int HH
:int VV
:Text(H,V,X)
:V+13V
:If V>82
:Then
:H+9H
:4V
:End
:End
:Horizontal 62
:Horizontal 53
:Horizontal 44
:Horizontal 35
:Horizontal 26
:Horizontal 17
:Horizontal 8
:Horizontal 0
:Vertical 0
:Vertical 13
:Vertical 26
:Vertical 39
:Vertical 52
:Vertical 65
:Vertical 78
:Vertical 94
:Text(1,3,"SU")
:Text(1,17,"M")
:Text(1,29,"TU")
:Text(1,43,"W")
:Text(1,55,"TH")
:Text(1,70,"F")
:Text(1,81,"SA")
:If M=1
:Then
:Text(56,81,"JAN.")
:End
:If M=2
:Then
:Text(56,81,"FEB.")
:End
:If M=3
:Then
:Text(56,81,"MAR.")
:End
:If M=4
:Then
:Text(56,81,"APR.")
:End
:If M=5
:Then
:Text(56,81,"MAY")
:End
:If M=6
:Then
:Text(56,81,"JUN.")
:End
:If M=7
:Then
:Text(56,81,"JULY")
:End
:If M=8
:Then
:Text(56,81,"AUG.")
:End
:If M=9
:Then
:Text(56,81,"SEP.")
:End
:If M=10
:Then
:Text(56,81,"OCT.")
:End
:If M=11
:Then
:Text(56,81,"NOV.")
:End
:If M=12
:Then
:Text(56,81,"DEC.")
:End
:Text(56,58,G)



 



