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