home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1990 / 04 / tricks / strings.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1990-01-15  |  7.7 KB  |  265 lines
  1. UNIT Strings;
  2.  
  3. INTERFACE
  4.  
  5. TYPE   Str_1    = STRING[  1];
  6. TYPE   Str_2    = STRING[  2];
  7. TYPE   Str_3    = STRING[  3];
  8. TYPE   Str_4    = STRING[  4];
  9. TYPE   Str_5    = STRING[  5];
  10. TYPE   Str_6    = STRING[  6];
  11. TYPE   Str_7    = STRING[  7];
  12. TYPE   Str_8    = STRING[  8];
  13. TYPE   Str_9    = STRING[  9];
  14. TYPE   Str_10    = STRING[ 10];
  15. TYPE   Str_11    = STRING[ 11];
  16. TYPE   Str_12    = STRING[ 12];
  17. TYPE   Str_13    = STRING[ 13];
  18. TYPE   Str_14    = STRING[ 14];
  19. TYPE   Str_15    = STRING[ 15];
  20. TYPE   Str_16    = STRING[ 16];
  21. TYPE   Str_17    = STRING[ 17];
  22. TYPE   Str_18    = STRING[ 18];
  23. TYPE   Str_19    = STRING[ 19];
  24. TYPE   Str_20    = STRING[ 20];
  25. TYPE   Str_21    = STRING[ 21];
  26. TYPE   Str_22    = STRING[ 22];
  27. TYPE   Str_23    = STRING[ 23];
  28. TYPE   Str_24    = STRING[ 24];
  29. TYPE   Str_25    = STRING[ 25];
  30. TYPE   Str_26    = STRING[ 26];
  31. TYPE   Str_27    = STRING[ 27];
  32. TYPE   Str_28    = STRING[ 28];
  33. TYPE   Str_29    = STRING[ 29];
  34. TYPE   Str_30    = STRING[ 30];
  35. TYPE   Str_31    = STRING[ 31];
  36. TYPE   Str_32    = STRING[ 32];
  37. TYPE   Str_33    = STRING[ 33];
  38. TYPE   Str_34    = STRING[ 34];
  39. TYPE   Str_35    = STRING[ 35];
  40. TYPE   Str_36    = STRING[ 36];
  41. TYPE   Str_37    = STRING[ 37];
  42. TYPE   Str_38    = STRING[ 38];
  43. TYPE   Str_39    = STRING[ 39];
  44. TYPE   Str_40    = STRING[ 40];
  45. TYPE   Str_41    = STRING[ 41];
  46. TYPE   Str_42    = STRING[ 42];
  47. TYPE   Str_43    = STRING[ 43];
  48. TYPE   Str_44    = STRING[ 44];
  49. TYPE   Str_45    = STRING[ 45];
  50. TYPE   Str_46    = STRING[ 46];
  51. TYPE   Str_47    = STRING[ 47];
  52. TYPE   Str_48    = STRING[ 48];
  53. TYPE   Str_49    = STRING[ 49];
  54. TYPE   Str_50    = STRING[ 50];
  55. TYPE   Str_51    = STRING[ 51];
  56. TYPE   Str_52    = STRING[ 52];
  57. TYPE   Str_53    = STRING[ 53];
  58. TYPE   Str_54    = STRING[ 54];
  59. TYPE   Str_55    = STRING[ 55];
  60. TYPE   Str_56    = STRING[ 56];
  61. TYPE   Str_57    = STRING[ 57];
  62. TYPE   Str_58    = STRING[ 58];
  63. TYPE   Str_59    = STRING[ 59];
  64. TYPE   Str_60    = STRING[ 60];
  65. TYPE   Str_61    = STRING[ 61];
  66. TYPE   Str_62    = STRING[ 62];
  67. TYPE   Str_63    = STRING[ 63];
  68. TYPE   Str_64    = STRING[ 64];
  69. TYPE   Str_65    = STRING[ 65];
  70. TYPE   Str_66    = STRING[ 66];
  71. TYPE   Str_67    = STRING[ 67];
  72. TYPE   Str_68    = STRING[ 68];
  73. TYPE   Str_69    = STRING[ 69];
  74. TYPE   Str_70    = STRING[ 70];
  75. TYPE   Str_71    = STRING[ 71];
  76. TYPE   Str_72    = STRING[ 72];
  77. TYPE   Str_73    = STRING[ 73];
  78. TYPE   Str_74    = STRING[ 74];
  79. TYPE   Str_75    = STRING[ 75];
  80. TYPE   Str_76    = STRING[ 76];
  81. TYPE   Str_77    = STRING[ 77];
  82. TYPE   Str_78    = STRING[ 78];
  83. TYPE   Str_79    = STRING[ 79];
  84. TYPE   Str_80    = STRING[ 80];
  85. TYPE   Str_81    = STRING[ 81];
  86. TYPE   Str_82    = STRING[ 82];
  87. TYPE   Str_83    = STRING[ 83];
  88. TYPE   Str_84    = STRING[ 84];
  89. TYPE   Str_85    = STRING[ 85];
  90. TYPE   Str_86    = STRING[ 86];
  91. TYPE   Str_87    = STRING[ 87];
  92. TYPE   Str_88    = STRING[ 88];
  93. TYPE   Str_89    = STRING[ 89];
  94. TYPE   Str_90    = STRING[ 90];
  95. TYPE   Str_91    = STRING[ 91];
  96. TYPE   Str_92    = STRING[ 92];
  97. TYPE   Str_93    = STRING[ 93];
  98. TYPE   Str_94    = STRING[ 94];
  99. TYPE   Str_95    = STRING[ 95];
  100. TYPE   Str_96    = STRING[ 96];
  101. TYPE   Str_97    = STRING[ 97];
  102. TYPE   Str_98    = STRING[ 98];
  103. TYPE   Str_99    = STRING[ 99];
  104. TYPE   Str_100    = STRING[100];
  105. TYPE   Str_101    = STRING[101];
  106. TYPE   Str_102    = STRING[102];
  107. TYPE   Str_103    = STRING[103];
  108. TYPE   Str_104    = STRING[104];
  109. TYPE   Str_105    = STRING[105];
  110. TYPE   Str_106    = STRING[106];
  111. TYPE   Str_107    = STRING[107];
  112. TYPE   Str_108    = STRING[108];
  113. TYPE   Str_109    = STRING[109];
  114. TYPE   Str_110    = STRING[110];
  115. TYPE   Str_111    = STRING[111];
  116. TYPE   Str_112    = STRING[112];
  117. TYPE   Str_113    = STRING[113];
  118. TYPE   Str_114    = STRING[114];
  119. TYPE   Str_115    = STRING[115];
  120. TYPE   Str_116    = STRING[116];
  121. TYPE   Str_117    = STRING[117];
  122. TYPE   Str_118    = STRING[118];
  123. TYPE   Str_119    = STRING[119];
  124. TYPE   Str_120    = STRING[120];
  125. TYPE   Str_121    = STRING[121];
  126. TYPE   Str_122    = STRING[122];
  127. TYPE   Str_123    = STRING[123];
  128. TYPE   Str_124    = STRING[124];
  129. TYPE   Str_125    = STRING[125];
  130. TYPE   Str_126    = STRING[126];
  131. TYPE   Str_127    = STRING[127];
  132. TYPE   Str_128    = STRING[128];
  133. TYPE   Str_129    = STRING[129];
  134. TYPE   Str_130    = STRING[130];
  135. TYPE   Str_131    = STRING[131];
  136. TYPE   Str_132    = STRING[132];
  137. TYPE   Str_133    = STRING[133];
  138. TYPE   Str_134    = STRING[134];
  139. TYPE   Str_135    = STRING[135];
  140. TYPE   Str_136    = STRING[136];
  141. TYPE   Str_137    = STRING[137];
  142. TYPE   Str_138    = STRING[138];
  143. TYPE   Str_139    = STRING[139];
  144. TYPE   Str_140    = STRING[140];
  145. TYPE   Str_141    = STRING[141];
  146. TYPE   Str_142    = STRING[142];
  147. TYPE   Str_143    = STRING[143];
  148. TYPE   Str_144    = STRING[144];
  149. TYPE   Str_145    = STRING[145];
  150. TYPE   Str_146    = STRING[146];
  151. TYPE   Str_147    = STRING[147];
  152. TYPE   Str_148    = STRING[148];
  153. TYPE   Str_149    = STRING[149];
  154. TYPE   Str_150    = STRING[150];
  155. TYPE   Str_151    = STRING[151];
  156. TYPE   Str_152    = STRING[152];
  157. TYPE   Str_153    = STRING[153];
  158. TYPE   Str_154    = STRING[154];
  159. TYPE   Str_155    = STRING[155];
  160. TYPE   Str_156    = STRING[156];
  161. TYPE   Str_157    = STRING[157];
  162. TYPE   Str_158    = STRING[158];
  163. TYPE   Str_159    = STRING[159];
  164. TYPE   Str_160    = STRING[160];
  165. TYPE   Str_161    = STRING[161];
  166. TYPE   Str_162    = STRING[162];
  167. TYPE   Str_163    = STRING[163];
  168. TYPE   Str_164    = STRING[164];
  169. TYPE   Str_165    = STRING[165];
  170. TYPE   Str_166    = STRING[166];
  171. TYPE   Str_167    = STRING[167];
  172. TYPE   Str_168    = STRING[168];
  173. TYPE   Str_169    = STRING[169];
  174. TYPE   Str_170    = STRING[170];
  175. TYPE   Str_171    = STRING[171];
  176. TYPE   Str_172    = STRING[172];
  177. TYPE   Str_173    = STRING[173];
  178. TYPE   Str_174    = STRING[174];
  179. TYPE   Str_175    = STRING[175];
  180. TYPE   Str_176    = STRING[176];
  181. TYPE   Str_177    = STRING[177];
  182. TYPE   Str_178    = STRING[178];
  183. TYPE   Str_179    = STRING[179];
  184. TYPE   Str_180    = STRING[180];
  185. TYPE   Str_181    = STRING[181];
  186. TYPE   Str_182    = STRING[182];
  187. TYPE   Str_183    = STRING[183];
  188. TYPE   Str_184    = STRING[184];
  189. TYPE   Str_185    = STRING[185];
  190. TYPE   Str_186    = STRING[186];
  191. TYPE   Str_187    = STRING[187];
  192. TYPE   Str_188    = STRING[188];
  193. TYPE   Str_189    = STRING[189];
  194. TYPE   Str_190    = STRING[190];
  195. TYPE   Str_191    = STRING[191];
  196. TYPE   Str_192    = STRING[192];
  197. TYPE   Str_193    = STRING[193];
  198. TYPE   Str_194    = STRING[194];
  199. TYPE   Str_195    = STRING[195];
  200. TYPE   Str_196    = STRING[196];
  201. TYPE   Str_197    = STRING[197];
  202. TYPE   Str_198    = STRING[198];
  203. TYPE   Str_199    = STRING[199];
  204. TYPE   Str_200    = STRING[200];
  205. TYPE   Str_201    = STRING[201];
  206. TYPE   Str_202    = STRING[202];
  207. TYPE   Str_203    = STRING[203];
  208. TYPE   Str_204    = STRING[204];
  209. TYPE   Str_205    = STRING[205];
  210. TYPE   Str_206    = STRING[206];
  211. TYPE   Str_207    = STRING[207];
  212. TYPE   Str_208    = STRING[208];
  213. TYPE   Str_209    = STRING[209];
  214. TYPE   Str_210    = STRING[210];
  215. TYPE   Str_211    = STRING[211];
  216. TYPE   Str_212    = STRING[212];
  217. TYPE   Str_213    = STRING[213];
  218. TYPE   Str_214    = STRING[214];
  219. TYPE   Str_215    = STRING[215];
  220. TYPE   Str_216    = STRING[216];
  221. TYPE   Str_217    = STRING[217];
  222. TYPE   Str_218    = STRING[218];
  223. TYPE   Str_219    = STRING[219];
  224. TYPE   Str_220    = STRING[220];
  225. TYPE   Str_221    = STRING[221];
  226. TYPE   Str_222    = STRING[222];
  227. TYPE   Str_223    = STRING[223];
  228. TYPE   Str_224    = STRING[224];
  229. TYPE   Str_225    = STRING[225];
  230. TYPE   Str_226    = STRING[226];
  231. TYPE   Str_227    = STRING[227];
  232. TYPE   Str_228    = STRING[228];
  233. TYPE   Str_229    = STRING[229];
  234. TYPE   Str_230    = STRING[230];
  235. TYPE   Str_231    = STRING[231];
  236. TYPE   Str_232    = STRING[232];
  237. TYPE   Str_233    = STRING[233];
  238. TYPE   Str_234    = STRING[234];
  239. TYPE   Str_235    = STRING[235];
  240. TYPE   Str_236    = STRING[236];
  241. TYPE   Str_237    = STRING[237];
  242. TYPE   Str_238    = STRING[238];
  243. TYPE   Str_239    = STRING[239];
  244. TYPE   Str_240    = STRING[240];
  245. TYPE   Str_241    = STRING[241];
  246. TYPE   Str_242    = STRING[242];
  247. TYPE   Str_243    = STRING[243];
  248. TYPE   Str_244    = STRING[244];
  249. TYPE   Str_245    = STRING[245];
  250. TYPE   Str_246    = STRING[246];
  251. TYPE   Str_247    = STRING[247];
  252. TYPE   Str_248    = STRING[248];
  253. TYPE   Str_249    = STRING[249];
  254. TYPE   Str_250    = STRING[250];
  255. TYPE   Str_251    = STRING[251];
  256. TYPE   Str_252    = STRING[252];
  257. TYPE   Str_253    = STRING[253];
  258. TYPE   Str_254    = STRING[254];
  259. TYPE   Str_255    = STRING[255];
  260.  
  261.  
  262. IMPLEMENTATION
  263.  
  264. END.
  265.