-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

It may be due to an internal limitation of your operating system; looking up the "convert" command in the Rev docs reveals that the convert command uses date/time routines provided by the operating system, with the implication that some operating systems can only handle dates after a certain year. Maybe with yours it is 1935.

Which operating system are you using?


On Apr 19, 2005, at 1:36 PM, Serge SÃgu wrote:

Hello

The script  below is OK with HyperCard
but  with DreamCard it returns a negative number with year < 1935
what must I modify ?

Best regards
Serge
--
on mouseUp
  answer calcAge ("1/1/1934")
end mouseUp

function calcAge x
  put x into calc -- day of birth
  convert calc to seconds
  put ((the seconds - calc)/86400) into calc -- 86400 s = 1day
  set itemDelimiter to "."
  if calc < 30 then -- newborn
    delete last item of calc
    put " days." after calc
  else
    if calc â 30 and calc â 913 then -- enfant
      put (calc / 30)  into calc
      delete last item of calc
      put" months." after calc
    else -- child or adult
      if calc >913 then
        put( calc / 365)  into calc
        delete last item of calc
        put" years." after calc
      end if
    end if
  end if
  return calc
end calcAge

--
Serge SÃGU
AIM : mullowill
http://wirinum.free.fr
PGP: 0xB6132583






_______________________________________________ use-revolution mailing list [email protected] http://lists.runrev.com/mailman/listinfo/use-revolution


- -----------------------------------------------------------
Frank D. Engel, Jr.  <[EMAIL PROTECTED]>

$ ln -s /usr/share/kjvbible /usr/manual
$ true | cat /usr/manual | grep "John 3:16"
John 3:16 For God so loved the world, that he gave his only begotten Son, that whosoever believeth in him should not perish, but have everlasting life.
$
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.2.4 (Darwin)


iD8DBQFCZUlt7aqtWrR9cZoRAlkBAKCBpqTy/7Lc4NC3Ai4AAddqffPbWgCfS4GA
knXJdCD54Pk7PDs916dUyPs=
=GYSp
-----END PGP SIGNATURE-----



___________________________________________________________
$0 Web Hosting with up to 200MB web space, 1000 MB Transfer
10 Personalized POP and Web E-mail Accounts, and much more.
Signup at www.doteasy.com

_______________________________________________
use-revolution mailing list
[email protected]
http://lists.runrev.com/mailman/listinfo/use-revolution

Reply via email to