[q-lang-cvs] qcalc/examples calendar.qcalc,1.3,1.4
Brought to you by:
agraef
Menu
▾
▴
[q-lang-cvs] qcalc/examples calendar.qcalc,1.3,1.4
|
From: Albert G. <ag...@us...> - 2007-11-17 16:23:15
|
Update of /cvsroot/q-lang/qcalc/examples In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv11470 Modified Files: calendar.qcalc Log Message: make the computation of the calendar a background task Index: calendar.qcalc =================================================================== RCS file: /cvsroot/q-lang/qcalc/examples/calendar.qcalc,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** calendar.qcalc 8 Nov 2007 22:35:49 -0000 1.3 --- calendar.qcalc 17 Nov 2007 16:23:06 -0000 1.4 *************** *** 1,14 **** ! // qcalc 1.0, created Thu Nov 8 23:31:40 2007 -*-Q-*- -*- coding: UTF-8 -*- ! // [((1,0),"Enter year:"),((2,0),"= spinbox (0,9999,1,today!2)"),((3,0),"= matrix 'A5 (mycal A3) || A3")] // [] ! // [(0,77),(1,26),(2,28),(3,26),(4,30),(5,25),(6,27),(7,26),(8,74),(9,26),(10,28),(11,25),(12,30),(13,26),(14,27),(15,26),(16,77),(17,26),(18,28),(19,25),(20,30),(21,25),(22,29),(23,26)] // Start of script. Please do not remove this line. ! /* cal.qcalc: Print a calendar. */ import date, calclib; ! show (I,J) A = matrix (I,J) A || A; /* Format the calendar nicely in three columns, one for each quarter. */ --- 1,15 ---- ! // qcalc 1.0, created Sat Nov 17 17:24:13 2007 -*-Q-*- -*- coding: UTF-8 -*- ! // [((0,0),""),((1,0),"Enter year:"),((2,0),"= spinbox (0,9999,1,today!2)"),((3,0),"= calendar 'A5 A3"),((4,0),""),((4,1),""),((4,2),""),((4,3),""),((4,4),""),((4,5),""),((4,6),""),((4,7),""),((4,8),""),((4,9),""),((4,10),""),((4,11),""),((4,12),""),((4,13),""),((4,14),""),((4,15),""),((4,16),""),((4,17),""),((4,18),""),((4,19),""),((4,20),""),((4,21),""),((4,22),""),((4,23),""),((5,0),"January"),((5,1),"Su"),((5,2),"Mo"),((5,3),"Tu"),((5,4),"We"),((5,5),"Th"),((5,6),"Fr"),((5,7),"Sa"),((5,8),"February"),((5,9),"Su"),((5,10),"Mo"),((5,11),"Tu"),((5,12),"We"),((5,13),"Th"),((5,14),"Fr"),((5,15),"Sa"),((5,16),"March"),((5,17),"Su"),((5,18),"Mo"),((5,19),"Tu"),((5,20),"We"),((5,21),"Th"),((5,22),"Fr"),((5,23),"Sa"),((6,0),""),((6,1),""),((6,2),"1"),((6,3),"2"),((6,4),"3"),((6,5),"4"),((6,6),"5"),((6,7),"6"),((6,8),""),((6,9),""),((6,10),""),((6,11),""),((6,12),""),((6,13),"1"),((6,14),"2"),((6,15),"3"),((6,16),""),((6,17),""),((6,18),""),((6,19),""),((6,20),""),((6,21),"1"),((6,22),"2"),((6,23),"3"),((7,0),""),((7,1),"7"),((7,2),"8"),((7,3),"9"),((7,4),"10"),((7,5),"11"),((7,6),"12"),((7,7),"13"),((7,8),""),((7,9),"4"),((7,10),"5"),((7,11),"6"),((7,12),"7"),((7,13),"8"),((7,14),"9"),((7,15),"10"),((7,16),""),((7,17),"4"),((7,18),"5"),((7,19),"6"),((7,20),"7"),((7,21),"8"),((7,22),"9"),((7,23),"10"),((8,0),""),((8,1),"14"),((8,2),"15"),((8,3),"16"),((8,4),"17"),((8,5),"18"),((8,6),"19"),((8,7),"20"),((8,8),""),((8,9),"11"),((8,10),"12"),((8,11),"13"),((8,12),"14"),((8,13),"15"),((8,14),"16"),((8,15),"17"),((8,16),""),((8,17),"11"),((8,18),"12"),((8,19),"13"),((8,20),"14"),((8,21),"15"),((8,22),"16"),((8,23),"17"),((9,0),""),((9,1),"21"),((9,2),"22"),((9,3),"23"),((9,4),"24"),((9,5),"25"),((9,6),"26"),((9,7),"27"),((9,8),""),((9,9),"18"),((9,10),"19"),((9,11),"20"),((9,12),"21"),((9,13),"22"),((9,14),"23"),((9,15),"24"),((9,16),""),((9,17),"18"),((9,18),"19"),((9,19),"20"),((9,20),"21"),((9,21),"22"),((9,22),"23"),((9,23),"24"),((10,0),""),((10,1),"28"),((10,2),"29"),((10,3),"30"),((10,4),"31"),((10,5),""),((10,6),""),((10,7),""),((10,8),""),((10,9),"25"),((10,10),"26"),((10,11),"27"),((10,12),"28"),((10,13),""),((10,14),""),((10,15),""),((10,16),""),((10,17),"25"),((10,18),"26"),((10,19),"27"),((10,20),"28"),((10,21),"29"),((10,22),"30"),((10,23),"31"),((11,0),""),((11,1),""),((11,2),""),((11,3),""),((11,4),""),((11,5),""),((11,6),""),((11,7),""),((11,8),""),((11,9),""),((11,10),""),((11,11),""),((11,12),""),((11,13),""),((11,14),""),((11,15),""),((11,16),""),((11,17),""),((11,18),""),((11,19),""),((11,20),""),((11,21),""),((11,22),""),((11,23),""),((12,0),"April"),((12,1),"Su"),((12,2),"Mo"),((12,3),"Tu"),((12,4),"We"),((12,5),"Th"),((12,6),"Fr"),((12,7),"Sa"),((12,8),"May"),((12,9),"Su"),((12,10),"Mo"),((12,11),"Tu"),((12,12),"We"),((12,13),"Th"),((12,14),"Fr"),((12,15),"Sa"),((12,16),"June"),((12,17),"Su"),((12,18),"Mo"),((12,19),"Tu"),((12,20),"We"),((12,21),"Th"),((12,22),"Fr"),((12,23),"Sa"),((13,0),""),((13,1),"1"),((13,2),"2"),((13,3),"3"),((13,4),"4"),((13,5),"5"),((13,6),"6"),((13,7),"7"),((13,8),""),((13,9),""),((13,10),""),((13,11),"1"),((13,12),"2"),((13,13),"3"),((13,14),"4"),((13,15),"5"),((13,16),""),((13,17),""),((13,18),""),((13,19),""),((13,20),""),((13,21),""),((13,22),"1"),((13,23),"2"),((14,0),""),((14,1),"8"),((14,2),"9"),((14,3),"10"),((14,4),"11"),((14,5),"12"),((14,6),"13"),((14,7),"14"),((14,8),""),((14,9),"6"),((14,10),"7"),((14,11),"8"),((14,12),"9"),((14,13),"10"),((14,14),"11"),((14,15),"12"),((14,16),""),((14,17),"3"),((14,18),"4"),((14,19),"5"),((14,20),"6"),((14,21),"7"),((14,22),"8"),((14,23),"9"),((15,0),""),((15,1),"15"),((15,2),"16"),((15,3),"17"),((15,4),"18"),((15,5),"19"),((15,6),"20"),((15,7),"21"),((15,8),""),((15,9),"13"),((15,10),"14"),((15,11),"15"),((15,12),"16"),((15,13),"17"),((15,14),"18"),((15,15),"19"),((15,16),""),((15,17),"10"),((15,18),"11"),((15,19),"12"),((15,20),"13"),((15,21),"14"),((15,22),"15"),((15,23),"16"),((16,0),""),((16,1),"22"),((16,2),"23"),((16,3),"24"),((16,4),"25"),((16,5),"26"),((16,6),"27"),((16,7),"28"),((16,8),""),((16,9),"20"),((16,10),"21"),((16,11),"22"),((16,12),"23"),((16,13),"24"),((16,14),"25"),((16,15),"26"),((16,16),""),((16,17),"17"),((16,18),"18"),((16,19),"19"),((16,20),"20"),((16,21),"21"),((16,22),"22"),((16,23),"23"),((17,0),""),((17,1),"29"),((17,2),"30"),((17,3),""),((17,4),""),((17,5),""),((17,6),""),((17,7),""),((17,8),""),((17,9),"27"),((17,10),"28"),((17,11),"29"),((17,12),"30"),((17,13),"31"),((17,14),""),((17,15),""),((17,16),""),((17,17),"24"),((17,18),"25"),((17,19),"26"),((17,20),"27"),((17,21),"28"),((17,22),"29"),((17,23),"30"),((18,0),""),((18,1),""),((18,2),""),((18,3),""),((18,4),""),((18,5),""),((18,6),""),((18,7),""),((18,8),""),((18,9),""),((18,10),""),((18,11),""),((18,12),""),((18,13),""),((18,14),""),((18,15),""),((18,16),""),((18,17),""),((18,18),""),((18,19),""),((18,20),""),((18,21),""),((18,22),""),((18,23),""),((19,0),"July"),((19,1),"Su"),((19,2),"Mo"),((19,3),"Tu"),((19,4),"We"),((19,5),"Th"),((19,6),"Fr"),((19,7),"Sa"),((19,8),"August"),((19,9),"Su"),((19,10),"Mo"),((19,11),"Tu"),((19,12),"We"),((19,13),"Th"),((19,14),"Fr"),((19,15),"Sa"),((19,16),"September"),((19,17),"Su"),((19,18),"Mo"),((19,19),"Tu"),((19,20),"We"),((19,21),"Th"),((19,22),"Fr"),((19,23),"Sa"),((20,0),""),((20,1),"1"),((20,2),"2"),((20,3),"3"),((20,4),"4"),((20,5),"5"),((20,6),"6"),((20,7),"7"),((20,8),""),((20,9),""),((20,10),""),((20,11),""),((20,12),"1"),((20,13),"2"),((20,14),"3"),((20,15),"4"),((20,16),""),((20,17),""),((20,18),""),((20,19),""),((20,20),""),((20,21),""),((20,22),""),((20,23),"1"),((21,0),""),((21,1),"8"),((21,2),"9"),((21,3),"10"),((21,4),"11"),((21,5),"12"),((21,6),"13"),((21,7),"14"),((21,8),""),((21,9),"5"),((21,10),"6"),((21,11),"7"),((21,12),"8"),((21,13),"9"),((21,14),"10"),((21,15),"11"),((21,16),""),((21,17),"2"),((21,18),"3"),((21,19),"4"),((21,20),"5"),((21,21),"6"),((21,22),"7"),((21,23),"8"),((22,0),""),((22,1),"15"),((22,2),"16"),((22,3),"17"),((22,4),"18"),((22,5),"19"),((22,6),"20"),((22,7),"21"),((22,8),""),((22,9),"12"),((22,10),"13"),((22,11),"14"),((22,12),"15"),((22,13),"16"),((22,14),"17"),((22,15),"18"),((22,16),""),((22,17),"9"),((22,18),"10"),((22,19),"11"),((22,20),"12"),((22,21),"13"),((22,22),"14"),((22,23),"15"),((23,0),""),((23,1),"22"),((23,2),"23"),((23,3),"24"),((23,4),"25"),((23,5),"26"),((23,6),"27"),((23,7),"28"),((23,8),""),((23,9),"19"),((23,10),"20"),((23,11),"21"),((23,12),"22"),((23,13),"23"),((23,14),"24"),((23,15),"25"),((23,16),""),((23,17),"16"),((23,18),"17"),((23,19),"18"),((23,20),"19"),((23,21),"20"),((23,22),"21"),((23,23),"22"),((24,0),""),((24,1),"29"),((24,2),"30"),((24,3),"31"),((24,4),""),((24,5),""),((24,6),""),((24,7),""),((24,8),""),((24,9),"26"),((24,10),"27"),((24,11),"28"),((24,12),"29"),((24,13),"30"),((24,14),"31"),((24,15),""),((24,16),""),((24,17),"23"),((24,18),"24"),((24,19),"25"),((24,20),"26"),((24,21),"27"),((24,22),"28"),((24,23),"29"),((25,0),""),((25,1),""),((25,2),""),((25,3),""),((25,4),""),((25,5),""),((25,6),""),((25,7),""),((25,8),""),((25,9),""),((25,10),""),((25,11),""),((25,12),""),((25,13),""),((25,14),""),((25,15),""),((25,16),""),((25,17),""),((25,18),""),((25,19),""),((25,20),""),((25,21),""),((25,22),""),((25,23),""),((26,0),"October"),((26,1),"Su"),((26,2),"Mo"),((26,3),"Tu"),((26,4),"We"),((26,5),"Th"),((26,6),"Fr"),((26,7),"Sa"),((26,8),"November"),((26,9),"Su"),((26,10),"Mo"),((26,11),"Tu"),((26,12),"We"),((26,13),"Th"),((26,14),"Fr"),((26,15),"Sa"),((26,16),"December"),((26,17),"Su"),((26,18),"Mo"),((26,19),"Tu"),((26,20),"We"),((26,21),"Th"),((26,22),"Fr"),((26,23),"Sa"),((27,0),""),((27,1),""),((27,2),"1"),((27,3),"2"),((27,4),"3"),((27,5),"4"),((27,6),"5"),((27,7),"6"),((27,8),""),((27,9),""),((27,10),""),((27,11),""),((27,12),""),((27,13),"1"),((27,14),"2"),((27,15),"3"),((27,16),""),((27,17),""),((27,18),""),((27,19),""),((27,20),""),((27,21),""),((27,22),""),((27,23),"1"),((28,0),""),((28,1),"7"),((28,2),"8"),((28,3),"9"),((28,4),"10"),((28,5),"11"),((28,6),"12"),((28,7),"13"),((28,8),""),((28,9),"4"),((28,10),"5"),((28,11),"6"),((28,12),"7"),((28,13),"8"),((28,14),"9"),((28,15),"10"),((28,16),""),((28,17),"2"),((28,18),"3"),((28,19),"4"),((28,20),"5"),((28,21),"6"),((28,22),"7"),((28,23),"8"),((29,0),""),((29,1),"14"),((29,2),"15"),((29,3),"16"),((29,4),"17"),((29,5),"18"),((29,6),"19"),((29,7),"20"),((29,8),""),((29,9),"11"),((29,10),"12"),((29,11),"13"),((29,12),"14"),((29,13),"15"),((29,14),"16"),((29,15),"17"),((29,16),""),((29,17),"9"),((29,18),"10"),((29,19),"11"),((29,20),"12"),((29,21),"13"),((29,22),"14"),((29,23),"15"),((30,0),""),((30,1),"21"),((30,2),"22"),((30,3),"23"),((30,4),"24"),((30,5),"25"),((30,6),"26"),((30,7),"27"),((30,8),""),((30,9),"18"),((30,10),"19"),((30,11),"20"),((30,12),"21"),((30,13),"22"),((30,14),"23"),((30,15),"24"),((30,16),""),((30,17),"16"),((30,18),"17"),((30,19),"18"),((30,20),"19"),((30,21),"20"),((30,22),"21"),((30,23),"22"),((31,0),""),((31,1),"28"),((31,2),"29"),((31,3),"30"),((31,4),"31"),((31,5),""),((31,6),""),((31,7),""),((31,8),""),((31,9),"25"),((31,10),"26"),((31,11),"27"),((31,12),"28"),((31,13),"29"),((31,14),"30"),((31,15),""),((31,16),""),((31,17),"23"),((31,18),"24"),((31,19),"25"),((31,20),"26"),((31,21),"27"),((31,22),"28"),((31,23),"29")] // [] ! // [(0,86),(1,26),(2,28),(3,26),(4,30),(5,25),(6,27),(7,26),(8,74),(9,26),(10,28),(11,25),(12,30),(13,26),(14,27),(15,26),(16,77),(17,26),(18,28),(19,25),(20,30),(21,25),(22,29),(23,26)] // Start of script. Please do not remove this line. ! /* calendar.qcalc: Print a calendar. */ import date, calclib; ! /* Set up a little task to compute the calendar in the background. */ + calendar KEY Y = taskbutton "&Compute" (matrix KEY $ mycal Y); /* Format the calendar nicely in three columns, one for each quarter. */ |
