home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / misc / volume35 / remind / patch02c / tstlang.rem < prev   
Encoding:
Text File  |  1993-02-05  |  4.2 KB  |  194 lines
  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, 1993 by David F. Skoll
  15. #
  16. # ---------------------------------------------------------------------------
  17.  
  18. if version()<"03.00.02"
  19.    errmsg %
  20.    errmsg This file only works with Remind version 03.00.02 and later - aborting
  21.    exit
  22. endif
  23.  
  24. # Set up a few useful definitions
  25. fset show(x) "%%" + x + " yields: " + char(34) + "%" + x + char(34) + "%"
  26. set a trigger(today()+2) + " ++2"
  27. set l language()
  28. set tt now()+134
  29. set tu now()-134
  30. set d a + " at " + tt
  31. set e a + " at " + tu
  32.  
  33. msg The above is the default banner for the [l] language.
  34.  
  35. msg The following are the two-day-in-advance substitutions:%
  36. [a] msg [show("a")]
  37. [a] msg [show("b")]
  38. [a] msg [show("c")]
  39. [a] msg [show("d")]
  40. [a] msg [show("e")]
  41. [a] msg [show("f")]
  42. [a] msg [show("g")]
  43. [a] msg [show("h")]
  44. [a] msg [show("i")]
  45. [a] msg [show("j")]
  46. [a] msg [show("k")]
  47. [a] msg [show("l")]
  48. [a] msg [show("m")]
  49. [a] msg [show("n")]
  50. [a] msg [show("o")]
  51. [a] msg [show("p")]
  52. [a] msg [show("q")]
  53. [a] msg [show("r")]
  54. [a] msg [show("s")]
  55. [a] msg [show("t")]
  56. [a] msg [show("u")]
  57. [a] msg [show("v")]
  58. [a] msg [show("w")]
  59. [a] msg [show("x")]
  60. [a] msg [show("y")]
  61. [a] msg [show("z")]
  62.  
  63. msg %_%_The following are the one-day-in-advance substitutions:%
  64. set a trigger(today()+1) + " ++1"
  65. set d a + " at " + tt
  66. set e a + " at " + tu
  67. [a] msg [show("a")]
  68. [a] msg [show("b")]
  69. [a] msg [show("c")]
  70. [a] msg [show("d")]
  71. [a] msg [show("e")]
  72. [a] msg [show("f")]
  73. [a] msg [show("g")]
  74. [a] msg [show("h")]
  75. [a] msg [show("i")]
  76. [a] msg [show("j")]
  77. [a] msg [show("k")]
  78. [a] msg [show("l")]
  79. [a] msg [show("m")]
  80. [a] msg [show("n")]
  81. [a] msg [show("o")]
  82. [a] msg [show("p")]
  83. [a] msg [show("q")]
  84. [a] msg [show("r")]
  85. [a] msg [show("s")]
  86. [a] msg [show("t")]
  87. [a] msg [show("u")]
  88. [a] msg [show("v")]
  89. [a] msg [show("w")]
  90. [a] msg [show("x")]
  91. [a] msg [show("y")]
  92. [a] msg [show("z")]
  93.  
  94. msg %_%_The following are the current-day substitutions:%
  95. set a trigger(today())
  96. set d a + " at " + tt
  97. set e a + " at " + tu
  98. [a] msg [show("a")]
  99. [a] msg [show("b")]
  100. [a] msg [show("c")]
  101. [a] msg [show("d")]
  102. [a] msg [show("e")]
  103. [a] msg [show("f")]
  104. [a] msg [show("g")]
  105. [a] msg [show("h")]
  106. [a] msg [show("i")]
  107. [a] msg [show("j")]
  108. [a] msg [show("k")]
  109. [a] msg [show("l")]
  110. [a] msg [show("m")]
  111. [a] msg [show("n")]
  112. [a] msg [show("o")]
  113. [a] msg [show("p")]
  114. [a] msg [show("q")]
  115. [a] msg [show("r")]
  116. [a] msg [show("s")]
  117. [a] msg [show("t")]
  118. [a] msg [show("u")]
  119. [a] msg [show("v")]
  120. [a] msg [show("w")]
  121. [a] msg [show("x")]
  122. [a] msg [show("y")]
  123. [a] msg [show("z")]
  124.  
  125. msg %_Time substititions for a time in the future:%
  126. [d] msg [show("1")]
  127. [d] msg [show("2")]
  128. [d] msg [show("3")]
  129. [d] msg [show("4")]
  130. [d] msg [show("5")]
  131. [d] msg [show("6")]
  132. [d] msg [show("7")]
  133. [d] msg [show("8")]
  134. [d] msg [show("9")]
  135. [d] msg [show("0")]
  136. [d] msg [show("!")]
  137. [d] msg [show("@")]
  138. [d] msg [show("#")]
  139. msg %_Time substititions for a time in the past:%
  140. [e] msg [show("1")]
  141. [e] msg [show("2")]
  142. [e] msg [show("3")]
  143. [e] msg [show("4")]
  144. [e] msg [show("5")]
  145. [e] msg [show("6")]
  146. [e] msg [show("7")]
  147. [e] msg [show("8")]
  148. [e] msg [show("9")]
  149. [e] msg [show("0")]
  150. [e] msg [show("!")]
  151. [e] msg [show("@")]
  152. [e] msg [show("#")]
  153.  
  154. msg %_Time substititions for the current time:%
  155. set e a + " at " + now()
  156. [e] msg [show("1")]
  157. [e] msg [show("2")]
  158. [e] msg [show("3")]
  159. [e] msg [show("4")]
  160. [e] msg [show("5")]
  161. [e] msg [show("6")]
  162. [e] msg [show("7")]
  163. [e] msg [show("8")]
  164. [e] msg [show("9")]
  165. [e] msg [show("0")]
  166. [e] msg [show("!")]
  167. [e] msg [show("@")]
  168. [e] msg [show("#")]
  169.  
  170. msg %_The following are the days of the week:
  171. fset showwd(x) "wkday("+x+") = " + wkday(x) + "%"
  172. msg [showwd(0)]
  173. msg [showwd(1)]
  174. msg [showwd(2)]
  175. msg [showwd(3)]
  176. msg [showwd(4)]
  177. msg [showwd(5)]
  178. msg [showwd(6)]
  179.  
  180. msg %_The following are the months of the year:
  181. fset showmon(x) "mon("+x+") = "+mon(x)+"%"
  182. msg [showmon(1)]
  183. msg [showmon(2)]
  184. msg [showmon(3)]
  185. msg [showmon(4)]
  186. msg [showmon(5)]
  187. msg [showmon(6)]
  188. msg [showmon(7)]
  189. msg [showmon(8)]
  190. msg [showmon(9)]
  191. msg [showmon(10)]
  192. msg [showmon(11)]
  193. msg [showmon(12)]
  194.