"Fossies" - the Fresh Open Source Software Archive

Member "remind-03.03.09/tests/tstlang.rem" (15 Oct 2021, 4504 Bytes) of package /linux/misc/remind-03.03.09.tar.gz:


As a special service "Fossies" has tried to format the requested text file into HTML format (style: standard) with prefixed line numbers. Alternatively you can here view or download the uninterpreted source code file.

    1 #!remind -rq
    2 # ---------------------------------------------------------------------------
    3 #
    4 # TSTLANG.REM
    5 #
    6 # Use this file to test new language headers you may want to create.
    7 # Usage: remind -rq tstlang.rem
    8 #
    9 # Don't run it within about 2 hours of midnight (ie, between 10pm and 2am)
   10 #
   11 # Use the output to verify your translations.
   12 #
   13 # This file is part of REMIND.
   14 # Copyright (C) 1992-2018 Dianne Skoll
   15 #
   16 # ---------------------------------------------------------------------------
   17 
   18 if version()<"03.00.08"
   19    errmsg %
   20    errmsg This file only works with Remind version 03.00.08 and later - aborting
   21    exit
   22 endif
   23 
   24 if !$RunOff || !$DontQueue || $DontTrigAts
   25    errmsg %
   26    errmsg Please run [filename()] with the -q and -r options, but%
   27    errmsg not the -a option.
   28    exit
   29 endif
   30 
   31 # Set up a few useful definitions
   32 fset show(x) "%%" + x + " yields: " + char(34) + "%" + x + char(34) + "% and %%*" + x + " yields: " + char(34) + "%*" + x + char(34) + "%"
   33 set a trigger(today()+2) + " ++2"
   34 set l language()
   35 set tt now()+134
   36 set tu now()-134
   37 set d a + " at " + tt
   38 set e a + " at " + tu
   39 
   40 msg The above is the default banner for the [l] language.
   41 
   42 msg The following are the two-day-in-advance substitutions:%
   43 [a] msg [show("a")]
   44 [a] msg [show("b")]
   45 [a] msg [show("c")]
   46 [a] msg [show("d")]
   47 [a] msg [show("e")]
   48 [a] msg [show("f")]
   49 [a] msg [show("g")]
   50 [a] msg [show("h")]
   51 [a] msg [show("i")]
   52 [a] msg [show("j")]
   53 [a] msg [show("k")]
   54 [a] msg [show("l")]
   55 [a] msg [show("m")]
   56 [a] msg [show("n")]
   57 [a] msg [show("o")]
   58 [a] msg [show("p")]
   59 [a] msg [show("q")]
   60 [a] msg [show("r")]
   61 [a] msg [show("s")]
   62 [a] msg [show("t")]
   63 [a] msg [show("u")]
   64 [a] msg [show("v")]
   65 [a] msg [show("w")]
   66 [a] msg [show("x")]
   67 [a] msg [show("y")]
   68 [a] msg [show("z")]
   69 
   70 msg %_%_The following are the one-day-in-advance substitutions:%
   71 set a trigger(today()+1) + " ++1"
   72 set d a + " at " + tt
   73 set e a + " at " + tu
   74 [a] msg [show("a")]
   75 [a] msg [show("b")]
   76 [a] msg [show("c")]
   77 [a] msg [show("d")]
   78 [a] msg [show("e")]
   79 [a] msg [show("f")]
   80 [a] msg [show("g")]
   81 [a] msg [show("h")]
   82 [a] msg [show("i")]
   83 [a] msg [show("j")]
   84 [a] msg [show("k")]
   85 [a] msg [show("l")]
   86 [a] msg [show("m")]
   87 [a] msg [show("n")]
   88 [a] msg [show("o")]
   89 [a] msg [show("p")]
   90 [a] msg [show("q")]
   91 [a] msg [show("r")]
   92 [a] msg [show("s")]
   93 [a] msg [show("t")]
   94 [a] msg [show("u")]
   95 [a] msg [show("v")]
   96 [a] msg [show("w")]
   97 [a] msg [show("x")]
   98 [a] msg [show("y")]
   99 [a] msg [show("z")]
  100 
  101 msg %_%_The following are the current-day substitutions:%
  102 set a trigger(today())
  103 set d a + " at " + tt
  104 set e a + " at " + tu
  105 [a] msg [show("a")]
  106 [a] msg [show("b")]
  107 [a] msg [show("c")]
  108 [a] msg [show("d")]
  109 [a] msg [show("e")]
  110 [a] msg [show("f")]
  111 [a] msg [show("g")]
  112 [a] msg [show("h")]
  113 [a] msg [show("i")]
  114 [a] msg [show("j")]
  115 [a] msg [show("k")]
  116 [a] msg [show("l")]
  117 [a] msg [show("m")]
  118 [a] msg [show("n")]
  119 [a] msg [show("o")]
  120 [a] msg [show("p")]
  121 [a] msg [show("q")]
  122 [a] msg [show("r")]
  123 [a] msg [show("s")]
  124 [a] msg [show("t")]
  125 [a] msg [show("u")]
  126 [a] msg [show("v")]
  127 [a] msg [show("w")]
  128 [a] msg [show("x")]
  129 [a] msg [show("y")]
  130 [a] msg [show("z")]
  131 
  132 msg %_Time substititions for a time in the future:%
  133 [d] msg [show("1")]
  134 [d] msg [show("2")]
  135 [d] msg [show("3")]
  136 [d] msg [show("4")]
  137 [d] msg [show("5")]
  138 [d] msg [show("6")]
  139 [d] msg [show("7")]
  140 [d] msg [show("8")]
  141 [d] msg [show("9")]
  142 [d] msg [show("0")]
  143 [d] msg [show("!")]
  144 [d] msg [show("@")]
  145 [d] msg [show("#")]
  146 msg %_Time substititions for a time in the past:%
  147 [e] msg [show("1")]
  148 [e] msg [show("2")]
  149 [e] msg [show("3")]
  150 [e] msg [show("4")]
  151 [e] msg [show("5")]
  152 [e] msg [show("6")]
  153 [e] msg [show("7")]
  154 [e] msg [show("8")]
  155 [e] msg [show("9")]
  156 [e] msg [show("0")]
  157 [e] msg [show("!")]
  158 [e] msg [show("@")]
  159 [e] msg [show("#")]
  160 
  161 msg %_Time substititions for the current time:%
  162 set e a + " at " + now()
  163 [e] msg [show("1")]
  164 [e] msg [show("2")]
  165 [e] msg [show("3")]
  166 [e] msg [show("4")]
  167 [e] msg [show("5")]
  168 [e] msg [show("6")]
  169 [e] msg [show("7")]
  170 [e] msg [show("8")]
  171 [e] msg [show("9")]
  172 [e] msg [show("0")]
  173 [e] msg [show("!")]
  174 [e] msg [show("@")]
  175 [e] msg [show("#")]
  176 
  177 msg %_The following are the days of the week:
  178 fset showwd(x) "wkday("+x+") = " + wkday(x) + "%"
  179 msg [showwd(0)]
  180 msg [showwd(1)]
  181 msg [showwd(2)]
  182 msg [showwd(3)]
  183 msg [showwd(4)]
  184 msg [showwd(5)]
  185 msg [showwd(6)]
  186 
  187 msg %_The following are the months of the year:
  188 fset showmon(x) "mon("+x+") = "+mon(x)+"%"
  189 msg [showmon(1)]
  190 msg [showmon(2)]
  191 msg [showmon(3)]
  192 msg [showmon(4)]
  193 msg [showmon(5)]
  194 msg [showmon(6)]
  195 msg [showmon(7)]
  196 msg [showmon(8)]
  197 msg [showmon(9)]
  198 msg [showmon(10)]
  199 msg [showmon(11)]
  200 msg [showmon(12)]