1. Forum
  2. AgoraNet
  3. AGN DEV

  • Pascal code for countdown?

    From Tiny@46:1/126.1 to All on Wed Dec 2 13:52:20 2015
    Hello All!

    Does anyone have any sample pascal code that will count down to a specific
    date? ie: May 8 2016. X months, x weeks, x days. I've been looking in
    old swag packets, but for some reason I'm just not grasping this. hahaha

    Shawn

    ... Hypochondria is the only disease I haven't got.
    --- timEd 1.10.y2k+
    * Origin: Tiny's Trailer (46:1/126.1)
  • From dream master@46:1/102 to Tiny on Wed Dec 2 23:50:31 2015
    On 12/02/15, Tiny said the following...
    Hello All!
    Does anyone have any sample pascal code that will count down to a specific date? ie: May 8 2016. X months, x weeks, x days. I've been looking in old swag packets, but for some reason I'm just not grasping this. hahaha

    i did one for renegade and iniquity. i would have to find it.

    --- Mystic BBS v1.11 (Windows)
    * Origin: fluph.darktech.org (46:1/102)
  • From sudden death@46:1/145 to Tiny on Mon Sep 5 20:03:56 2016

    Hello All!

    Does anyone have any sample pascal code that will count down to a specific date? ie: May 8 2016. X months, x weeks, x days. I've been looking in old swag packets, but for some reason I'm just not grasping this. hahaha

    Shawn

    ... Hypochondria is the only disease I haven't got.
    --- timEd 1.10.y2k+
    * Origin: Tiny's Trailer (46:1/126.1)


    in freepascal that would be simple using dateutils, make a tdatetime record with the date you want
    and then do a daysbetween(yourrecord,and now)

    sudden death

    --- Mystic BBS v1.12 A27 (Windows)
    * Origin: d i s t o r t i o n // d1st.org (46:1/145)
  • From sudden death@46:1/145 to Tiny on Sun Oct 2 04:03:46 2016
    freepascal is easy to use that look at dateutils

    --- Mystic BBS v1.12 A27 (Windows)
    * Origin: d i s t o r t i o n // d1st.org (46:1/145)