libhmd.pas 51 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118
  1. // libhmd.h: Hierarchical Modeling Data Library
  2. unit libhmd;
  3. interface
  4. uses libgte, libgs;
  5. const
  6. GsUNIT_TERM = $ffffffff; // Primitive terminater
  7. GsUNIT_DIV1 = 1 shl 24; // 2 x 2 divide
  8. GsUNIT_DIV2 = 2 shl 24; // 4 x 4 divide
  9. GsUNIT_DIV3 = 3 shl 24; // 8 x 8 divide
  10. GsUNIT_DIV4 = 4 shl 24; // 16 x 16 divide
  11. GsUNIT_DIV5 = 5 shl 24; // 32 x 32 divide
  12. type
  13. PGsCOORDUNIT = ^GsCOORDUNIT;
  14. GsCOORDUNIT = packed record
  15. flg : dword;
  16. matrix : MATRIX;
  17. workm : MATRIX;
  18. rot : SVECTOR;
  19. super : PGsCOORDUNIT;
  20. end;
  21. PGsVIEWUNIT = ^GsVIEWUNIT;
  22. GsVIEWUNIT = packed record
  23. view : MATRIX;
  24. super : PGsCOORDUNIT;
  25. end;
  26. PGsRVIEWUNIT = ^GsRVIEWUNIT;
  27. GsRVIEWUNIT = packed record
  28. vpx, vpy, vpz : longint;
  29. vrx, vry, vrz : longint;
  30. rz : longint;
  31. super : PGsRVIEWUNIT;
  32. end;
  33. PGsUNIT = ^GsUNIT;
  34. GsUNIT = packed record
  35. coord : PGsCOORDUNIT; // local dmatrix
  36. primtop : pdword;
  37. end;
  38. PGsTYPEUNIT = ^GsTYPEUNIT;
  39. GsTYPEUNIT = packed record
  40. _type : dword;
  41. ptr : pointer;
  42. end;
  43. PGsARGUNIT = ^GsARGUNIT;
  44. GsARGUNIT = packed record
  45. primp : pdword;
  46. tagp : PGsOT;
  47. shift : longint;
  48. offset : longint;
  49. out_packetp : PPACKET;
  50. end;
  51. PGsWORKUNIT = ^GsWORKUNIT;
  52. GsWORKUNIT = packed record
  53. vec : DVECTOR;
  54. otz : smallint;
  55. p : smallint;
  56. end;
  57. GsARGUNIT_NORMAL = packed record
  58. primp : pdword;
  59. tagp : PGsOT;
  60. shift : longint;
  61. offset : longint;
  62. out_packetp : PPACKET;
  63. primtop : pdword;
  64. vertop : PSVECTOR;
  65. nortop : PSVECTOR;
  66. end;
  67. GsARGUNIT_SHARED = packed record
  68. primp : pdword;
  69. tagp : PGsOT;
  70. shift : longint;
  71. offset : longint;
  72. out_packetp : PPACKET;
  73. primtop : pdword;
  74. vertop : PSVECTOR;
  75. vertop2 : PGsWORKUNIT;
  76. nortop : PSVECTOR;
  77. nortop2 : PSVECTOR;
  78. end;
  79. GsARGUNIT_IMAGE = packed record
  80. primp : pdword;
  81. tagp : PGsOT;
  82. shift : longint;
  83. offset : longint;
  84. out_packetp : PPACKET;
  85. imagetop : pdword;
  86. cluttop : pdword;
  87. end;
  88. GsARGUNIT_GND = packed record
  89. primp : pdword;
  90. tagp : PGsOT;
  91. shift : longint;
  92. offset : longint;
  93. out_packetp : PPACKET;
  94. polytop : pdword;
  95. boxtop : pdword;
  96. pointtop : pdword;
  97. nortop : PSVECTOR;
  98. end;
  99. GsARGUNIT_GNDT = packed record
  100. primp : pdword;
  101. tagp : PGsOT;
  102. shift : longint;
  103. offset : longint;
  104. out_packetp : PPACKET;
  105. polytop : pdword;
  106. boxtop : pdword;
  107. pointtop : pdword;
  108. nortop : PSVECTOR;
  109. uvtop : pdword;
  110. end;
  111. GsARGUNIT_CAMERA = packed record
  112. primp : pdword;
  113. tagp : PGsOT;
  114. shift : longint;
  115. offset : longint;
  116. out_packetp : PPACKET;
  117. cparam : pdword;
  118. coord : PGsCOORDUNIT;
  119. rcoord : PGsCOORDUNIT;
  120. end;
  121. GsARGUNIT_LIGHT = packed record
  122. primp : pdword;
  123. tagp : PGsOT;
  124. shift : longint;
  125. offset : longint;
  126. out_packetp : PPACKET;
  127. lparam : pdword;
  128. coord : PGsCOORDUNIT;
  129. rcoord : PGsCOORDUNIT;
  130. end;
  131. GsARGUNIT_JntMIMe = packed record
  132. primp : pdword;
  133. tagp : PGsOT;
  134. shift : longint;
  135. offset : longint;
  136. out_packetp : PPACKET;
  137. coord_sect : pdword;
  138. mimepr : plongint;
  139. mimenum : dword;
  140. mimeid, reserved : smallint;
  141. mime_diff_sect : pdword;
  142. end;
  143. GsARGUNIT_RstJntMIMe = packed record
  144. primp : pdword;
  145. tagp : PGsOT;
  146. shift : longint;
  147. offset : longint;
  148. out_packetp : PPACKET;
  149. coord_sect : pdword;
  150. mimeid, reserved : smallint;
  151. mime_diff_sect : pdword;
  152. end;
  153. GsARGUNIT_VNMIMe = packed record
  154. primp : pdword;
  155. tagp : PGsOT;
  156. shift : longint;
  157. offset : longint;
  158. out_packetp : PPACKET;
  159. mimepr : plongint;
  160. mimenum : dword;
  161. mimeid, reserved : smallint;
  162. mime_diff_sect : pdword;
  163. orgs_vn_sect : PSVECTOR;
  164. vert_sect : PSVECTOR;
  165. norm_sect : PSVECTOR;
  166. end;
  167. GsARGUNIT_RstVNMIMe = packed record
  168. primp : pdword;
  169. tagp : PGsOT;
  170. shift : longint;
  171. offset : longint;
  172. out_packetp : PPACKET;
  173. mimeid, reserved : smallint;
  174. mime_diff_sect : pdword;
  175. orgs_vn_sect : PSVECTOR;
  176. vert_sect : PSVECTOR;
  177. norm_sect : PSVECTOR;
  178. end;
  179. PGsARGUNIT_ANIM = ^GsARGUNIT_ANIM;
  180. GsARGUNIT_ANIM = packed record
  181. primp : pdword;
  182. tagp : PGsOT;
  183. shift : longint;
  184. offset : longint;
  185. out_packetp : PPACKET;
  186. header_size : longint;
  187. htop : pdword;
  188. ctop : pdword;
  189. ptop : pdword;
  190. end;
  191. GsSEH = packed record
  192. idx : smallint;
  193. sid : byte;
  194. pad : byte;
  195. end;
  196. PGsSEQ = ^GsSEQ;
  197. GsSEQ = packed record
  198. rewrite_idx : dword;
  199. size, num : word;
  200. ii : word;
  201. aframe : word;
  202. sid : byte;
  203. speed : shortint;
  204. srcii : word;
  205. rframe : smallint;
  206. tframe : word;
  207. ci, ti : word;
  208. start : word;
  209. start_sid : byte;
  210. traveling : byte;
  211. end;
  212. PPGsSEQ = ^PGsSEQ;
  213. // GsTYPEUNIT code macro
  214. const
  215. GsUF3 = $00000008; // flat triangle
  216. GsUFT3 = $00000009; // texture flat triangle
  217. GsUG3 = $0000000c; // gour triangle
  218. GsUGT3 = $0000000d; // texture gour triangle
  219. GsUF4 = $00000010; // flat quad
  220. GsUFT4 = $00000011; // texture flat quad
  221. GsUG4 = $00000014; // gour quad
  222. GsUGT4 = $00000015; // texture gour quad
  223. GsUFF3 = $00020008; // fog flat triangle
  224. GsUFFT3 = $00020009; // fog texture flat triangle
  225. GsUFG3 = $0002000c; // fog gour triangle
  226. GsUFGT3 = $0002000d; // fog texture gour triangle
  227. GsUFF4 = $00020010; // fog flat quad
  228. GsUFFT4 = $00020011; // fog texture flat quad
  229. GsUFG4 = $00020014; // fog gour quad
  230. GsUFGT4 = $00020015; // fog texture gour quad
  231. GsUCF3 = $0000000a; // colored flat triangle
  232. GsUCFT3 = $0000000b; // colored texture flat triangle
  233. GsUCG3 = $0000000e; // colored gour triangle
  234. GsUCGT3 = $0000000f; // colored texture gour triangle
  235. GsUCF4 = $00000012; // colored flat quad
  236. GsUCFT4 = $00000013; // colored texture flat quad
  237. GsUCG4 = $00000016; // colored gour quad
  238. GsUCGT4 = $00000017; // colored texture gour quad
  239. GsUNF3 = $00040048; // nonLight flat triangle
  240. GsUNFT3 = $00040049; // nonLight texture flat triangle
  241. GsUNG3 = $0004004c; // nonLight gouraud triangle
  242. GsUNGT3 = $0004004d; // nonLight texture gouraud triangle
  243. GsUNF4 = $00040050; // nonLight flat quad
  244. GsUNFT4 = $00040051; // nonLight texture flat quad
  245. GsUNG4 = $00040054; // nonLight gouraud quad
  246. GsUNGT4 = $00040055; // nonLight texture gouraud quad
  247. GsUDF3 = $00010008; // div flat triangle
  248. GsUDFT3 = $00010009; // div texture flat triangle
  249. GsUDG3 = $0001000c; // div gour triangle
  250. GsUDGT3 = $0001000d; // div texture gour triangle
  251. GsUDF4 = $00010010; // div flat quad
  252. GsUDFT4 = $00010011; // div texture flat quad
  253. GsUDG4 = $00010014; // div gour quad
  254. GsUDGT4 = $00010015; // div texture gour quad
  255. GsUDFF3 = $00030008; // div fog flat triangle
  256. GsUDFFT3 = $00030009; // div fog texture flat triangle
  257. GsUDFG3 = $0003000c; // div fog gour triangle
  258. GsUDFGT3 = $0003000d; // div fog texture gour triangle
  259. GsUDFF4 = $00030010; // div fog flat quad
  260. GsUDFFT4 = $00030011; // div fog texture flat quad
  261. GsUDFG4 = $00030014; // div fog gour quad
  262. GsUDFGT4 = $00030015; // div fog texture gour quad
  263. GsUDNF3 = $00050048; // div nonLight flat triangle
  264. GsUDNFT3 = $00050049; // div nonLight texture flat triangle
  265. GsUDNG3 = $0005004c; // div nonLight gouraud triangle
  266. GsUDNGT3 = $0005004d; // div nonLight tex gouraud triangle
  267. GsUDNF4 = $00050050; // div nonLight flat quad
  268. GsUDNFT4 = $00050051; // div nonLight texture flat quad
  269. GsUDNG4 = $00050054; // div nonLight gouraud quad
  270. GsUDNGT4 = $00050055; // div nonLight tex gouraud quad
  271. GsUSCAL = $01000000; // shared calculate vertex and normal
  272. GsUSG3 = $0100000c; // shared gour triangle
  273. GsUSGT3 = $0100000d; // shared texture gour triangle
  274. GsUSG4 = $01000014; // shared gour quad
  275. GsUSGT4 = $01000015; // shared texture gour quad
  276. GsUSTGT3 = $0100020d; // shared tile texture gour triangle
  277. GsUSTGT4 = $01000215; // shared tile texture gour quad
  278. GsUSFG3 = $0102000c; // shared fog gour triangle
  279. GsUSFGT3 = $0102000d; // shared fog texture gour triangle
  280. GsUSFG4 = $01020014; // shared fog gour quad
  281. GsUSFGT4 = $01020015; // shared fog texture gour quad
  282. GsUSNF3 = $01040048; // shared nonLight flat tri
  283. GsUSNFT3 = $01040049; // shared nonLight texture flat tri
  284. GsUSNG3 = $0104004c; // shared nonLight gour tri
  285. GsUSNGT3 = $0104004d; // shared nonLight texture gour tri
  286. GsUSNF4 = $01040050; // shared nonLight flat quad
  287. GsUSNFT4 = $01040051; // shared nonLight texture flat quad
  288. GsUSNG4 = $01040054; // shared nonLight gour quad
  289. GsUSNGT4 = $01040055; // shared nonLight texture gour quad
  290. GsUMF3 = $00000018; // mesh flat tri
  291. GsUMFT3 = $00000019; // mesh texture flat tri
  292. GsUMG3 = $0000001c; // mesh gour triangle
  293. GsUMGT3 = $0000001d; // mesh texture gour triangle
  294. GsUMNF3 = $00040058; // mesh nonLight flat tri
  295. GsUMNFT3 = $00040059; // mesh nonLight tex flat tri
  296. GsUMNG3 = $0004005c; // mesh nonLight gour triangle
  297. GsUMNGT3 = $0004005d; // mesh nonLight tex gour tri
  298. GsUTFT3 = $00000209; // tile texture flat triangle
  299. GsUTGT3 = $0000020d; // tile texture gour triangle
  300. GsUTFT4 = $00000211; // tile texture flat quad
  301. GsUTGT4 = $00000215; // tile texture gour quad
  302. GsUPNF3 = $00040148; // preset nonLight flat triangle
  303. GsUPNFT3 = $00040149; // preset nonLight tex flat triangle
  304. GsUPNG3 = $0004014c; // preset nonLight gouraud triangle
  305. GsUPNGT3 = $0004014d; // preset nonLight tex gour triangle
  306. GsUPNF4 = $00040150; // preset nonLight flat quad
  307. GsUPNFT4 = $00040151; // preset nonLight tex flat quad
  308. GsUPNG4 = $00040154; // preset nonLight gouraud quad
  309. GsUPNGT4 = $00040155; // preset nonLight tex gour quad
  310. GsUSTPF3 = $00200008; // semi-trans flat triangle
  311. GsUSTPFT3 = $00200009; // semi-trans texture flat triangle
  312. GsUSTPG3 = $0020000c; // semi-trans gour triangle
  313. GsUSTPGT3 = $0020000d; // semi-trans texture gour triangle
  314. GsUSTPF4 = $00200010; // semi-trans flat quad
  315. GsUSTPFT4 = $00200011; // semi-trans texture flat quad
  316. GsUSTPG4 = $00200014; // semi-trans gour quad
  317. GsUSTPGT4 = $00200015; // semi-trans texture gour quad
  318. GsUSTPSG3 = $0120000c; // semi-trans shared gour tri
  319. GsUSTPSGT3 = $0120000d; // semi-trans shared tex gour tri
  320. GsUSTPSG4 = $01200014; // semi-trans shared gour quad
  321. GsUSTPSGT4 = $01200015; // semi-trans shared tex gour quad
  322. GsUSTPNF3 = $00240048; // semi-trans nonLight flat tri
  323. GsUSTPNFT3 = $00240049; // semi-trans nonLight tex flat tri
  324. GsUSTPNG3 = $0024004c; // semi-trans nonLight gour tri
  325. GsUSTPNGT3 = $0024004d; // semi-trans nonLight tex gour tri
  326. GsUSTPNF4 = $00240050; // semi-trans nonLight flat quad
  327. GsUSTPNFT4 = $00240051; // semi-trans nonLight tex flat quad
  328. GsUSTPNG4 = $00240054; // semi-trans nonLight gour quad
  329. GsUSTPNGT4 = $00240055; // semi-trans nonLight tex gour quad
  330. GsUSTPSNF3 = $01240048; // stp shared nonLight flat tri
  331. GsUSTPSNFT3 = $01240049; // stp shared nonLight tex flat tri
  332. GsUSTPSNG3 = $0124004c; // stp shared nonLight gour tri
  333. GsUSTPSNGT3 = $0124004d; // stp shared nonLight tex gour tri
  334. GsUSTPSNF4 = $01240050; // stp shared nonLight flat quad
  335. GsUSTPSNFT4 = $01240051; // stp shared nonLight tex flat quad
  336. GsUSTPSNG4 = $01240054; // stp shared nonLight gour quad
  337. GsUSTPSNGT4 = $01240055; // stp shared nonLight tex gour quad
  338. GsUADF3 = $00080008; // active-div flat triangle
  339. GsUADFT3 = $00080009; // active-div texture flat triangle
  340. GsUADG3 = $0008000c; // active-div gour triangle
  341. GsUADGT3 = $0008000d; // active-div texture gour triangle
  342. GsUADF4 = $00080010; // active-div flat quad
  343. GsUADFT4 = $00080011; // active-div texture flat quad
  344. GsUADG4 = $00080014; // active-div gour quad
  345. GsUADGT4 = $00080015; // active-div texture gour quad
  346. GsUADFF3 = $000a0008; // active-div fog flat tri
  347. GsUADFFT3 = $000a0009; // active-div fog texture flat tri
  348. GsUADFG3 = $000a000c; // active-div fog gour tri
  349. GsUADFGT3 = $000a000d; // active-div fog texture gour tri
  350. GsUADFF4 = $000a0010; // active-div fog flat quad
  351. GsUADFFT4 = $000a0011; // active-div fog texture flat quad
  352. GsUADFG4 = $000a0014; // active-div fog gour quad
  353. GsUADFGT4 = $000a0015; // active-div fog texture gour quad
  354. GsUADNF3 = $000c0048; // active-div nonLight flat tri
  355. GsUADNFT3 = $000c0049; // active-div nonLight tex flat tri
  356. GsUADNG3 = $000c004c; // active-div nonLight gour tri
  357. GsUADNGT3 = $000c004d; // active-div nonLight tex gour tri
  358. GsUADNF4 = $000c0050; // active-div nonLight flat quad
  359. GsUADNFT4 = $000c0051; // active-div nonLight tex flat quad
  360. GsUADNG4 = $000c0054; // active-div nonLight gour quad
  361. GsUADNGT4 = $000c0055; // active-div nonLight tex gour quad
  362. GsUBF3 = $00100008; // back-f flat tri
  363. GsUBFT3 = $00100009; // back-f tex flat tri
  364. GsUBG3 = $0010000c; // back-f gour tri
  365. GsUBGT3 = $0010000d; // back-f tex gour tri
  366. GsUBF4 = $00100010; // back-f flat quad
  367. GsUBFT4 = $00100011; // back-f tex flat quad
  368. GsUBG4 = $00100014; // back-f gour quad
  369. GsUBGT4 = $00100015; // back-f tex gour quad
  370. GsUBCF3 = $0010000a; // back-f colored flat tri
  371. GsUBCFT3 = $0010000b; // back-f colored tex flat tri
  372. GsUBCG3 = $0010000e; // back-f colored gour tri
  373. GsUBCGT3 = $0010000f; // back-f colored tex gour tri
  374. GsUBCF4 = $00100012; // back-f colored flat quad
  375. GsUBCFT4 = $00100013; // back-f colored tex flat quad
  376. GsUBCG4 = $00100016; // back-f colored gour quad
  377. GsUBCGT4 = $00100017; // back-f colored tex gour quad
  378. GsUBSTPF3 = $00300008; // back-f semi-trans flat tri
  379. GsUBSTPFT3 = $00300009; // back-f semi-trans tex flat tri
  380. GsUBSTPG3 = $0030000c; // back-f semi-trans gour tri
  381. GsUBSTPGT3 = $0030000d; // back-f semi-trans tex gour tri
  382. GsUBSTPF4 = $00300010; // back-f semi-trans flat quad
  383. GsUBSTPFT4 = $00300011; // back-f semi-trans tex flat quad
  384. GsUBSTPG4 = $00300014; // back-f semi-trans gour quad
  385. GsUBSTPGT4 = $00300015; // back-f semi-trans tex gour quad
  386. GsUBNF3 = $00140048; // back-f noLgt flat tri
  387. GsUBNFT3 = $00140049; // back-f noLgt tex flat tri
  388. GsUBNG3 = $0014004c; // back-f noLgt gouraud tri
  389. GsUBNGT3 = $0014004d; // back-f noLgt tex gouraud tri
  390. GsUBNF4 = $00140050; // back-f noLgt flat quad
  391. GsUBNFT4 = $00140051; // back-f noLgt tex flat quad
  392. GsUBNG4 = $00140054; // back-f noLgt gouraud quad
  393. GsUBNGT4 = $00140055; // back-f noLgt tex gouraud quad
  394. GsUBSTPNF3 = $00340048; // back-f stp noLgt flat tri
  395. GsUBSTPNFT3 = $00340049; // back-f stp noLgt tex flat tri
  396. GsUBSTPNG3 = $0034004c; // back-f stp noLgt gour tri
  397. GsUBSTPNGT3 = $0034004d; // back-f stp noLgt tex gour tri
  398. GsUBSTPNF4 = $00340050; // back-f stp noLgt flat quad
  399. GsUBSTPNFT4 = $00340051; // back-f stp noLgt tex flat quad
  400. GsUBSTPNG4 = $00340054; // back-f stp noLgt gour quad
  401. GsUBSTPNGT4 = $00340055; // back-f stp noLgt tex gour quad
  402. GsUBSNF3 = $01140048; // back-f shrd noLgt flat tri
  403. GsUBSNFT3 = $01140049; // back-f shrd noLgt tex flat tri
  404. GsUBSNG3 = $0114004c; // back-f shrd noLgt gour tri
  405. GsUBSNGT3 = $0114004d; // back-f shrd noLgt tex gour tri
  406. GsUBSNF4 = $01140050; // back-f shrd noLgt flat quad
  407. GsUBSNFT4 = $01140051; // back-f shrd noLgt tex flat quad
  408. GsUBSNG4 = $01140054; // back-f shrd noLgt gour quad
  409. GsUBSNGT4 = $01140055; // back-f shrd noLgt tex gour quad
  410. GsUBSTPSNF3 = $01340048; // back-f stp shrd noLgt flat tri
  411. GsUBSTPSNFT3 = $01340049; // back-f stp shrd noLgt tex flat tri
  412. GsUBSTPSNG3 = $0134004c; // back-f stp shrd noLgt gour tri
  413. GsUBSTPSNGT3 = $0134004d; // back-f stp shrd noLgt tex gour tri
  414. GsUBSTPSNF4 = $01340050; // back-f stp shrd noLgt flat quad
  415. GsUBSTPSNFT4 = $01340051; // back-f stp shrd noLgt tex flat quad
  416. GsUBSTPSNG4 = $01340054; // back-f stp shrd noLgt gour quad
  417. GsUBSTPSNGT4 = $01340055; // back-f stp shrd noLgt tex gour quad
  418. GsUIMG0 = $02000000; // image data with no-clut
  419. GsUIMG1 = $02000001; // image data with clut
  420. GsUGNDF = $05000000; // ground flat
  421. GsUGNDFT = $05000001; // ground flat texture
  422. GsUSCAL2 = $06000100; // envmap shared calculate
  423. GsUE1G3 = $0600100c; // envmap 1D gour tri
  424. GsUE1G4 = $06001014; // envmap 1D gour quad
  425. GsUE1SG3 = $0600110c; // envmap 1D shared gour tri
  426. GsUE1SG4 = $06001114; // envmap 1D shared gour quad
  427. GsUE2LG3 = $0600200c; // envmap 2D reflect gour tri
  428. GsUE2LG4 = $06002014; // envmap 2D reflect gour quad
  429. GsUE2RG3 = $0600300c; // envmap 2D refract gour tri
  430. GsUE2RG4 = $06003014; // envmap 2D refract gour quad
  431. GsUE2RLG3 = $0600400c; // envmap 2D both gour tri
  432. GsUE2RLG4 = $06004014; // envmap 2D both gour quad
  433. GsUE2OLG3 = $0600500c; // envmap 2D org+reflect gour tri
  434. GsUE2OLG4 = $06005014; // envmap 2D org+reflect gour quad
  435. GsVtxMIMe = $04010020; // Vertex-MIMe
  436. GsNrmMIMe = $04010021; // Normal-MIMe
  437. GsRstVtxMIMe = $04010028; // Reset-Vertex-MIMe
  438. GsRstNrmMIMe = $04010029; // Reset-Normal-MIMe
  439. GsJntAxesMIMe = $04010010; // Joint-Axes-MIMe
  440. GsRstJntAxesMIMe = $04010018; // Reset-Joint-Axes-MIMe
  441. GsJntRPYMIMe = $04010011; // Joint-RPY-MIMe
  442. GsRstJntRPYMIMe = $04010019; // Reset-Joint-RPY-MIMe
  443. function GsU_00000008(arg: PGsARGUNIT): pdword; external;
  444. function GsU_00000009(arg: PGsARGUNIT): pdword; external;
  445. function GsU_0000000c(arg: PGsARGUNIT): pdword; external;
  446. function GsU_0000000d(arg: PGsARGUNIT): pdword; external;
  447. function GsU_00000010(arg: PGsARGUNIT): pdword; external;
  448. function GsU_00000020(arg: PGsARGUNIT): pdword; external;
  449. function GsU_00000011(arg: PGsARGUNIT): pdword; external;
  450. function GsU_00000014(arg: PGsARGUNIT): pdword; external;
  451. function GsU_00000015(arg: PGsARGUNIT): pdword; external;
  452. function GsU_00020008(arg: PGsARGUNIT): pdword; external;
  453. function GsU_00020009(arg: PGsARGUNIT): pdword; external;
  454. function GsU_0002000c(arg: PGsARGUNIT): pdword; external;
  455. function GsU_0002000d(arg: PGsARGUNIT): pdword; external;
  456. function GsU_00020010(arg: PGsARGUNIT): pdword; external;
  457. function GsU_00020011(arg: PGsARGUNIT): pdword; external;
  458. function GsU_00020014(arg: PGsARGUNIT): pdword; external;
  459. function GsU_00020015(arg: PGsARGUNIT): pdword; external;
  460. function GsU_0000000a(arg: PGsARGUNIT): pdword; external;
  461. function GsU_0000000b(arg: PGsARGUNIT): pdword; external;
  462. function GsU_0000000e(arg: PGsARGUNIT): pdword; external;
  463. function GsU_0000000f(arg: PGsARGUNIT): pdword; external;
  464. function GsU_00000012(arg: PGsARGUNIT): pdword; external;
  465. function GsU_00000013(arg: PGsARGUNIT): pdword; external;
  466. function GsU_00000016(arg: PGsARGUNIT): pdword; external;
  467. function GsU_00000017(arg: PGsARGUNIT): pdword; external;
  468. function GsU_00030008(arg: PGsARGUNIT): pdword; external;
  469. function GsU_00030009(arg: PGsARGUNIT): pdword; external;
  470. function GsU_0003000c(arg: PGsARGUNIT): pdword; external;
  471. function GsU_0003000d(arg: PGsARGUNIT): pdword; external;
  472. function GsU_00030010(arg: PGsARGUNIT): pdword; external;
  473. function GsU_00030011(arg: PGsARGUNIT): pdword; external;
  474. function GsU_00030014(arg: PGsARGUNIT): pdword; external;
  475. function GsU_00030015(arg: PGsARGUNIT): pdword; external;
  476. function GsU_00040048(arg: PGsARGUNIT): pdword; external;
  477. function GsU_00040049(arg: PGsARGUNIT): pdword; external;
  478. function GsU_0004004c(arg: PGsARGUNIT): pdword; external;
  479. function GsU_0004004d(arg: PGsARGUNIT): pdword; external;
  480. function GsU_00040050(arg: PGsARGUNIT): pdword; external;
  481. function GsU_00040051(arg: PGsARGUNIT): pdword; external;
  482. function GsU_00040054(arg: PGsARGUNIT): pdword; external;
  483. function GsU_00040055(arg: PGsARGUNIT): pdword; external;
  484. function GsU_00010008(arg: PGsARGUNIT): pdword; external;
  485. function GsU_00010009(arg: PGsARGUNIT): pdword; external;
  486. function GsU_0001000c(arg: PGsARGUNIT): pdword; external;
  487. function GsU_0001000d(arg: PGsARGUNIT): pdword; external;
  488. function GsU_00010010(arg: PGsARGUNIT): pdword; external;
  489. function GsU_00010011(arg: PGsARGUNIT): pdword; external;
  490. function GsU_00010014(arg: PGsARGUNIT): pdword; external;
  491. function GsU_00010015(arg: PGsARGUNIT): pdword; external;
  492. function GsU_00050048(arg: PGsARGUNIT): pdword; external;
  493. function GsU_00050049(arg: PGsARGUNIT): pdword; external;
  494. function GsU_0005004c(arg: PGsARGUNIT): pdword; external;
  495. function GsU_0005004d(arg: PGsARGUNIT): pdword; external;
  496. function GsU_00050050(arg: PGsARGUNIT): pdword; external;
  497. function GsU_00050051(arg: PGsARGUNIT): pdword; external;
  498. function GsU_00050054(arg: PGsARGUNIT): pdword; external;
  499. function GsU_00050055(arg: PGsARGUNIT): pdword; external;
  500. function GsU_00040058(arg: PGsARGUNIT): pdword; external;
  501. function GsU_00040059(arg: PGsARGUNIT): pdword; external;
  502. function GsU_0004005c(arg: PGsARGUNIT): pdword; external;
  503. function GsU_0004005d(arg: PGsARGUNIT): pdword; external;
  504. function GsU_01000000(arg: PGsARGUNIT): pdword; external;
  505. function GsU_0100000c(arg: PGsARGUNIT): pdword; external;
  506. function GsU_0100000d(arg: PGsARGUNIT): pdword; external;
  507. function GsU_01000014(arg: PGsARGUNIT): pdword; external;
  508. function GsU_01000015(arg: PGsARGUNIT): pdword; external;
  509. function GsU_0102000c(arg: PGsARGUNIT): pdword; external;
  510. function GsU_0102000d(arg: PGsARGUNIT): pdword; external;
  511. function GsU_01020014(arg: PGsARGUNIT): pdword; external;
  512. function GsU_01020015(arg: PGsARGUNIT): pdword; external;
  513. function GsU_01040048(arg: PGsARGUNIT): pdword; external;
  514. function GsU_01040049(arg: PGsARGUNIT): pdword; external;
  515. function GsU_0104004c(arg: PGsARGUNIT): pdword; external;
  516. function GsU_0104004d(arg: PGsARGUNIT): pdword; external;
  517. function GsU_01040050(arg: PGsARGUNIT): pdword; external;
  518. function GsU_01040051(arg: PGsARGUNIT): pdword; external;
  519. function GsU_01040054(arg: PGsARGUNIT): pdword; external;
  520. function GsU_01040055(arg: PGsARGUNIT): pdword; external;
  521. function GsU_00000018(arg: PGsARGUNIT): pdword; external;
  522. function GsU_00000019(arg: PGsARGUNIT): pdword; external;
  523. function GsU_0000001c(arg: PGsARGUNIT): pdword; external;
  524. function GsU_0000001d(arg: PGsARGUNIT): pdword; external;
  525. function GsU_00000209(arg: PGsARGUNIT): pdword; external;
  526. function GsU_0000020d(arg: PGsARGUNIT): pdword; external;
  527. function GsU_00000211(arg: PGsARGUNIT): pdword; external;
  528. function GsU_00000215(arg: PGsARGUNIT): pdword; external;
  529. function GsU_02000000(arg: PGsARGUNIT): pdword; external;
  530. function GsU_02000001(arg: PGsARGUNIT): pdword; external;
  531. function GsU_00040148(arg: PGsARGUNIT): pdword; external;
  532. function GsU_00040149(arg: PGsARGUNIT): pdword; external;
  533. function GsU_0004014c(arg: PGsARGUNIT): pdword; external;
  534. function GsU_0004014d(arg: PGsARGUNIT): pdword; external;
  535. function GsU_00040150(arg: PGsARGUNIT): pdword; external;
  536. function GsU_00040151(arg: PGsARGUNIT): pdword; external;
  537. function GsU_00040154(arg: PGsARGUNIT): pdword; external;
  538. function GsU_00040155(arg: PGsARGUNIT): pdword; external;
  539. function GsU_00200008(arg: PGsARGUNIT): pdword; external;
  540. function GsU_00200009(arg: PGsARGUNIT): pdword; external;
  541. function GsU_0020000c(arg: PGsARGUNIT): pdword; external;
  542. function GsU_0020000d(arg: PGsARGUNIT): pdword; external;
  543. function GsU_00200010(arg: PGsARGUNIT): pdword; external;
  544. function GsU_00200011(arg: PGsARGUNIT): pdword; external;
  545. function GsU_00200014(arg: PGsARGUNIT): pdword; external;
  546. function GsU_00200015(arg: PGsARGUNIT): pdword; external;
  547. function GsU_0120000c(arg: PGsARGUNIT): pdword; external;
  548. function GsU_0120000d(arg: PGsARGUNIT): pdword; external;
  549. function GsU_01200014(arg: PGsARGUNIT): pdword; external;
  550. function GsU_01200015(arg: PGsARGUNIT): pdword; external;
  551. function GsU_00240048(arg: PGsARGUNIT): pdword; external;
  552. function GsU_00240049(arg: PGsARGUNIT): pdword; external;
  553. function GsU_0024004c(arg: PGsARGUNIT): pdword; external;
  554. function GsU_0024004d(arg: PGsARGUNIT): pdword; external;
  555. function GsU_00240050(arg: PGsARGUNIT): pdword; external;
  556. function GsU_00240051(arg: PGsARGUNIT): pdword; external;
  557. function GsU_00240054(arg: PGsARGUNIT): pdword; external;
  558. function GsU_00240055(arg: PGsARGUNIT): pdword; external;
  559. function GsU_01240048(arg: PGsARGUNIT): pdword; external;
  560. function GsU_01240049(arg: PGsARGUNIT): pdword; external;
  561. function GsU_0124004c(arg: PGsARGUNIT): pdword; external;
  562. function GsU_0124004d(arg: PGsARGUNIT): pdword; external;
  563. function GsU_01240050(arg: PGsARGUNIT): pdword; external;
  564. function GsU_01240051(arg: PGsARGUNIT): pdword; external;
  565. function GsU_01240054(arg: PGsARGUNIT): pdword; external;
  566. function GsU_01240055(arg: PGsARGUNIT): pdword; external;
  567. function GsU_00080008(arg: PGsARGUNIT): pdword; external;
  568. function GsU_00080009(arg: PGsARGUNIT): pdword; external;
  569. function GsU_0008000c(arg: PGsARGUNIT): pdword; external;
  570. function GsU_0008000d(arg: PGsARGUNIT): pdword; external;
  571. function GsU_00080010(arg: PGsARGUNIT): pdword; external;
  572. function GsU_00080011(arg: PGsARGUNIT): pdword; external;
  573. function GsU_00080014(arg: PGsARGUNIT): pdword; external;
  574. function GsU_00080015(arg: PGsARGUNIT): pdword; external;
  575. function GsU_000a0008(arg: PGsARGUNIT): pdword; external;
  576. function GsU_000a0009(arg: PGsARGUNIT): pdword; external;
  577. function GsU_000a000c(arg: PGsARGUNIT): pdword; external;
  578. function GsU_000a000d(arg: PGsARGUNIT): pdword; external;
  579. function GsU_000a0010(arg: PGsARGUNIT): pdword; external;
  580. function GsU_000a0011(arg: PGsARGUNIT): pdword; external;
  581. function GsU_000a0014(arg: PGsARGUNIT): pdword; external;
  582. function GsU_000a0015(arg: PGsARGUNIT): pdword; external;
  583. function GsU_000c0048(arg: PGsARGUNIT): pdword; external;
  584. function GsU_000c0049(arg: PGsARGUNIT): pdword; external;
  585. function GsU_000c004c(arg: PGsARGUNIT): pdword; external;
  586. function GsU_000c004d(arg: PGsARGUNIT): pdword; external;
  587. function GsU_000c0050(arg: PGsARGUNIT): pdword; external;
  588. function GsU_000c0051(arg: PGsARGUNIT): pdword; external;
  589. function GsU_000c0054(arg: PGsARGUNIT): pdword; external;
  590. function GsU_000c0055(arg: PGsARGUNIT): pdword; external;
  591. function GsU_0100020d(arg: PGsARGUNIT): pdword; external;
  592. function GsU_01000215(arg: PGsARGUNIT): pdword; external;
  593. function GsU_00100008(arg: PGsARGUNIT): pdword; external;
  594. function GsU_00100009(arg: PGsARGUNIT): pdword; external;
  595. function GsU_0010000a(arg: PGsARGUNIT): pdword; external;
  596. function GsU_0010000b(arg: PGsARGUNIT): pdword; external;
  597. function GsU_0010000c(arg: PGsARGUNIT): pdword; external;
  598. function GsU_0010000d(arg: PGsARGUNIT): pdword; external;
  599. function GsU_0010000e(arg: PGsARGUNIT): pdword; external;
  600. function GsU_0010000f(arg: PGsARGUNIT): pdword; external;
  601. function GsU_00100010(arg: PGsARGUNIT): pdword; external;
  602. function GsU_00100011(arg: PGsARGUNIT): pdword; external;
  603. function GsU_00100012(arg: PGsARGUNIT): pdword; external;
  604. function GsU_00100013(arg: PGsARGUNIT): pdword; external;
  605. function GsU_00100014(arg: PGsARGUNIT): pdword; external;
  606. function GsU_00100015(arg: PGsARGUNIT): pdword; external;
  607. function GsU_00100016(arg: PGsARGUNIT): pdword; external;
  608. function GsU_00100017(arg: PGsARGUNIT): pdword; external;
  609. function GsU_00300008(arg: PGsARGUNIT): pdword; external;
  610. function GsU_00300009(arg: PGsARGUNIT): pdword; external;
  611. function GsU_0030000c(arg: PGsARGUNIT): pdword; external;
  612. function GsU_0030000d(arg: PGsARGUNIT): pdword; external;
  613. function GsU_00300010(arg: PGsARGUNIT): pdword; external;
  614. function GsU_00300011(arg: PGsARGUNIT): pdword; external;
  615. function GsU_00300014(arg: PGsARGUNIT): pdword; external;
  616. function GsU_00300015(arg: PGsARGUNIT): pdword; external;
  617. function GsU_00140048(arg: PGsARGUNIT): pdword; external;
  618. function GsU_00140049(arg: PGsARGUNIT): pdword; external;
  619. function GsU_0014004c(arg: PGsARGUNIT): pdword; external;
  620. function GsU_0014004d(arg: PGsARGUNIT): pdword; external;
  621. function GsU_00140050(arg: PGsARGUNIT): pdword; external;
  622. function GsU_00140051(arg: PGsARGUNIT): pdword; external;
  623. function GsU_00140054(arg: PGsARGUNIT): pdword; external;
  624. function GsU_00140055(arg: PGsARGUNIT): pdword; external;
  625. function GsU_00340048(arg: PGsARGUNIT): pdword; external;
  626. function GsU_00340049(arg: PGsARGUNIT): pdword; external;
  627. function GsU_0034004c(arg: PGsARGUNIT): pdword; external;
  628. function GsU_0034004d(arg: PGsARGUNIT): pdword; external;
  629. function GsU_00340050(arg: PGsARGUNIT): pdword; external;
  630. function GsU_00340051(arg: PGsARGUNIT): pdword; external;
  631. function GsU_00340054(arg: PGsARGUNIT): pdword; external;
  632. function GsU_00340055(arg: PGsARGUNIT): pdword; external;
  633. function GsU_01140048(arg: PGsARGUNIT): pdword; external;
  634. function GsU_01140049(arg: PGsARGUNIT): pdword; external;
  635. function GsU_0114004c(arg: PGsARGUNIT): pdword; external;
  636. function GsU_0114004d(arg: PGsARGUNIT): pdword; external;
  637. function GsU_01140050(arg: PGsARGUNIT): pdword; external;
  638. function GsU_01140051(arg: PGsARGUNIT): pdword; external;
  639. function GsU_01140054(arg: PGsARGUNIT): pdword; external;
  640. function GsU_01140055(arg: PGsARGUNIT): pdword; external;
  641. function GsU_01340048(arg: PGsARGUNIT): pdword; external;
  642. function GsU_01340049(arg: PGsARGUNIT): pdword; external;
  643. function GsU_0134004c(arg: PGsARGUNIT): pdword; external;
  644. function GsU_0134004d(arg: PGsARGUNIT): pdword; external;
  645. function GsU_01340050(arg: PGsARGUNIT): pdword; external;
  646. function GsU_01340051(arg: PGsARGUNIT): pdword; external;
  647. function GsU_01340054(arg: PGsARGUNIT): pdword; external;
  648. function GsU_01340055(arg: PGsARGUNIT): pdword; external;
  649. function GsU_0020000a(arg: PGsARGUNIT): pdword; external;
  650. function GsU_0020000b(arg: PGsARGUNIT): pdword; external;
  651. function GsU_0020000e(arg: PGsARGUNIT): pdword; external;
  652. function GsU_0020000f(arg: PGsARGUNIT): pdword; external;
  653. function GsU_00200012(arg: PGsARGUNIT): pdword; external;
  654. function GsU_00200013(arg: PGsARGUNIT): pdword; external;
  655. function GsU_00200016(arg: PGsARGUNIT): pdword; external;
  656. function GsU_00200017(arg: PGsARGUNIT): pdword; external;
  657. function GsU_0030000a(arg: PGsARGUNIT): pdword; external;
  658. function GsU_0030000b(arg: PGsARGUNIT): pdword; external;
  659. function GsU_0030000e(arg: PGsARGUNIT): pdword; external;
  660. function GsU_0030000f(arg: PGsARGUNIT): pdword; external;
  661. function GsU_00300012(arg: PGsARGUNIT): pdword; external;
  662. function GsU_00300013(arg: PGsARGUNIT): pdword; external;
  663. function GsU_00300016(arg: PGsARGUNIT): pdword; external;
  664. function GsU_00300017(arg: PGsARGUNIT): pdword; external;
  665. function GsU_0100000e(arg: PGsARGUNIT): pdword; external;
  666. function GsU_0100000f(arg: PGsARGUNIT): pdword; external;
  667. function GsU_01000016(arg: PGsARGUNIT): pdword; external;
  668. function GsU_01000017(arg: PGsARGUNIT): pdword; external;
  669. function GsU_0120000e(arg: PGsARGUNIT): pdword; external;
  670. function GsU_0120000f(arg: PGsARGUNIT): pdword; external;
  671. function GsU_01200016(arg: PGsARGUNIT): pdword; external;
  672. function GsU_01200017(arg: PGsARGUNIT): pdword; external;
  673. function GsU_0002000a(arg: PGsARGUNIT): pdword; external;
  674. function GsU_0002000b(arg: PGsARGUNIT): pdword; external;
  675. function GsU_0002000e(arg: PGsARGUNIT): pdword; external;
  676. function GsU_0002000f(arg: PGsARGUNIT): pdword; external;
  677. function GsU_00020012(arg: PGsARGUNIT): pdword; external;
  678. function GsU_00020013(arg: PGsARGUNIT): pdword; external;
  679. function GsU_00020016(arg: PGsARGUNIT): pdword; external;
  680. function GsU_00020017(arg: PGsARGUNIT): pdword; external;
  681. function GsU_0102000e(arg: PGsARGUNIT): pdword; external;
  682. function GsU_0102000f(arg: PGsARGUNIT): pdword; external;
  683. function GsU_01020016(arg: PGsARGUNIT): pdword; external;
  684. function GsU_01020017(arg: PGsARGUNIT): pdword; external;
  685. // tiled texture
  686. function GsU_0000020b(arg: PGsARGUNIT): pdword; external;
  687. function GsU_0000020f(arg: PGsARGUNIT): pdword; external;
  688. function GsU_00000213(arg: PGsARGUNIT): pdword; external;
  689. function GsU_00000217(arg: PGsARGUNIT): pdword; external;
  690. function GsU_00020209(arg: PGsARGUNIT): pdword; external;
  691. function GsU_0002020b(arg: PGsARGUNIT): pdword; external;
  692. function GsU_0002020d(arg: PGsARGUNIT): pdword; external;
  693. function GsU_0002020f(arg: PGsARGUNIT): pdword; external;
  694. function GsU_00020211(arg: PGsARGUNIT): pdword; external;
  695. function GsU_00020213(arg: PGsARGUNIT): pdword; external;
  696. function GsU_00020215(arg: PGsARGUNIT): pdword; external;
  697. function GsU_00020217(arg: PGsARGUNIT): pdword; external;
  698. function GsU_00040249(arg: PGsARGUNIT): pdword; external;
  699. function GsU_0004024d(arg: PGsARGUNIT): pdword; external;
  700. function GsU_00040251(arg: PGsARGUNIT): pdword; external;
  701. function GsU_00040255(arg: PGsARGUNIT): pdword; external;
  702. function GsU_00100209(arg: PGsARGUNIT): pdword; external;
  703. function GsU_0010020b(arg: PGsARGUNIT): pdword; external;
  704. function GsU_0010020d(arg: PGsARGUNIT): pdword; external;
  705. function GsU_0010020f(arg: PGsARGUNIT): pdword; external;
  706. function GsU_00100211(arg: PGsARGUNIT): pdword; external;
  707. function GsU_00100213(arg: PGsARGUNIT): pdword; external;
  708. function GsU_00100215(arg: PGsARGUNIT): pdword; external;
  709. function GsU_00100217(arg: PGsARGUNIT): pdword; external;
  710. function GsU_00200209(arg: PGsARGUNIT): pdword; external;
  711. function GsU_0020020d(arg: PGsARGUNIT): pdword; external;
  712. function GsU_00200211(arg: PGsARGUNIT): pdword; external;
  713. function GsU_00200215(arg: PGsARGUNIT): pdword; external;
  714. function GsU_00240249(arg: PGsARGUNIT): pdword; external;
  715. function GsU_0024024d(arg: PGsARGUNIT): pdword; external;
  716. function GsU_00240251(arg: PGsARGUNIT): pdword; external;
  717. function GsU_00240255(arg: PGsARGUNIT): pdword; external;
  718. function GsU_00300209(arg: PGsARGUNIT): pdword; external;
  719. function GsU_0030020d(arg: PGsARGUNIT): pdword; external;
  720. function GsU_00300211(arg: PGsARGUNIT): pdword; external;
  721. function GsU_00300215(arg: PGsARGUNIT): pdword; external;
  722. function GsU_0100020f(arg: PGsARGUNIT): pdword; external;
  723. function GsU_01000217(arg: PGsARGUNIT): pdword; external;
  724. function GsU_0102020d(arg: PGsARGUNIT): pdword; external;
  725. function GsU_0102020f(arg: PGsARGUNIT): pdword; external;
  726. function GsU_01020215(arg: PGsARGUNIT): pdword; external;
  727. function GsU_01020217(arg: PGsARGUNIT): pdword; external;
  728. function GsU_01040249(arg: PGsARGUNIT): pdword; external;
  729. function GsU_0104024d(arg: PGsARGUNIT): pdword; external;
  730. function GsU_01040251(arg: PGsARGUNIT): pdword; external;
  731. function GsU_01040255(arg: PGsARGUNIT): pdword; external;
  732. function GsU_0120020d(arg: PGsARGUNIT): pdword; external;
  733. function GsU_01200215(arg: PGsARGUNIT): pdword; external;
  734. function GsU_01240249(arg: PGsARGUNIT): pdword; external;
  735. function GsU_0124024d(arg: PGsARGUNIT): pdword; external;
  736. function GsU_01240251(arg: PGsARGUNIT): pdword; external;
  737. function GsU_01240255(arg: PGsARGUNIT): pdword; external;
  738. function GsU_00140249(arg: PGsARGUNIT): pdword; external;
  739. function GsU_0014024d(arg: PGsARGUNIT): pdword; external;
  740. function GsU_00140251(arg: PGsARGUNIT): pdword; external;
  741. function GsU_00140255(arg: PGsARGUNIT): pdword; external;
  742. function GsU_00340249(arg: PGsARGUNIT): pdword; external;
  743. function GsU_0034024d(arg: PGsARGUNIT): pdword; external;
  744. function GsU_00340251(arg: PGsARGUNIT): pdword; external;
  745. function GsU_00340255(arg: PGsARGUNIT): pdword; external;
  746. function GsU_01140249(arg: PGsARGUNIT): pdword; external;
  747. function GsU_0114024d(arg: PGsARGUNIT): pdword; external;
  748. function GsU_01140251(arg: PGsARGUNIT): pdword; external;
  749. function GsU_01140255(arg: PGsARGUNIT): pdword; external;
  750. function GsU_01340249(arg: PGsARGUNIT): pdword; external;
  751. function GsU_0134024d(arg: PGsARGUNIT): pdword; external;
  752. function GsU_01340251(arg: PGsARGUNIT): pdword; external;
  753. function GsU_01340255(arg: PGsARGUNIT): pdword; external;
  754. function GsU_0020020b(arg: PGsARGUNIT): pdword; external;
  755. function GsU_0020020f(arg: PGsARGUNIT): pdword; external;
  756. function GsU_00200213(arg: PGsARGUNIT): pdword; external;
  757. function GsU_00200217(arg: PGsARGUNIT): pdword; external;
  758. function GsU_0030020b(arg: PGsARGUNIT): pdword; external;
  759. function GsU_0030020f(arg: PGsARGUNIT): pdword; external;
  760. function GsU_00300213(arg: PGsARGUNIT): pdword; external;
  761. function GsU_00300217(arg: PGsARGUNIT): pdword; external;
  762. function GsU_0120020f(arg: PGsARGUNIT): pdword; external;
  763. function GsU_01200217(arg: PGsARGUNIT): pdword; external;
  764. function GsU_00000000(arg: PGsARGUNIT): pdword; external;
  765. function GsU_05000000(arg: PGsARGUNIT): pdword; external;
  766. function GsU_05000001(arg: PGsARGUNIT): pdword; external;
  767. // camera
  768. function GsU_07000100(arg: PGsARGUNIT): pdword; external;
  769. function GsU_07010100(arg: PGsARGUNIT): pdword; external;
  770. function GsU_07020100(arg: PGsARGUNIT): pdword; external;
  771. function GsU_07030100(arg: PGsARGUNIT): pdword; external;
  772. // light
  773. function GsU_07000200(arg: PGsARGUNIT): pdword; external;
  774. function GsU_07010200(arg: PGsARGUNIT): pdword; external;
  775. function GsU_07020200(arg: PGsARGUNIT): pdword; external;
  776. function GsU_07030200(arg: PGsARGUNIT): pdword; external;
  777. // update driver
  778. function GsU_03000000(sp: PGsARGUNIT_ANIM): pdword; external;
  779. // interpolation driver
  780. function GsU_03000001(sp: PGsARGUNIT_ANIM): longint; external;
  781. function GsU_03000002(sp: PGsARGUNIT_ANIM): longint; external;
  782. function GsU_03000003(sp: PGsARGUNIT_ANIM): longint; external;
  783. function GsU_03000009(sp: PGsARGUNIT_ANIM): longint; external;
  784. function GsU_0300000a(sp: PGsARGUNIT_ANIM): longint; external;
  785. function GsU_0300000b(sp: PGsARGUNIT_ANIM): longint; external;
  786. function GsU_03000010(sp: PGsARGUNIT_ANIM): longint; external;
  787. function GsU_03000011(sp: PGsARGUNIT_ANIM): longint; external;
  788. function GsU_03000012(sp: PGsARGUNIT_ANIM): longint; external;
  789. function GsU_03000013(sp: PGsARGUNIT_ANIM): longint; external;
  790. function GsU_03000019(sp: PGsARGUNIT_ANIM): longint; external;
  791. function GsU_0300001a(sp: PGsARGUNIT_ANIM): longint; external;
  792. function GsU_0300001b(sp: PGsARGUNIT_ANIM): longint; external;
  793. function GsU_03000020(sp: PGsARGUNIT_ANIM): longint; external;
  794. function GsU_03000021(sp: PGsARGUNIT_ANIM): longint; external;
  795. function GsU_03000022(sp: PGsARGUNIT_ANIM): longint; external;
  796. function GsU_03000023(sp: PGsARGUNIT_ANIM): longint; external;
  797. function GsU_03000029(sp: PGsARGUNIT_ANIM): longint; external;
  798. function GsU_0300002a(sp: PGsARGUNIT_ANIM): longint; external;
  799. function GsU_0300002b(sp: PGsARGUNIT_ANIM): longint; external;
  800. function GsU_03000030(sp: PGsARGUNIT_ANIM): longint; external;
  801. function GsU_03000031(sp: PGsARGUNIT_ANIM): longint; external;
  802. function GsU_03000032(sp: PGsARGUNIT_ANIM): longint; external;
  803. function GsU_03000033(sp: PGsARGUNIT_ANIM): longint; external;
  804. function GsU_03000039(sp: PGsARGUNIT_ANIM): longint; external;
  805. function GsU_0300003a(sp: PGsARGUNIT_ANIM): longint; external;
  806. function GsU_0300003b(sp: PGsARGUNIT_ANIM): longint; external;
  807. function GsU_03000100(sp: PGsARGUNIT_ANIM): longint; external;
  808. function GsU_03000111(sp: PGsARGUNIT_ANIM): longint; external;
  809. function GsU_03000112(sp: PGsARGUNIT_ANIM): longint; external;
  810. function GsU_03000119(sp: PGsARGUNIT_ANIM): longint; external;
  811. function GsU_0300011a(sp: PGsARGUNIT_ANIM): longint; external;
  812. function GsU_03000901(sp: PGsARGUNIT_ANIM): longint; external;
  813. function GsU_03000902(sp: PGsARGUNIT_ANIM): longint; external;
  814. function GsU_03000909(sp: PGsARGUNIT_ANIM): longint; external;
  815. function GsU_0300090a(sp: PGsARGUNIT_ANIM): longint; external;
  816. function GsU_03000910(sp: PGsARGUNIT_ANIM): longint; external;
  817. function GsU_03000911(sp: PGsARGUNIT_ANIM): longint; external;
  818. function GsU_03000912(sp: PGsARGUNIT_ANIM): longint; external;
  819. function GsU_03000919(sp: PGsARGUNIT_ANIM): longint; external;
  820. function GsU_0300091a(sp: PGsARGUNIT_ANIM): longint; external;
  821. function GsU_03001010(sp: PGsARGUNIT_ANIM): longint; external;
  822. function GsU_03001011(sp: PGsARGUNIT_ANIM): longint; external;
  823. function GsU_03001012(sp: PGsARGUNIT_ANIM): longint; external;
  824. function GsU_03001013(sp: PGsARGUNIT_ANIM): longint; external;
  825. function GsU_03001019(sp: PGsARGUNIT_ANIM): longint; external;
  826. function GsU_0300101a(sp: PGsARGUNIT_ANIM): longint; external;
  827. function GsU_0300101b(sp: PGsARGUNIT_ANIM): longint; external;
  828. function GsU_03001020(sp: PGsARGUNIT_ANIM): longint; external;
  829. function GsU_03001021(sp: PGsARGUNIT_ANIM): longint; external;
  830. function GsU_03001022(sp: PGsARGUNIT_ANIM): longint; external;
  831. function GsU_03001023(sp: PGsARGUNIT_ANIM): longint; external;
  832. function GsU_03001029(sp: PGsARGUNIT_ANIM): longint; external;
  833. function GsU_0300102a(sp: PGsARGUNIT_ANIM): longint; external;
  834. function GsU_0300102b(sp: PGsARGUNIT_ANIM): longint; external;
  835. function GsU_03001030(sp: PGsARGUNIT_ANIM): longint; external;
  836. function GsU_03001031(sp: PGsARGUNIT_ANIM): longint; external;
  837. function GsU_03001032(sp: PGsARGUNIT_ANIM): longint; external;
  838. function GsU_03001033(sp: PGsARGUNIT_ANIM): longint; external;
  839. function GsU_03001039(sp: PGsARGUNIT_ANIM): longint; external;
  840. function GsU_0300103a(sp: PGsARGUNIT_ANIM): longint; external;
  841. function GsU_0300103b(sp: PGsARGUNIT_ANIM): longint; external;
  842. function GsU_03001111(sp: PGsARGUNIT_ANIM): longint; external;
  843. function GsU_03001112(sp: PGsARGUNIT_ANIM): longint; external;
  844. function GsU_03001119(sp: PGsARGUNIT_ANIM): longint; external;
  845. function GsU_0300111a(sp: PGsARGUNIT_ANIM): longint; external;
  846. function GsU_03001910(sp: PGsARGUNIT_ANIM): longint; external;
  847. function GsU_03001911(sp: PGsARGUNIT_ANIM): longint; external;
  848. function GsU_03001912(sp: PGsARGUNIT_ANIM): longint; external;
  849. function GsU_03001919(sp: PGsARGUNIT_ANIM): longint; external;
  850. function GsU_0300191a(sp: PGsARGUNIT_ANIM): longint; external;
  851. function GsU_03002010(sp: PGsARGUNIT_ANIM): longint; external;
  852. function GsU_03002011(sp: PGsARGUNIT_ANIM): longint; external;
  853. function GsU_03002012(sp: PGsARGUNIT_ANIM): longint; external;
  854. function GsU_03002013(sp: PGsARGUNIT_ANIM): longint; external;
  855. function GsU_03002019(sp: PGsARGUNIT_ANIM): longint; external;
  856. function GsU_0300201a(sp: PGsARGUNIT_ANIM): longint; external;
  857. function GsU_0300201b(sp: PGsARGUNIT_ANIM): longint; external;
  858. function GsU_03002020(sp: PGsARGUNIT_ANIM): longint; external;
  859. function GsU_03002021(sp: PGsARGUNIT_ANIM): longint; external;
  860. function GsU_03002022(sp: PGsARGUNIT_ANIM): longint; external;
  861. function GsU_03002023(sp: PGsARGUNIT_ANIM): longint; external;
  862. function GsU_03002029(sp: PGsARGUNIT_ANIM): longint; external;
  863. function GsU_0300202a(sp: PGsARGUNIT_ANIM): longint; external;
  864. function GsU_0300202b(sp: PGsARGUNIT_ANIM): longint; external;
  865. function GsU_03002030(sp: PGsARGUNIT_ANIM): longint; external;
  866. function GsU_03002031(sp: PGsARGUNIT_ANIM): longint; external;
  867. function GsU_03002032(sp: PGsARGUNIT_ANIM): longint; external;
  868. function GsU_03002033(sp: PGsARGUNIT_ANIM): longint; external;
  869. function GsU_03002039(sp: PGsARGUNIT_ANIM): longint; external;
  870. function GsU_0300203a(sp: PGsARGUNIT_ANIM): longint; external;
  871. function GsU_0300203b(sp: PGsARGUNIT_ANIM): longint; external;
  872. function GsU_03002111(sp: PGsARGUNIT_ANIM): longint; external;
  873. function GsU_03002112(sp: PGsARGUNIT_ANIM): longint; external;
  874. function GsU_03002119(sp: PGsARGUNIT_ANIM): longint; external;
  875. function GsU_0300211a(sp: PGsARGUNIT_ANIM): longint; external;
  876. function GsU_03002910(sp: PGsARGUNIT_ANIM): longint; external;
  877. function GsU_03002911(sp: PGsARGUNIT_ANIM): longint; external;
  878. function GsU_03002912(sp: PGsARGUNIT_ANIM): longint; external;
  879. function GsU_03002919(sp: PGsARGUNIT_ANIM): longint; external;
  880. function GsU_0300291a(sp: PGsARGUNIT_ANIM): longint; external;
  881. function GsU_03003010(sp: PGsARGUNIT_ANIM): longint; external;
  882. function GsU_03003011(sp: PGsARGUNIT_ANIM): longint; external;
  883. function GsU_03003012(sp: PGsARGUNIT_ANIM): longint; external;
  884. function GsU_03003013(sp: PGsARGUNIT_ANIM): longint; external;
  885. function GsU_03003019(sp: PGsARGUNIT_ANIM): longint; external;
  886. function GsU_0300301a(sp: PGsARGUNIT_ANIM): longint; external;
  887. function GsU_0300301b(sp: PGsARGUNIT_ANIM): longint; external;
  888. function GsU_03003020(sp: PGsARGUNIT_ANIM): longint; external;
  889. function GsU_03003021(sp: PGsARGUNIT_ANIM): longint; external;
  890. function GsU_03003022(sp: PGsARGUNIT_ANIM): longint; external;
  891. function GsU_03003023(sp: PGsARGUNIT_ANIM): longint; external;
  892. function GsU_03003029(sp: PGsARGUNIT_ANIM): longint; external;
  893. function GsU_0300302a(sp: PGsARGUNIT_ANIM): longint; external;
  894. function GsU_0300302b(sp: PGsARGUNIT_ANIM): longint; external;
  895. function GsU_03003030(sp: PGsARGUNIT_ANIM): longint; external;
  896. function GsU_03003031(sp: PGsARGUNIT_ANIM): longint; external;
  897. function GsU_03003032(sp: PGsARGUNIT_ANIM): longint; external;
  898. function GsU_03003033(sp: PGsARGUNIT_ANIM): longint; external;
  899. function GsU_03003039(sp: PGsARGUNIT_ANIM): longint; external;
  900. function GsU_0300303a(sp: PGsARGUNIT_ANIM): longint; external;
  901. function GsU_0300303b(sp: PGsARGUNIT_ANIM): longint; external;
  902. function GsU_03003111(sp: PGsARGUNIT_ANIM): longint; external;
  903. function GsU_03003112(sp: PGsARGUNIT_ANIM): longint; external;
  904. function GsU_03003119(sp: PGsARGUNIT_ANIM): longint; external;
  905. function GsU_0300311a(sp: PGsARGUNIT_ANIM): longint; external;
  906. function GsU_03003910(sp: PGsARGUNIT_ANIM): longint; external;
  907. function GsU_03003911(sp: PGsARGUNIT_ANIM): longint; external;
  908. function GsU_03003912(sp: PGsARGUNIT_ANIM): longint; external;
  909. function GsU_03003919(sp: PGsARGUNIT_ANIM): longint; external;
  910. function GsU_0300391a(sp: PGsARGUNIT_ANIM): longint; external;
  911. function GsU_03004010(sp: PGsARGUNIT_ANIM): longint; external;
  912. function GsU_03004011(sp: PGsARGUNIT_ANIM): longint; external;
  913. function GsU_03004012(sp: PGsARGUNIT_ANIM): longint; external;
  914. function GsU_03004013(sp: PGsARGUNIT_ANIM): longint; external;
  915. function GsU_03004019(sp: PGsARGUNIT_ANIM): longint; external;
  916. function GsU_0300401a(sp: PGsARGUNIT_ANIM): longint; external;
  917. function GsU_0300401b(sp: PGsARGUNIT_ANIM): longint; external;
  918. function GsU_03004020(sp: PGsARGUNIT_ANIM): longint; external;
  919. function GsU_03004021(sp: PGsARGUNIT_ANIM): longint; external;
  920. function GsU_03004022(sp: PGsARGUNIT_ANIM): longint; external;
  921. function GsU_03004023(sp: PGsARGUNIT_ANIM): longint; external;
  922. function GsU_03004029(sp: PGsARGUNIT_ANIM): longint; external;
  923. function GsU_0300402a(sp: PGsARGUNIT_ANIM): longint; external;
  924. function GsU_0300402b(sp: PGsARGUNIT_ANIM): longint; external;
  925. function GsU_03004030(sp: PGsARGUNIT_ANIM): longint; external;
  926. function GsU_03004031(sp: PGsARGUNIT_ANIM): longint; external;
  927. function GsU_03004032(sp: PGsARGUNIT_ANIM): longint; external;
  928. function GsU_03004033(sp: PGsARGUNIT_ANIM): longint; external;
  929. function GsU_03004039(sp: PGsARGUNIT_ANIM): longint; external;
  930. function GsU_0300403a(sp: PGsARGUNIT_ANIM): longint; external;
  931. function GsU_0300403b(sp: PGsARGUNIT_ANIM): longint; external;
  932. function GsU_03004111(sp: PGsARGUNIT_ANIM): longint; external;
  933. function GsU_03004112(sp: PGsARGUNIT_ANIM): longint; external;
  934. function GsU_03004119(sp: PGsARGUNIT_ANIM): longint; external;
  935. function GsU_0300411a(sp: PGsARGUNIT_ANIM): longint; external;
  936. function GsU_03004910(sp: PGsARGUNIT_ANIM): longint; external;
  937. function GsU_03004911(sp: PGsARGUNIT_ANIM): longint; external;
  938. function GsU_03004912(sp: PGsARGUNIT_ANIM): longint; external;
  939. function GsU_03004919(sp: PGsARGUNIT_ANIM): longint; external;
  940. function GsU_0300491a(sp: PGsARGUNIT_ANIM): longint; external;
  941. function GsU_03005010(sp: PGsARGUNIT_ANIM): longint; external;
  942. function GsU_03005011(sp: PGsARGUNIT_ANIM): longint; external;
  943. function GsU_03005012(sp: PGsARGUNIT_ANIM): longint; external;
  944. function GsU_03005013(sp: PGsARGUNIT_ANIM): longint; external;
  945. function GsU_03005019(sp: PGsARGUNIT_ANIM): longint; external;
  946. function GsU_0300501a(sp: PGsARGUNIT_ANIM): longint; external;
  947. function GsU_0300501b(sp: PGsARGUNIT_ANIM): longint; external;
  948. function GsU_03005020(sp: PGsARGUNIT_ANIM): longint; external;
  949. function GsU_03005021(sp: PGsARGUNIT_ANIM): longint; external;
  950. function GsU_03005022(sp: PGsARGUNIT_ANIM): longint; external;
  951. function GsU_03005023(sp: PGsARGUNIT_ANIM): longint; external;
  952. function GsU_03005029(sp: PGsARGUNIT_ANIM): longint; external;
  953. function GsU_0300502a(sp: PGsARGUNIT_ANIM): longint; external;
  954. function GsU_0300502b(sp: PGsARGUNIT_ANIM): longint; external;
  955. function GsU_03005030(sp: PGsARGUNIT_ANIM): longint; external;
  956. function GsU_03005031(sp: PGsARGUNIT_ANIM): longint; external;
  957. function GsU_03005032(sp: PGsARGUNIT_ANIM): longint; external;
  958. function GsU_03005033(sp: PGsARGUNIT_ANIM): longint; external;
  959. function GsU_03005039(sp: PGsARGUNIT_ANIM): longint; external;
  960. function GsU_0300503a(sp: PGsARGUNIT_ANIM): longint; external;
  961. function GsU_0300503b(sp: PGsARGUNIT_ANIM): longint; external;
  962. function GsU_03005111(sp: PGsARGUNIT_ANIM): longint; external;
  963. function GsU_03005112(sp: PGsARGUNIT_ANIM): longint; external;
  964. function GsU_03005119(sp: PGsARGUNIT_ANIM): longint; external;
  965. function GsU_0300511a(sp: PGsARGUNIT_ANIM): longint; external;
  966. function GsU_03005910(sp: PGsARGUNIT_ANIM): longint; external;
  967. function GsU_03005911(sp: PGsARGUNIT_ANIM): longint; external;
  968. function GsU_03005912(sp: PGsARGUNIT_ANIM): longint; external;
  969. function GsU_03005919(sp: PGsARGUNIT_ANIM): longint; external;
  970. function GsU_0300591a(sp: PGsARGUNIT_ANIM): longint; external;
  971. function GsU_03010110(sp: PGsARGUNIT_ANIM): longint; external;
  972. function GsU_03010111(sp: PGsARGUNIT_ANIM): longint; external;
  973. function GsU_03010112(sp: PGsARGUNIT_ANIM): longint; external;
  974. function GsU_03010121(sp: PGsARGUNIT_ANIM): longint; external;
  975. function GsU_03010122(sp: PGsARGUNIT_ANIM): longint; external;
  976. function GsU_03010141(sp: PGsARGUNIT_ANIM): longint; external;
  977. function GsU_03010142(sp: PGsARGUNIT_ANIM): longint; external;
  978. function GsU_03010171(sp: PGsARGUNIT_ANIM): longint; external;
  979. function GsU_03010172(sp: PGsARGUNIT_ANIM): longint; external;
  980. function GsU_03010182(sp: PGsARGUNIT_ANIM): longint; external;
  981. function GsU_03010210(sp: PGsARGUNIT_ANIM): longint; external;
  982. function GsU_03010211(sp: PGsARGUNIT_ANIM): longint; external;
  983. function GsU_03010212(sp: PGsARGUNIT_ANIM): longint; external;
  984. function GsU_03010221(sp: PGsARGUNIT_ANIM): longint; external;
  985. function GsU_03010222(sp: PGsARGUNIT_ANIM): longint; external;
  986. function GsU_03010241(sp: PGsARGUNIT_ANIM): longint; external;
  987. function GsU_03010242(sp: PGsARGUNIT_ANIM): longint; external;
  988. function GsU_03010271(sp: PGsARGUNIT_ANIM): longint; external;
  989. function GsU_03010272(sp: PGsARGUNIT_ANIM): longint; external;
  990. function GsU_03010310(sp: PGsARGUNIT_ANIM): longint; external;
  991. function GsU_03010311(sp: PGsARGUNIT_ANIM): longint; external;
  992. function GsU_03010312(sp: PGsARGUNIT_ANIM): longint; external;
  993. function GsU_03010321(sp: PGsARGUNIT_ANIM): longint; external;
  994. function GsU_03010322(sp: PGsARGUNIT_ANIM): longint; external;
  995. function GsU_03010341(sp: PGsARGUNIT_ANIM): longint; external;
  996. function GsU_03010342(sp: PGsARGUNIT_ANIM): longint; external;
  997. function GsU_03010371(sp: PGsARGUNIT_ANIM): longint; external;
  998. function GsU_03010372(sp: PGsARGUNIT_ANIM): longint; external;
  999. // envmap driver
  1000. function GsU_06000100(arg: PGsARGUNIT): longint; external;
  1001. function GsU_0600100c(arg: PGsARGUNIT): longint; external;
  1002. function GsU_06001014(arg: PGsARGUNIT): longint; external;
  1003. function GsU_0600110c(arg: PGsARGUNIT): longint; external;
  1004. function GsU_06001114(arg: PGsARGUNIT): longint; external;
  1005. function GsU_0600200c(arg: PGsARGUNIT): longint; external;
  1006. function GsU_06002014(arg: PGsARGUNIT): longint; external;
  1007. function GsU_0600300c(arg: PGsARGUNIT): longint; external;
  1008. function GsU_06003014(arg: PGsARGUNIT): longint; external;
  1009. function GsU_0600400c(arg: PGsARGUNIT): longint; external;
  1010. function GsU_06004014(arg: PGsARGUNIT): longint; external;
  1011. function GsU_0600500c(arg: PGsARGUNIT): longint; external;
  1012. function GsU_06005014(arg: PGsARGUNIT): longint; external;
  1013. // MIMe driver
  1014. function GsU_04010020(arg: PGsARGUNIT): longint; external;
  1015. function GsU_04010021(arg: PGsARGUNIT): longint; external;
  1016. function GsU_04010028(arg: PGsARGUNIT): longint; external;
  1017. function GsU_04010029(arg: PGsARGUNIT): longint; external;
  1018. function GsU_04010010(arg: PGsARGUNIT): longint; external;
  1019. function GsU_04010018(arg: PGsARGUNIT): longint; external;
  1020. function GsU_04010011(arg: PGsARGUNIT): longint; external;
  1021. function GsU_04010019(arg: PGsARGUNIT): longint; external;
  1022. function GsMapCoordUnit(base, p: pdword): PGsCOORDUNIT; external;
  1023. function GsGetHeadpUnit: pdword; external;
  1024. function GsScanUnit(p: pdword; ut: PGsTYPEUNIT; ot: PGsOT; scratch: pdword): longint; external;
  1025. procedure GsMapUnit(p: pdword); external;
  1026. procedure GsSortUnit(objp: PGsUNIT; otp: PGsOT; scrathc: pdword); external;
  1027. procedure GsGetLwUnit(coord: PGsCOORDUNIT; m: PMATRIX); external;
  1028. procedure GsGetLsUnit(coord: PGsCOORDUNIT; m: PMATRIX); external;
  1029. procedure GsGetLwsUnit(coord: PGsCOORDUNIT; lw, ls: PMATRIX); external;
  1030. function GsSetViewUnit(pv: PGsVIEWUNIT): longint; external;
  1031. function GsSetRefViewUnit(pv: PGsRVIEWUNIT): longint; external;
  1032. function GsSetRefViewLUnit(pv: PGsRVIEWUNIT): longint; external;
  1033. function GsScanAnim(p: pdword; ut: PGsTYPEUNIT): pdword; external;
  1034. function GsLinkAnim(seq: PPGsSEQ; p: dword): longint; external;
  1035. // for MIMe
  1036. procedure GsInitRstVtxMIMe(primtop, hp: pdword); external;
  1037. procedure GsInitRstNrmMIMe(primtop, hp: pdword); external;
  1038. implementation
  1039. begin
  1040. end.