STR.DBD 1.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143
  1. <Str
  2. {Str$Delete
  3. S A V O L1
  4. P 8 C2
  5. L 6 C2
  6. I -6 C2
  7. Le -4 C2
  8. }
  9. {Str$Insert
  10. S1 E V O L1
  11. S2 8 O L1
  12. P 6 C2
  13. L -A C2
  14. C -8 C2
  15. J -6 C2
  16. I -4 C2
  17. }
  18. {Str$Item
  19. R 2E V O L1
  20. S 28 O L1
  21. T 8 S20 L1
  22. N 6 C2
  23. L -A C2
  24. HR -8 C2
  25. J -6 C2
  26. I -4 C2
  27. }
  28. {Str$ItemS
  29. R 14 V O L1
  30. S E O L1
  31. T 8 O L1
  32. N 6 C2
  33. I -24 C2
  34. CS -22 S20 L1
  35. }
  36. {Str$Match
  37. {Str@Rmatch
  38. s E V O L1
  39. i C C2
  40. p 6 V O L1
  41. j 4 C2
  42. k -7 C2
  43. matched -5 B1
  44. }
  45. Source C O L1
  46. Pattern 6 O L1
  47. }
  48. {Str$FixRealToStr
  49. V 12 F8
  50. Precision 10 C2
  51. S A V O L1
  52. OK 6 V B1
  53. NoDigits -14 B1
  54. c -13 L1
  55. X -12 AA C2[0..9] C1
  56. l -8 C2
  57. i -6 C2
  58. j -4 C2
  59. }
  60. {Str$CheckBase
  61. b 6 V C2
  62. }
  63. {Str$Reverse
  64. s A V O L1
  65. l 8 C2
  66. h 6 C2
  67. T -3 L1
  68. }
  69. {Str$IntToStr
  70. V 12 I4
  71. S C V O L1
  72. Base A C2
  73. OK 6 V B1
  74. b -A C4
  75. l -6 C2
  76. i -4 C2
  77. }
  78. {Str$CardToStr
  79. V 12 C4
  80. S C V O L1
  81. Base A C2
  82. OK 6 V B1
  83. b -A C4
  84. l -6 C2
  85. i -4 C2
  86. }
  87. {Str$StrToCI
  88. S C O L1
  89. Base A C2
  90. OK 6 V B1
  91. x -14 C1
  92. c -13 L1
  93. y -12 C4
  94. t -E C4
  95. b -A C4
  96. l -6 C2
  97. i -4 C2
  98. }
  99. {Str$StrToInt
  100. S C O L1
  101. Base A C2
  102. OK 6 V B1
  103. t -6 C4
  104. }
  105. {Str$StrToCard
  106. S C O L1
  107. Base A C2
  108. OK 6 V B1
  109. t -6 C4
  110. }
  111. {Str$StrToReal
  112. S A O L1
  113. OK 6 V B1
  114. Neg -1B B1
  115. p10 -1A F8
  116. res -12 F8
  117. i -A C2
  118. after -8 I2
  119. exp -6 I2
  120. expsign -4 L1
  121. c -3 L1
  122. }
  123. {Str$RealToStr
  124. V 14 F8
  125. Precision 12 C2
  126. Eng 10 B1
  127. S A V O L1
  128. OK 6 V B1
  129. FirstTime -30 B1
  130. tb -2F B1
  131. Str -2E A8 C2[0..7] L1
  132. m -26 I2
  133. Exp -24 I2
  134. t -22 F8
  135. r -1A F8
  136. l -12 C2
  137. j -10 C2
  138. i -E C2
  139. X -C AA C2[0..9] C1
  140. }
  141. Str@FloatUse B1
  142. >
  143.