Groups | Search | Server Info | Login | Register


Groups > comp.lang.asm.x86 > #8216

Re: Calendar program

From Terje Mathisen <terje.mathisen@nospicedham.tmsw.no>
Newsgroups comp.lang.asm.x86
Subject Re: Calendar program
Date 2020-10-09 18:51 +0200
Organization Aioe.org NNTP Server
Message-ID <rlq4eg$1e72$1@gioia.aioe.org> (permalink)
References <XnsAC507D51B94E2admin127001@144.76.35.198> <XnsAC51AE613F3F0admin127001@144.76.35.198>

Show all headers | View raw


Kerr-Mudd,John wrote:
> On Thu, 08 Oct 2020 11:19:09 GMT, "Kerr-Mudd,John"
> <notsaying@nospicedham.127.0.0.1> wrote:
> 
>> I found an old cal.com (900 bytes)
>>> cal /? gives
>>
>> CAL  1.07  Freeware
>> Copyright 1998, Charles Dye
>>
>> CAL
>> CAL mm/yyyy
>> CAL yyyy
>>
> uses 2 char days:
> 
> C:\>cal 2 2012
> 
>        Feb 2012
> Su Mo Tu We Th Fr Sa
>            1  2  3  4
>   5  6  7  8  9 10 11
> 12 13 14 15 16 17 18
> 19 20 21 22 23 24 25
> 26 27 28 29
> 
> [newcal]
>> I have rewritten it to the same spec:
>> cal               (uses current mth&year)
>> cal mthname       (uses current year and mthname)
>> cal mthname year  (uses year and mthname)
>>
>> current byte count is down to 465
>>
> 459 - no jmps
> 
> 
> C:\>d:newcal7 feb 2012
> 
>          February 2012
> 
> Sun Mon Tue Wed Thu Fri Sat
> 
>               1   2   3   4
>   5   6   7   8   9  10  11
> 12  13  14  15  16  17  18
> 19  20  21  22  23  24  25
> 26  27  28  29
> 
> 
> I could probably^w undoubtedly save more by reducing the 'day' size, and
> dropping the code to centralise the mth/year title, and text matching on
> mthname.
> 
> Might be nice to have param of 'year' print a full year calendar.
> 
Make start-of-week configurable, and add week numbers.

In my own CAL.PAS Turbo Pascal program I did this, with a single 1-12 
number indicating that month in the current year, year-month to specify 
one spcific month and just year to print out all 12 months, with color 
coding for weekends and national holidays.

Terje

-- 
- <Terje.Mathisen at tmsw.no>
"almost all programming can be viewed as an exercise in caching"

Back to comp.lang.asm.x86 | Previous | NextPrevious in thread | Next in thread | Find similar


Thread

Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-10-08 11:19 +0000
  Re: Calendar program wolfgang kern <nowhere@nospicedham.never.at> - 2020-10-08 14:11 +0200
  Re: Calendar program Terje Mathisen <terje.mathisen@nospicedham.tmsw.no> - 2020-10-08 17:10 +0200
  Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-10-09 16:08 +0000
    Re: Calendar program Terje Mathisen <terje.mathisen@nospicedham.tmsw.no> - 2020-10-09 18:51 +0200
      Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-10-09 19:24 +0000
        Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-10-10 10:24 +0000
          Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-10-24 11:45 +0000
            Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-11-01 11:51 +0000
              Re: Calendar program Bogus@Embarq.com (Steve) - 2020-11-01 13:39 +0000
                Re: Calendar program Terje Mathisen <terje.mathisen@nospicedham.tmsw.no> - 2020-11-01 15:37 +0100
                Re: Calendar program wolfgang kern <nowhere@nospicedham.never.at> - 2020-11-02 09:10 +0100
                Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-11-01 16:21 +0000
                Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-11-08 22:21 +0000
                Re: Calendar program wolfgang kern <nowhere@nospicedham.never.at> - 2020-11-11 12:08 +0100
                Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-11-11 11:11 +0000
                Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-11-11 11:37 +0000
                Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-11-11 17:03 +0000
                Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-11-20 13:30 +0000
                Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-11-20 13:56 +0000
                Re: Calendar program wolfgang kern <nowhere@nospicedham.never.at> - 2020-11-21 08:53 +0100
                Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-11-21 20:20 +0000
                Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-11-25 09:53 +0000
                Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-12-09 15:24 +0000
                Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-12-18 11:21 +0000
                Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2021-01-11 20:15 +0000
      Re: Calendar program "Kerr-Mudd,John" <notsaying@nospicedham.127.0.0.1> - 2020-10-09 19:24 +0000

csiph-web