LIB.DBD 1.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107
  1. <Lib
  2. {Lib$HSort
  3. N E C2
  4. Less A Q4
  5. Swap 6 Q4
  6. k -8 C2
  7. j -6 C2
  8. i -4 C2
  9. }
  10. {Lib$QSort
  11. {Lib@Sort
  12. l 6 C2
  13. r 4 C2
  14. j -8 C2
  15. i -6 C2
  16. }
  17. N E C2
  18. Less A Q4
  19. Swap 6 Q4
  20. }
  21. {Lib$Execute
  22. {Lib@GiveBackHeap
  23. StoreAddr 6 P C2
  24. StoreLen 4 C2
  25. temp -1A C2
  26. R -18 #57A
  27. [57A 14
  28. AL 0 C1
  29. AH 1 C1
  30. BL 2 C1
  31. BH 3 C1
  32. CL 4 C1
  33. CH 5 C1
  34. DL 6 C1
  35. DH 7 C1
  36. AX 0 C2
  37. BX 2 C2
  38. CX 4 C2
  39. DX 6 C2
  40. BP 8 C2
  41. SI A C2
  42. DI C C2
  43. DS E C2
  44. ES 10 C2
  45. Flags 12 S2 C2[0..F]
  46. ]
  47. }
  48. {Lib@RetrieveHeap
  49. R -18 #57A
  50. }
  51. Name 12 O L1
  52. CommandLine C O L1
  53. StoreAddr 8 P C2
  54. StoreLen 6 C2
  55. residue -16A C2
  56. MaxProgSize -168 C2
  57. Progbase -166 C2
  58. LoadRec -164 #1676
  59. [1676 E
  60. envseg 0 C2
  61. comline 2 P C2
  62. FCB1 6 P C2
  63. FCB2 A P C2
  64. ]
  65. reply -156 C2
  66. cline -154 #1620
  67. [1620 101
  68. len 0 C1
  69. txt 1 A100 C2[0..FF] L1
  70. ]
  71. fullpath -53 A51 C2[0..50] L1
  72. }
  73. {Lib$SetUpHistory
  74. Seed 6 C2
  75. i -8 C2
  76. x -6 C4
  77. }
  78. {Lib$RANDOM
  79. Range 6 C2
  80. res -4 C2
  81. }
  82. {Lib$RANDOMIZE
  83. R -16 #57A
  84. }
  85. {Lib$RAND
  86. x -6 #1661
  87. [1661 4
  88. low 0 C2
  89. high 2 C2
  90. ]
  91. }
  92. {Lib$MathError
  93. R C F8
  94. STR 6 O L1
  95. str -2B A29 C2[0..28] L1
  96. }
  97. {Lib$MathError2
  98. R1 14 F8
  99. R2 C F8
  100. STR 6 O L1
  101. str -2B A29 C2[0..28] L1
  102. }
  103. Lib@History A6E C2[0..36] C2
  104. Lib@LowerPtr C2
  105. Lib@HistoryPtr C2
  106. >
  107.