Files
remind/tests/tstlang.rem
Dianne Skoll f05661fa6c Fix typo
2022-03-23 17:22:47 -04:00

300 lines
6.2 KiB
Plaintext

#!remind -rq
# ---------------------------------------------------------------------------
#
# TSTLANG.REM
#
# Use this file to test new language headers you may want to create.
# Usage: remind -rq tstlang.rem
#
# Don't run it within about 2 hours of midnight (ie, between 10pm and 2am)
#
# Use the output to verify your translations.
#
# This file is part of REMIND.
# Copyright (C) 1992-2022 Dianne Skoll
#
# ---------------------------------------------------------------------------
if version()<"03.00.08"
errmsg %
errmsg This file only works with Remind version 03.00.08 and later - aborting
exit
endif
if !$RunOff || !$DontQueue || $DontTrigAts
errmsg %
errmsg Please run [filename()] with the -q and -r options, but%
errmsg not the -a option.
exit
endif
# Include a language file, if that's given as "-ii=/path"
if defined("i")
do [i]
# msg INCLUDING [i]
endif
# Set up a few useful definitions
fset show(x) "%%" + x + " yields: " + char(34) + "%" + x + char(34) + "% and %%*" + x + " yields: " + char(34) + "%*" + x + char(34) + "%"
set a trigger(today()+2) + " ++2"
set l language()
set tt now()+134
set tu now()-134
set ut now()+60
set uu now()-60
set vt now()+120
set vu now()-120
set wt now()-1
set wu now()+1
set xt now()-2
set xu now()+2
set d a + " at " + tt
set e a + " at " + tu
set f a + " at " + ut
set g a + " at " + uu
set h a + " at " + wt
set j a + " at " + wu
set k a + " at " + xt
set m a + " at " + xu
msg The following are the two-day-in-advance substitutions:%
[a] msg [show("a")]
[a] msg [show("b")]
[a] msg [show("c")]
[a] msg [show("d")]
[a] msg [show("e")]
[a] msg [show("f")]
[a] msg [show("g")]
[a] msg [show("h")]
[a] msg [show("i")]
[a] msg [show("j")]
[a] msg [show("k")]
[a] msg [show("l")]
[a] msg [show("m")]
[a] msg [show("n")]
[a] msg [show("o")]
[a] msg [show("p")]
[a] msg [show("q")]
[a] msg [show("r")]
[a] msg [show("s")]
[a] msg [show("t")]
[a] msg [show("u")]
[a] msg [show("v")]
[a] msg [show("w")]
[a] msg [show("x")]
[a] msg [show("y")]
[a] msg [show("z")]
msg %_%_The following are the one-day-in-advance substitutions:%
set a trigger(today()+1) + " ++1"
set d a + " at " + tt
set e a + " at " + tu
[a] msg [show("a")]
[a] msg [show("b")]
[a] msg [show("c")]
[a] msg [show("d")]
[a] msg [show("e")]
[a] msg [show("f")]
[a] msg [show("g")]
[a] msg [show("h")]
[a] msg [show("i")]
[a] msg [show("j")]
[a] msg [show("k")]
[a] msg [show("l")]
[a] msg [show("m")]
[a] msg [show("n")]
[a] msg [show("o")]
[a] msg [show("p")]
[a] msg [show("q")]
[a] msg [show("r")]
[a] msg [show("s")]
[a] msg [show("t")]
[a] msg [show("u")]
[a] msg [show("v")]
[a] msg [show("w")]
[a] msg [show("x")]
[a] msg [show("y")]
[a] msg [show("z")]
msg %_%_The following are the current-day substitutions:%
set a trigger(today())
set d a + " at " + tt
set e a + " at " + tu
[a] msg [show("a")]
[a] msg [show("b")]
[a] msg [show("c")]
[a] msg [show("d")]
[a] msg [show("e")]
[a] msg [show("f")]
[a] msg [show("g")]
[a] msg [show("h")]
[a] msg [show("i")]
[a] msg [show("j")]
[a] msg [show("k")]
[a] msg [show("l")]
[a] msg [show("m")]
[a] msg [show("n")]
[a] msg [show("o")]
[a] msg [show("p")]
[a] msg [show("q")]
[a] msg [show("r")]
[a] msg [show("s")]
[a] msg [show("t")]
[a] msg [show("u")]
[a] msg [show("v")]
[a] msg [show("w")]
[a] msg [show("x")]
[a] msg [show("y")]
[a] msg [show("z")]
msg %_Time substitutions for a time in the future:%
[d] msg [show("1")]
[d] msg [show("2")]
[d] msg [show("3")]
[d] msg [show("4")]
[d] msg [show("5")]
[d] msg [show("6")]
[d] msg [show("7")]
[d] msg [show("8")]
[d] msg [show("9")]
[d] msg [show("0")]
[d] msg [show("!")]
[d] msg [show("@")]
[d] msg [show("#")]
[f] msg [show("1")]
[f] msg [show("2")]
[f] msg [show("3")]
[f] msg [show("4")]
[f] msg [show("5")]
[f] msg [show("6")]
[f] msg [show("7")]
[f] msg [show("8")]
[f] msg [show("9")]
[f] msg [show("0")]
[f] msg [show("!")]
[f] msg [show("@")]
[f] msg [show("#")]
[h] msg [show("1")]
[h] msg [show("2")]
[h] msg [show("3")]
[h] msg [show("4")]
[h] msg [show("5")]
[h] msg [show("6")]
[h] msg [show("7")]
[h] msg [show("8")]
[h] msg [show("9")]
[h] msg [show("0")]
[h] msg [show("!")]
[h] msg [show("@")]
[h] msg [show("#")]
[k] msg [show("1")]
[k] msg [show("2")]
[k] msg [show("3")]
[k] msg [show("4")]
[k] msg [show("5")]
[k] msg [show("6")]
[k] msg [show("7")]
[k] msg [show("8")]
[k] msg [show("9")]
[k] msg [show("0")]
[k] msg [show("!")]
[k] msg [show("@")]
[k] msg [show("#")]
msg %_Time substitutions for a time in the past:%
[e] msg [show("1")]
[e] msg [show("2")]
[e] msg [show("3")]
[e] msg [show("4")]
[e] msg [show("5")]
[e] msg [show("6")]
[e] msg [show("7")]
[e] msg [show("8")]
[e] msg [show("9")]
[e] msg [show("0")]
[e] msg [show("!")]
[e] msg [show("@")]
[e] msg [show("#")]
[g] msg [show("1")]
[g] msg [show("2")]
[g] msg [show("3")]
[g] msg [show("4")]
[g] msg [show("5")]
[g] msg [show("6")]
[g] msg [show("7")]
[g] msg [show("8")]
[g] msg [show("9")]
[g] msg [show("0")]
[g] msg [show("!")]
[g] msg [show("@")]
[g] msg [show("#")]
[j] msg [show("1")]
[j] msg [show("2")]
[j] msg [show("3")]
[j] msg [show("4")]
[j] msg [show("5")]
[j] msg [show("6")]
[j] msg [show("7")]
[j] msg [show("8")]
[j] msg [show("9")]
[j] msg [show("0")]
[j] msg [show("!")]
[j] msg [show("@")]
[j] msg [show("#")]
[m] msg [show("1")]
[m] msg [show("2")]
[m] msg [show("3")]
[m] msg [show("4")]
[m] msg [show("5")]
[m] msg [show("6")]
[m] msg [show("7")]
[m] msg [show("8")]
[m] msg [show("9")]
[m] msg [show("0")]
[m] msg [show("!")]
[m] msg [show("@")]
[m] msg [show("#")]
msg %_Time substitutions for the current time:%
set e a + " at " + now()
[e] msg [show("1")]
[e] msg [show("2")]
[e] msg [show("3")]
[e] msg [show("4")]
[e] msg [show("5")]
[e] msg [show("6")]
[e] msg [show("7")]
[e] msg [show("8")]
[e] msg [show("9")]
[e] msg [show("0")]
[e] msg [show("!")]
[e] msg [show("@")]
[e] msg [show("#")]
msg %_The following are the days of the week:
fset showwd(x) "wkday("+x+") = " + wkday(x) + "%"
msg [showwd(0)]
msg [showwd(1)]
msg [showwd(2)]
msg [showwd(3)]
msg [showwd(4)]
msg [showwd(5)]
msg [showwd(6)]
msg %_The following are the months of the year:
fset showmon(x) "mon("+x+") = "+mon(x)+"%"
msg [showmon(1)]
msg [showmon(2)]
msg [showmon(3)]
msg [showmon(4)]
msg [showmon(5)]
msg [showmon(6)]
msg [showmon(7)]
msg [showmon(8)]
msg [showmon(9)]
msg [showmon(10)]
msg [showmon(11)]
msg [showmon(12)]