API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Jul 6th, 2018
69
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 16.96 KB | None | 0 0
raw download clone embed print report
  1. scn AAAFyTyHotkeyFreezeItemsScript
  2. int iKeyID
  3.  
  4. array_var array_MiscRefsInCell
  5. array_var array_BookRefsInCell
  6. array_var array_ClothingRefsInCell
  7. array_var array_ArmorRefsInCell
  8. array_var array_IngredientRefsInCell
  9. array_var array_WeaponRefsInCell
  10. array_var array_AmmoRefsInCell
  11. array_var array_IngestibleRefsInCell
  12.  
  13. array_var array_Temp
  14.  
  15. array_var array_Refs
  16. array_var array_Refs_PosX
  17. array_var array_Refs_PosY
  18. array_var array_Refs_PosZ
  19. array_var array_Refs_AngleX
  20. array_var array_Refs_AngleY
  21. array_var array_Refs_AngleZ
  22.  
  23. int iRefCount
  24. int iBaseObjectIndex
  25. int iArrayIndex
  26.  
  27. float fPosX
  28. float fPosY
  29. float fPosZ
  30. float fAngleX
  31. float fAngleY
  32. float fAngleZ
  33.  
  34. ref refItem
  35. ref refStatic
  36. ref refBaseObject
  37. ref refMarker
  38.  
  39. begin function {iKeyID}
  40.  
  41. set refMarker to AAAFyTyNPCDummyRef
  42.  
  43. let iArrayIndex := -1
  44.  
  45. let array_Refs := Ar_Construct "array"
  46. let array_Refs_PosX := Ar_Construct "array"
  47. let array_Refs_PosY := Ar_Construct "array"
  48. let array_Refs_PosZ := Ar_Construct "array"
  49. let array_Refs_AngleX := Ar_Construct "array"
  50. let array_Refs_AngleY := Ar_Construct "array"
  51. let array_Refs_AngleZ := Ar_Construct "array"
  52.  
  53. let array_MiscRefsInCell := GetRefs 31,1
  54. let array_BookRefsInCell := GetRefs 25,1
  55. let array_ClothingRefsInCell := GetRefs 26,1
  56. let array_ArmorRefsInCell := GetRefs 24,1
  57. let array_IngredientRefsInCell := GetRefs 29,1
  58. let array_WeaponRefsInCell := GetRefs 40,1
  59. let array_AmmoRefsInCell := GetRefs 41,1
  60. let array_IngestibleRefsInCell := GetRefs 47,1
  61.  
  62. foreach array_Temp <- array_MiscRefsInCell
  63.  
  64. let refItem := array_Temp["value"]
  65. Ar_append array_Refs refItem
  66. Ar_append array_Refs_PosX refItem.GetPos X
  67. Ar_append array_Refs_PosY refItem.GetPos Y
  68. Ar_append array_Refs_PosZ refItem.GetPos Z
  69. Ar_append array_Refs_AngleX refItem.GetAngle X
  70. Ar_append array_Refs_AngleY refItem.GetAngle Y
  71. Ar_append array_Refs_AngleZ refItem.GetAngle Z
  72.  
  73. loop
  74.  
  75. foreach array_Temp <- array_BookRefsInCell
  76.  
  77. let refItem := array_Temp["value"]
  78. Ar_append array_Refs refItem
  79. Ar_append array_Refs_PosX refItem.GetPos X
  80. Ar_append array_Refs_PosY refItem.GetPos Y
  81. Ar_append array_Refs_PosZ refItem.GetPos Z
  82. Ar_append array_Refs_AngleX refItem.GetAngle X
  83. Ar_append array_Refs_AngleY refItem.GetAngle Y
  84. Ar_append array_Refs_AngleZ refItem.GetAngle Z
  85.  
  86. loop
  87.  
  88. foreach array_Temp <- array_ClothingRefsInCell
  89.  
  90. let refItem := array_Temp["value"]
  91. Ar_append array_Refs refItem
  92. Ar_append array_Refs_PosX refItem.GetPos X
  93. Ar_append array_Refs_PosY refItem.GetPos Y
  94. Ar_append array_Refs_PosZ refItem.GetPos Z
  95. Ar_append array_Refs_AngleX refItem.GetAngle X
  96. Ar_append array_Refs_AngleY refItem.GetAngle Y
  97. Ar_append array_Refs_AngleZ refItem.GetAngle Z
  98.  
  99. loop
  100.  
  101. foreach array_Temp <- array_ArmorRefsInCell
  102.  
  103. let refItem := array_Temp["value"]
  104. Ar_append array_Refs refItem
  105. Ar_append array_Refs_PosX refItem.GetPos X
  106. Ar_append array_Refs_PosY refItem.GetPos Y
  107. Ar_append array_Refs_PosZ refItem.GetPos Z
  108. Ar_append array_Refs_AngleX refItem.GetAngle X
  109. Ar_append array_Refs_AngleY refItem.GetAngle Y
  110. Ar_append array_Refs_AngleZ refItem.GetAngle Z
  111.  
  112. loop
  113.  
  114. foreach array_Temp <- array_IngredientRefsInCell
  115.  
  116. let refItem := array_Temp["value"]
  117. Ar_append array_Refs refItem
  118. Ar_append array_Refs_PosX refItem.GetPos X
  119. Ar_append array_Refs_PosY refItem.GetPos Y
  120. Ar_append array_Refs_PosZ refItem.GetPos Z
  121. Ar_append array_Refs_AngleX refItem.GetAngle X
  122. Ar_append array_Refs_AngleY refItem.GetAngle Y
  123. Ar_append array_Refs_AngleZ refItem.GetAngle Z
  124.  
  125. loop
  126.  
  127. foreach array_Temp <- array_WeaponRefsInCell
  128.  
  129. let refItem := array_Temp["value"]
  130. Ar_append array_Refs refItem
  131. Ar_append array_Refs_PosX refItem.GetPos X
  132. Ar_append array_Refs_PosY refItem.GetPos Y
  133. Ar_append array_Refs_PosZ refItem.GetPos Z
  134. Ar_append array_Refs_AngleX refItem.GetAngle X
  135. Ar_append array_Refs_AngleY refItem.GetAngle Y
  136. Ar_append array_Refs_AngleZ refItem.GetAngle Z
  137.  
  138. loop
  139.  
  140. foreach array_Temp <- array_AmmoRefsInCell
  141.  
  142. let refItem := array_Temp["value"]
  143. Ar_append array_Refs refItem
  144. Ar_append array_Refs_PosX refItem.GetPos X
  145. Ar_append array_Refs_PosY refItem.GetPos Y
  146. Ar_append array_Refs_PosZ refItem.GetPos Z
  147. Ar_append array_Refs_AngleX refItem.GetAngle X
  148. Ar_append array_Refs_AngleY refItem.GetAngle Y
  149. Ar_append array_Refs_AngleZ refItem.GetAngle Z
  150.  
  151. loop
  152.  
  153. foreach array_Temp <- array_IngestibleRefsInCell
  154.  
  155. let refItem := array_Temp["value"]
  156. Ar_append array_Refs refItem
  157. Ar_append array_Refs_PosX refItem.GetPos X
  158. Ar_append array_Refs_PosY refItem.GetPos Y
  159. Ar_append array_Refs_PosZ refItem.GetPos Z
  160. Ar_append array_Refs_AngleX refItem.GetAngle X
  161. Ar_append array_Refs_AngleY refItem.GetAngle Y
  162. Ar_append array_Refs_AngleZ refItem.GetAngle Z
  163.  
  164. loop
  165.  
  166. let iRefCount := Ar_size array_Refs
  167.  
  168. foreach array_Temp <- array_Refs
  169.  
  170. let iArrayIndex += 1
  171. let refItem := array_Temp["value"]
  172. let refBaseObject := refItem.GetBaseObject
  173.  
  174. let iBaseObjectIndex := IsRefInList AAAFyTyFormListSource01Ammo, refBaseObject
  175.  
  176. if iBaseObjectIndex > -1
  177.  
  178. let refBaseObject := ListGetNthForm AAAFyTyFormListDest01Ammo, iBaseObjectIndex
  179. Print GetFormIDString refBaseObject
  180. let refStatic := PlayerRef.PlaceAtMe refBaseObject, 1
  181. refStatic.MoveTo refItem
  182. refItem.Disable
  183.  
  184. let fPosX := array_Refs_PosX[iArrayIndex]
  185. let fAngleX := array_Refs_AngleX[iArrayIndex]
  186.  
  187. let fPosY := array_Refs_PosY[iArrayIndex]
  188. let fAngleY := array_Refs_AngleY[iArrayIndex]
  189.  
  190. let fPosZ := array_Refs_PosZ[iArrayIndex]
  191. let fAngleZ := array_Refs_AngleZ[iArrayIndex]
  192.  
  193. refStatic.SetPos X fPosX
  194. refStatic.SetAngle X fAngleX
  195.  
  196. refStatic.SetPos Y fPosY
  197. refStatic.SetAngle Y fAngleY
  198.  
  199. refStatic.SetPos Z fPosZ
  200. refStatic.SetAngle Z fAngleZ
  201.  
  202. endif
  203.  
  204. let iBaseObjectIndex := IsRefInList AAAFyTyFormListSource02Armor, refBaseObject
  205.  
  206. if iBaseObjectIndex > -1
  207.  
  208. let refBaseObject := ListGetNthForm AAAFyTyFormListDest02Armor, iBaseObjectIndex
  209. Print GetFormIDString refBaseObject
  210. let refStatic := PlayerRef.PlaceAtMe refBaseObject, 1
  211. refStatic.MoveTo refItem
  212. refItem.Disable
  213.  
  214. let fPosX := array_Refs_PosX[iArrayIndex]
  215. let fAngleX := array_Refs_AngleX[iArrayIndex]
  216.  
  217. let fPosY := array_Refs_PosY[iArrayIndex]
  218. let fAngleY := array_Refs_AngleY[iArrayIndex]
  219.  
  220. let fPosZ := array_Refs_PosZ[iArrayIndex]
  221. let fAngleZ := array_Refs_AngleZ[iArrayIndex]
  222.  
  223. refStatic.SetPos X fPosX
  224. refStatic.SetAngle X fAngleX
  225.  
  226. refStatic.SetPos Y fPosY
  227. refStatic.SetAngle Y fAngleY
  228.  
  229. refStatic.SetPos Z fPosZ
  230. refStatic.SetAngle Z fAngleZ
  231.  
  232. endif
  233.  
  234. let iBaseObjectIndex := IsRefInList AAAFyTyFormListSource03Armor, refBaseObject
  235.  
  236. if iBaseObjectIndex > -1
  237.  
  238. let refBaseObject := ListGetNthForm AAAFyTyFormListDest03Armor, iBaseObjectIndex
  239. Print GetFormIDString refBaseObject
  240. let refStatic := PlayerRef.PlaceAtMe refBaseObject, 1
  241. refStatic.MoveTo refItem
  242. refItem.Disable
  243.  
  244. let fPosX := array_Refs_PosX[iArrayIndex]
  245. let fAngleX := array_Refs_AngleX[iArrayIndex]
  246.  
  247. let fPosY := array_Refs_PosY[iArrayIndex]
  248. let fAngleY := array_Refs_AngleY[iArrayIndex]
  249.  
  250. let fPosZ := array_Refs_PosZ[iArrayIndex]
  251. let fAngleZ := array_Refs_AngleZ[iArrayIndex]
  252.  
  253. refStatic.SetPos X fPosX
  254. refStatic.SetAngle X fAngleX
  255.  
  256. refStatic.SetPos Y fPosY
  257. refStatic.SetAngle Y fAngleY
  258.  
  259. refStatic.SetPos Z fPosZ
  260. refStatic.SetAngle Z fAngleZ
  261.  
  262. endif
  263.  
  264. let iBaseObjectIndex := IsRefInList AAAFyTyFormListSource04Armor, refBaseObject
  265.  
  266. if iBaseObjectIndex > -1
  267.  
  268. let refBaseObject := ListGetNthForm AAAFyTyFormListDest04Armor, iBaseObjectIndex
  269. Print GetFormIDString refBaseObject
  270. let refStatic := PlayerRef.PlaceAtMe refBaseObject, 1
  271. refStatic.MoveTo refItem
  272. refItem.Disable
  273.  
  274. let fPosX := array_Refs_PosX[iArrayIndex]
  275. let fAngleX := array_Refs_AngleX[iArrayIndex]
  276.  
  277. let fPosY := array_Refs_PosY[iArrayIndex]
  278. let fAngleY := array_Refs_AngleY[iArrayIndex]
  279.  
  280. let fPosZ := array_Refs_PosZ[iArrayIndex]
  281. let fAngleZ := array_Refs_AngleZ[iArrayIndex]
  282.  
  283. refStatic.SetPos X fPosX
  284. refStatic.SetAngle X fAngleX
  285.  
  286. refStatic.SetPos Y fPosY
  287. refStatic.SetAngle Y fAngleY
  288.  
  289. refStatic.SetPos Z fPosZ
  290. refStatic.SetAngle Z fAngleZ
  291.  
  292. endif
  293.  
  294. let iBaseObjectIndex := IsRefInList AAAFyTyFormListSource05Book, refBaseObject
  295.  
  296. if iBaseObjectIndex > -1
  297.  
  298. let refBaseObject := ListGetNthForm AAAFyTyFormListDest05Book, iBaseObjectIndex
  299. Print GetFormIDString refBaseObject
  300. let refStatic := PlayerRef.PlaceAtMe refBaseObject, 1
  301. refStatic.MoveTo refItem
  302. refItem.Disable
  303.  
  304. let fPosX := array_Refs_PosX[iArrayIndex]
  305. let fAngleX := array_Refs_AngleX[iArrayIndex]
  306.  
  307. let fPosY := array_Refs_PosY[iArrayIndex]
  308. let fAngleY := array_Refs_AngleY[iArrayIndex]
  309.  
  310. let fPosZ := array_Refs_PosZ[iArrayIndex]
  311. let fAngleZ := array_Refs_AngleZ[iArrayIndex]
  312.  
  313. refStatic.SetPos X fPosX
  314. refStatic.SetAngle X fAngleX
  315.  
  316. refStatic.SetPos Y fPosY
  317. refStatic.SetAngle Y fAngleY
  318.  
  319. refStatic.SetPos Z fPosZ
  320. refStatic.SetAngle Z fAngleZ
  321.  
  322. endif
  323.  
  324. let iBaseObjectIndex := IsRefInList AAAFyTyFormListSource06Card, refBaseObject
  325.  
  326. if iBaseObjectIndex > -1
  327.  
  328. let refBaseObject := ListGetNthForm AAAFyTyFormListDest06Card, iBaseObjectIndex
  329. Print GetFormIDString refBaseObject
  330. let refStatic := PlayerRef.PlaceAtMe refBaseObject, 1
  331. refStatic.MoveTo refItem
  332. refItem.Disable
  333.  
  334. let fPosX := array_Refs_PosX[iArrayIndex]
  335. let fAngleX := array_Refs_AngleX[iArrayIndex]
  336.  
  337. let fPosY := array_Refs_PosY[iArrayIndex]
  338. let fAngleY := array_Refs_AngleY[iArrayIndex]
  339.  
  340. let fPosZ := array_Refs_PosZ[iArrayIndex]
  341. let fAngleZ := array_Refs_AngleZ[iArrayIndex]
  342.  
  343. refStatic.SetPos X fPosX
  344. refStatic.SetAngle X fAngleX
  345.  
  346. refStatic.SetPos Y fPosY
  347. refStatic.SetAngle Y fAngleY
  348.  
  349. refStatic.SetPos Z fPosZ
  350. refStatic.SetAngle Z fAngleZ
  351.  
  352. endif
  353.  
  354. let iBaseObjectIndex := IsRefInList AAAFyTyFormListSource07Card, refBaseObject
  355.  
  356. if iBaseObjectIndex > -1
  357.  
  358. let refBaseObject := ListGetNthForm AAAFyTyFormListDest07Card, iBaseObjectIndex
  359. Print GetFormIDString refBaseObject
  360. let refStatic := PlayerRef.PlaceAtMe refBaseObject, 1
  361. refStatic.MoveTo refItem
  362. refItem.Disable
  363.  
  364. let refStatic := PlayerRef.PlaceAtMe refBaseObject, 1
  365.  
  366. let fPosX := array_Refs_PosX[iArrayIndex]
  367. let fAngleX := array_Refs_AngleX[iArrayIndex]
  368.  
  369. let fPosY := array_Refs_PosY[iArrayIndex]
  370. let fAngleY := array_Refs_AngleY[iArrayIndex]
  371.  
  372. let fPosZ := array_Refs_PosZ[iArrayIndex]
  373. let fAngleZ := array_Refs_AngleZ[iArrayIndex]
  374.  
  375. refStatic.SetPos X fPosX
  376. refStatic.SetAngle X fAngleX
  377.  
  378. refStatic.SetPos Y fPosY
  379. refStatic.SetAngle Y fAngleY
  380.  
  381. refStatic.SetPos Z fPosZ
  382. refStatic.SetAngle Z fAngleZ
  383.  
  384. endif
  385.  
  386. let iBaseObjectIndex := IsRefInList AAAFyTyFormListSource08Misc, refBaseObject
  387.  
  388. if iBaseObjectIndex > -1
  389.  
  390. let refBaseObject := ListGetNthForm AAAFyTyFormListDest08Misc, iBaseObjectIndex
  391. Print GetFormIDString refBaseObject
  392. let refStatic := PlayerRef.PlaceAtMe refBaseObject, 1
  393. refStatic.MoveTo refItem
  394. refItem.Disable
  395.  
  396. let fPosX := array_Refs_PosX[iArrayIndex]
  397. let fAngleX := array_Refs_AngleX[iArrayIndex]
  398.  
  399. let fPosY := array_Refs_PosY[iArrayIndex]
  400. let fAngleY := array_Refs_AngleY[iArrayIndex]
  401.  
  402. let fPosZ := array_Refs_PosZ[iArrayIndex]
  403. let fAngleZ := array_Refs_AngleZ[iArrayIndex]
  404.  
  405. refStatic.SetPos X fPosX
  406. refStatic.SetAngle X fAngleX
  407.  
  408. refStatic.SetPos Y fPosY
  409. refStatic.SetAngle Y fAngleY
  410.  
  411. refStatic.SetPos Z fPosZ
  412. refStatic.SetAngle Z fAngleZ
  413.  
  414. endif
  415.  
  416. let iBaseObjectIndex := IsRefInList AAAFyTyFormListSource09Misc, refBaseObject
  417.  
  418. if iBaseObjectIndex > -1
  419.  
  420. let refBaseObject := ListGetNthForm AAAFyTyFormListDest09Misc, iBaseObjectIndex
  421. Print GetFormIDString refBaseObject
  422. let refStatic := PlayerRef.PlaceAtMe refBaseObject, 1
  423. refStatic.MoveTo refItem
  424. refItem.Disable
  425.  
  426. let fPosX := array_Refs_PosX[iArrayIndex]
  427. let fAngleX := array_Refs_AngleX[iArrayIndex]
  428.  
  429. let fPosY := array_Refs_PosY[iArrayIndex]
  430. let fAngleY := array_Refs_AngleY[iArrayIndex]
  431.  
  432. let fPosZ := array_Refs_PosZ[iArrayIndex]
  433. let fAngleZ := array_Refs_AngleZ[iArrayIndex]
  434.  
  435. refStatic.SetPos X fPosX
  436. refStatic.SetAngle X fAngleX
  437.  
  438. refStatic.SetPos Y fPosY
  439. refStatic.SetAngle Y fAngleY
  440.  
  441. refStatic.SetPos Z fPosZ
  442. refStatic.SetAngle Z fAngleZ
  443.  
  444. endif
  445.  
  446. let iBaseObjectIndex := IsRefInList AAAFyTyFormListSource10Misc, refBaseObject
  447.  
  448. if iBaseObjectIndex > -1
  449.  
  450. let refBaseObject := ListGetNthForm AAAFyTyFormListDest10Misc, iBaseObjectIndex
  451. Print GetFormIDString refBaseObject
  452. let refStatic := PlayerRef.PlaceAtMe refBaseObject, 1
  453. refStatic.MoveTo refItem
  454. refItem.Disable
  455.  
  456. let fPosX := array_Refs_PosX[iArrayIndex]
  457. let fAngleX := array_Refs_AngleX[iArrayIndex]
  458.  
  459. let fPosY := array_Refs_PosY[iArrayIndex]
  460. let fAngleY := array_Refs_AngleY[iArrayIndex]
  461.  
  462. let fPosZ := array_Refs_PosZ[iArrayIndex]
  463. let fAngleZ := array_Refs_AngleZ[iArrayIndex]
  464.  
  465. refStatic.SetPos X fPosX
  466. refStatic.SetAngle X fAngleX
  467.  
  468. refStatic.SetPos Y fPosY
  469. refStatic.SetAngle Y fAngleY
  470.  
  471. refStatic.SetPos Z fPosZ
  472. refStatic.SetAngle Z fAngleZ
  473.  
  474. endif
  475.  
  476. let iBaseObjectIndex := IsRefInList AAAFyTyFormListSource11Misc, refBaseObject
  477.  
  478. if iBaseObjectIndex > -1
  479.  
  480. let refBaseObject := ListGetNthForm AAAFyTyFormListDest11Misc, iBaseObjectIndex
  481. Print GetFormIDString refBaseObject
  482. let refStatic := PlayerRef.PlaceAtMe refBaseObject, 1
  483. refStatic.MoveTo refItem
  484. refItem.Disable
  485.  
  486. let fPosX := array_Refs_PosX[iArrayIndex]
  487. let fAngleX := array_Refs_AngleX[iArrayIndex]
  488.  
  489. let fPosY := array_Refs_PosY[iArrayIndex]
  490. let fAngleY := array_Refs_AngleY[iArrayIndex]
  491.  
  492. let fPosZ := array_Refs_PosZ[iArrayIndex]
  493. let fAngleZ := array_Refs_AngleZ[iArrayIndex]
  494.  
  495. refStatic.SetPos X fPosX
  496. refStatic.SetAngle X fAngleX
  497.  
  498. refStatic.SetPos Y fPosY
  499. refStatic.SetAngle Y fAngleY
  500.  
  501. refStatic.SetPos Z fPosZ
  502. refStatic.SetAngle Z fAngleZ
  503.  
  504. endif
  505.  
  506. let iBaseObjectIndex := IsRefInList AAAFyTyFormListSource12Weapon, refBaseObject
  507.  
  508. if iBaseObjectIndex > -1
  509.  
  510. let refBaseObject := ListGetNthForm AAAFyTyFormListDest12Weapon, iBaseObjectIndex
  511. Print GetFormIDString refBaseObject
  512. let refStatic := PlayerRef.PlaceAtMe refBaseObject, 1
  513. refStatic.MoveTo refItem
  514. refItem.Disable
  515.  
  516. let fPosX := array_Refs_PosX[iArrayIndex]
  517. let fAngleX := array_Refs_AngleX[iArrayIndex]
  518.  
  519. let fPosY := array_Refs_PosY[iArrayIndex]
  520. let fAngleY := array_Refs_AngleY[iArrayIndex]
  521.  
  522. let fPosZ := array_Refs_PosZ[iArrayIndex]
  523. let fAngleZ := array_Refs_AngleZ[iArrayIndex]
  524.  
  525. refStatic.SetPos X fPosX
  526. refStatic.SetAngle X fAngleX
  527.  
  528. refStatic.SetPos Y fPosY
  529. refStatic.SetAngle Y fAngleY
  530.  
  531. refStatic.SetPos Z fPosZ
  532. refStatic.SetAngle Z fAngleZ
  533.  
  534. endif
  535.  
  536. let iBaseObjectIndex := IsRefInList AAAFyTyFormListSource13Weapon, refBaseObject
  537.  
  538. if iBaseObjectIndex > -1
  539.  
  540. let refBaseObject := ListGetNthForm AAAFyTyFormListDest13Weapon, iBaseObjectIndex
  541. Print GetFormIDString refBaseObject
  542. let refStatic := PlayerRef.PlaceAtMe refBaseObject, 1
  543. refStatic.MoveTo refItem
  544. refItem.Disable
  545.  
  546. let fPosX := array_Refs_PosX[iArrayIndex]
  547. let fAngleX := array_Refs_AngleX[iArrayIndex]
  548.  
  549. let fPosY := array_Refs_PosY[iArrayIndex]
  550. let fAngleY := array_Refs_AngleY[iArrayIndex]
  551.  
  552. let fPosZ := array_Refs_PosZ[iArrayIndex]
  553. let fAngleZ := array_Refs_AngleZ[iArrayIndex]
  554.  
  555. refStatic.SetPos X fPosX
  556. refStatic.SetAngle X fAngleX
  557.  
  558. refStatic.SetPos Y fPosY
  559. refStatic.SetAngle Y fAngleY
  560.  
  561. refStatic.SetPos Z fPosZ
  562. refStatic.SetAngle Z fAngleZ
  563.  
  564. endif
  565.  
  566. let iBaseObjectIndex := IsRefInList AAAFyTyFormListSource14Weapon, refBaseObject
  567.  
  568. if iBaseObjectIndex > -1
  569.  
  570. let refBaseObject := ListGetNthForm AAAFyTyFormListDest14Weapon, iBaseObjectIndex
  571. Print GetFormIDString refBaseObject
  572. let refStatic := PlayerRef.PlaceAtMe refBaseObject, 1
  573. refStatic.MoveTo refItem
  574. refItem.Disable
  575.  
  576. let fPosX := array_Refs_PosX[iArrayIndex]
  577. let fAngleX := array_Refs_AngleX[iArrayIndex]
  578.  
  579. let fPosY := array_Refs_PosY[iArrayIndex]
  580. let fAngleY := array_Refs_AngleY[iArrayIndex]
  581.  
  582. let fPosZ := array_Refs_PosZ[iArrayIndex]
  583. let fAngleZ := array_Refs_AngleZ[iArrayIndex]
  584.  
  585. refStatic.SetPos X fPosX
  586. refStatic.SetAngle X fAngleX
  587.  
  588. refStatic.SetPos Y fPosY
  589. refStatic.SetAngle Y fAngleY
  590.  
  591. refStatic.SetPos Z fPosZ
  592. refStatic.SetAngle Z fAngleZ
  593.  
  594. endif
  595.  
  596. loop
  597.  
  598. ;foreach array_Temp <- array_Refs
  599. ; let refItem := array_Temp["value"]
  600. ; refItem.MarkForDelete
  601. ;loop
  602.  
  603. ;Ar_Erase array_Refs
  604. ;Ar_Erase array_Refs_PosX
  605. ;Ar_Erase array_Refs_AngleX
  606. ;Ar_Erase array_Refs_PosY
  607. ;Ar_Erase array_Refs_AngleY
  608. ;Ar_Erase array_Refs_PosZ
  609. ;Ar_Erase array_Refs_AngleZ
  610.  
  611. end function
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!