home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD2.mdf / c / library / os2 / remind / src / tstlang.rem < prev    next >
Encoding:
Text File  |  1993-10-12  |  4.3 KB  |  201 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.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) + "%"
  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)]
  201.