[Release] Flyff-UDF: Reads Items

    Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen

    • [Release] Flyff-UDF: Reads Items

      [FONT="Franklin Gothic Medium"][COLOR="Sienna"][SIZE="2"]Hi @ all
      Hier release ich eine UDF welche die Items aus den verschiedenen Dateien lädt.
      Die Anfrage kam von Cross aus diesem Fragethread.

      Zurückgegeben wird ein 2D Array mit:
      • ID
      • Name
      • Text
      • PackMax
      • ItemKind1
      • Job
      • Sex
      • Cost


      Als Parameter werden benötigt:
      • $PropItemFile: Pfad zur PropItem.txt
      • $PropItemFile_Txt: Pfad zur PropItem.txt.txt
      • $DefineItemFile: Pfad zur DefineItem.h


      Ist aber erweiterbar. Dafür einfach fragen :wink:
      UDF im Anhang ;)

      Vielleicht braucht es ja noch jemand.

      © by Me

      Beispielcode:

      C-Quellcode

      1. #include <GUIConstantsEx.au3>
      2. #include <ListViewConstants.au3>
      3. #include <WindowsConstants.au3>
      4. #include <Array.au3>
      5. #region ### START Koda GUI section ### Form=
      6. $Form1_1 = GUICreate("Form1", 626, 446, 192, 124)
      7. $ListView1 = GUICtrlCreateListView("ID|Name|Text|PackMax|ItemKind|Job|Sex|Cost", 0, 0, 617, 441)
      8. GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 0, 50)
      9. GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 1, 100)
      10. GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 2, 100)
      11. GUISetState(@SW_SHOW)
      12. #endregion ### END Koda GUI section ###
      14. $Items=_Load_Items("propItem.txt","propItem.txt.txt","defineItem.h")
      15. _Arraydisplay($items)
      16. For $i=1 to Ubound($Items)-1
      17. GUICtrlCreateListViewItem($Items[$i][0] & '|' & $Items[$i][1] & '|' & $Items[$i][2]& '|' & $Items[$i][3]& '|' & $Items[$i][4]& '|' & $Items[$i][5]& '|' &$Items[$i][6]& '|' & $Items[$i][7], $ListView1)
      18. Next
      20. While 1
      21. $nMsg = GUIGetMsg()
      22. Switch $nMsg
      23. Case $GUI_EVENT_CLOSE
      24. Exit
      26. EndSwitch
      27. WEnd
      28. ;Copyright by Kogoro (mmorpg-core.com)
      Alles anzeigen
      [/SIZE][/COLOR][/FONT]
      Dateien

    • Werbung zur Unterstützung des Forums ( Bitte AddBlocker deaktivieren )

    • [FONT="Franklin Gothic Medium"][COLOR="Sienna"][SIZE="2"]Also ich dachte, es wäre klar mit dem Format, wenn ich es im Autoitbereich release.
      Der Code kann mit einem Arraydisplay eigentlich allein laufen. Sonst das Beispiel verwenden ;)
      @ internetfreak: Das ist doch einfacher Code, warum verstehst du ihn denn nicht ^^[/SIZE][/COLOR][/FONT]

    • hi ich habe da gleich mal ein problem mit deiner udf un zwar:
      Error log: von mein script
      Script:
      #include <GUIConstantsEx.au3>
      #include <ListViewConstants.au3>
      #include <WindowsConstants.au3>
      #include <Array.au3>
      #include <File.au3>
      #include <Flyff_ItemReaderUDF.au3>
      #region ### START Koda GUI section ### Form=
      $Form1_1 = GUICreate("Form1", 626, 446, 192, 124)
      $ListView1 = GUICtrlCreateListView("ID|Name|Text|PackMax|ItemKind|Job|Sex|Cost", 0, 0, 617, 441)
      GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 0, 50)
      GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 1, 100)
      GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 2, 100)
      GUISetState(@SW_SHOW)
      #endregion ### END Koda GUI section ###

      $Items=_Load_Items("propItem.txt","propItem.txt.txt","defineItem.h")

      For $i=1 to Ubound($Items)-1
      GUICtrlCreateListViewItem($Items[$i][0] & '|' & $Items[$i][1] & '|' & $Items[$i][2]& '|' & $Items[$i][3]& '|' & $Items[$i][4]& '|' & $Items[$i][5]& '|' &$Items[$i][6]& '|' & $Items[$i][7], $ListView1)
      Next

      While 1
      $nMsg = GUIGetMsg()
      Switch $nMsg
      Case $GUI_EVENT_CLOSE
      Exit

      EndSwitch
      WEnd


      Error:
      >"C:\Programme\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "C:\Dokumente und Einstellungen\Systemroot\Desktop\Flyff Projekt\Itemread.au3" /autoit3dir "C:\Programme\AutoIt3" /UserParams
      +>20:16:26 Starting AutoIt3Wrapper v.2.0.0.3 Environment(Language:0407 Keyboard:00000407 OS:WIN_XP/Service Pack 2 CPU:X64 OS:X86)
      >Running AU3Check (1.54.19.0) from:C:\Programme\AutoIt3
      +>20:16:27 AU3Check ended.rc:0
      >Running:(3.3.6.0):C:\Programme\AutoIt3\autoit3.exe "C:\Dokumente und Einstellungen\Systemroot\Desktop\Flyff Projekt\Itemread.au3"
      C:\Programme\AutoIt3\Include\Flyff_ItemReaderUDF.au3 (48) : ==> Array variable has incorrect number of subscripts or subscript dimension range exceeded.:
      $NameLine = StringSplit($split[3], "_")
      $NameLine = StringSplit(^ ERROR
      ->20:16:28 AutoIT3.exe ended.rc:1
      +>20:16:29 AutoIt3Wrapper Finished
      >Exit code: 1 Time: 2.609


      Udf Error abteil:
      For $i = 1 To UBound($PropItemFile_Array) - 1
      $split = StringSplit($PropItemFile_Array[$i], @TAB)
      If IsNumber(StringIsInt($split[1])) Then
      $z = $z + 1
      $NameLine = StringSplit($split[3], "_")
      If $NameLine[$NameLine[0]] <> 0 Then
      $Name = StringRegExpReplace($PropItemFile_Txt_Array[$NameLine[$NameLine[0]] + 1], "IDS_PROPITEM_TXT_[0-9]+", '')
      $Text = StringRegExpReplace($PropItemFile_Txt_Array[$NameLine[$NameLine[0]] + 2], "IDS_PROPITEM_TXT_[0-9]+", '')
      $ID = StringRegExpReplace(search($DefineItemFile_Array, $split[2]), "#define" & $split[2], '')
      ReDim $Return_Array[UBound($Return_Array) + 1][8]
      $Return_Array[UBound($Return_Array) - 1][0] = $ID
      $Return_Array[UBound($Return_Array) - 1][1] = $Name
      $Return_Array[UBound($Return_Array) - 1][2] = $Text
      $Return_Array[UBound($Return_Array) - 1][3] = $split[5]
      $Return_Array[UBound($Return_Array) - 1][4] = $split[6]
      $Return_Array[UBound($Return_Array) - 1][5] = $split[9]
      $Return_Array[UBound($Return_Array) - 1][6] = $split[12]
      $Return_Array[UBound($Return_Array) - 1][7] = $split[13]
      EndIf
      EndIf
      Next

    • [FONT="Comic Sans MS"][COLOR="DeepSkyBlue"][SIZE="3"]wenn du sein Code nimmst, dann musste auch dafür sorgen, dass alle Dateien da sind, wo sie gebraucht werden^^
      Denke das hast du, von daher, woher der Fehler kommt ka, ich habe mich mit dem Code nich befasst bisher
      Und wann ich das evt mal mach, ka, bin eher an C# dran (XNA machts FUN^^[/SIZE][/COLOR][/FONT]

    • [FONT="Franklin Gothic Medium"][COLOR="Sienna"][SIZE="2"]Hast du die UDF im UDF Standartverzeichnis oder im Ordner, sonst musst du " verwenden bei include ;)
      Stimmen die Pfade?
      Kann sein, dass es auch am OS liegt. Bei mir geht es nämlich. (Vista)

      versuch mal folgenden Code:

      C-Quellcode

      1. #include-once
      2. #include <File.au3>
      4. ;=================================================================================================
      5. ; AutoIt Version: 3.3.6.1
      6. ; Language: German
      7. ; Platform: Vista,Win7
      8. ; Author: Kogoro
      9. ; Requirements: Stable,Beta
      10. ;=================================================================================================
      11. ; Credits: Kogoro
      12. ;=================================================================================================
      13. ;
      14. ; Functions:
      15. ; _Load_Items
      16. ;
      17. ;=================================================================================================
      21. ;==============================================================================
      22. ; Name...........: _Load_Items
      23. ; Version........: 1.0.0.0
      24. ; Description ...: Lädt alle Items aus der PropItem.txt, mitsamt der ID und dem Rest
      25. ; Parameters ....: $PropItemFile: Pfad zur PropItem.txt
      26. ; $PropItemFile_Txt: Pfad zur PropItem.txt.txt
      27. ; $DefineItemFile: Pfad zur DefineItem.h
      28. ; Return values .: Success : Gibt einen Array (2D) zurück mit folgenen Sachen
      29. ; [0]ID
      30. ; [1]Name
      31. ; [2]Text
      32. ; [3]PackMax
      33. ; [4]ItemKind1
      34. ; [5]Job
      35. ; [6]Sex
      36. ; [7]Cost
      37. ; No Success: Nichts
      38. ; Author ........: Kogoro
      39. ; Example .......: Nein
      40. ;=========================================================================================
      41. Func _Load_Items($PropItemFile, $PropItemFile_Txt, $DefineItemFile)
      42. Local $PropItemFile_Txt_Array, $PropItemFile_Array, $DefineItemFile_Array, $Return_Array[2][8]
      43. _FileReadToArray($PropItemFile_Txt, $PropItemFile_Txt_Array)
      44. _FileReadToArray($PropItemFile, $PropItemFile_Array)
      45. _FileReadToArray($DefineItemFile, $DefineItemFile_Array)
      47. For $i = 1 To UBound($PropItemFile_Array) - 1
      48. $split = StringSplit($PropItemFile_Array[$i], @TAB)
      49. If IsNumber(StringIsInt($split[1])) Then
      50. $NameLine = StringSplit($split[3], "_")
      51. If $NameLine[$NameLine[0]] <> 0 Then
      52. $Name = StringRegExpReplace($PropItemFile_Txt_Array[$NameLine[$NameLine[0]] + 1], "IDS_PROPITEM_TXT_[0-9]+", '')
      53. $Text = StringRegExpReplace($PropItemFile_Txt_Array[$NameLine[$NameLine[0]] + 2], "IDS_PROPITEM_TXT_[0-9]+", '')
      54. $ID = StringRegExpReplace(search($DefineItemFile_Array, $split[2]), "#define" & $split[2], '')
      55. ReDim $Return_Array[UBound($Return_Array) + 1][8]
      56. $Return_Array[UBound($Return_Array) - 1][0] = $ID
      57. $Return_Array[UBound($Return_Array) - 1][1] = $Name
      58. $Return_Array[UBound($Return_Array) - 1][2] = $Text
      59. $Return_Array[UBound($Return_Array) - 1][3] = $split[5]
      60. $Return_Array[UBound($Return_Array) - 1][4] = $split[6]
      61. $Return_Array[UBound($Return_Array) - 1][5] = $split[9]
      62. $Return_Array[UBound($Return_Array) - 1][6] = $split[12]
      63. $Return_Array[UBound($Return_Array) - 1][7] = $split[13]
      64. EndIf
      65. EndIf
      66. Next
      67. Return $Return_Array
      68. EndFunc ;==>_Load_Items
      70. ;=================================================================================================
      71. ;internal functions and infos
      72. ;=================================================================================================
      74. Func search($array, $suchwort)
      75. For $i = 0 To UBound($array) - 1
      76. If StringInStr($array[$i], $suchwort) > 0 Then
      77. Return StringStripWS($array[$i], 8)
      78. EndIf
      79. Next
      80. EndFunc ;==>search
      Alles anzeigen


      1.Post Beispiel geupdatet[/SIZE][/COLOR][/FONT]

    • neuer error^^:
      >"C:\Programme\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "C:\Dokumente und Einstellungen\Systemroot\Desktop\Flyff Projekt\Itemread.au3" /autoit3dir "C:\Programme\AutoIt3" /UserParams
      +>18:29:35 Starting AutoIt3Wrapper v.2.0.0.3 Environment(Language:0407 Keyboard:00000407 OS:WIN_XP/Service Pack 2 CPU:X64 OS:X86)
      >Running AU3Check (1.54.19.0) from:C:\Programme\AutoIt3
      +>18:29:36 AU3Check ended.rc:0
      >Running:(3.3.6.0):C:\Programme\AutoIt3\autoit3.exe "C:\Dokumente und Einstellungen\Systemroot\Desktop\Flyff Projekt\Itemread.au3"
      C:\Programme\AutoIt3\Include\Flyff_ItemReaderUDF.au3 (50) : ==> Array variable has incorrect number of subscripts or subscript dimension range exceeded.:
      $NameLine = StringSplit($split[3], "_")
      $NameLine = StringSplit(^ ERROR
      ->18:29:38 AutoIT3.exe ended.rc:1
      +>18:29:40 AutoIt3Wrapper Finished
      >Exit code: 1 Time: 4.603

      sry das ich sone probleme mache^^

    • [FONT="Comic Sans MS"][COLOR="DeepSkyBlue"][SIZE="3"]Wieder irgendwas mit nem Array.
      Du musst irgendwie was falsch machen^^
      Denn der kann nich auf das Array zugreifen, was er aber muss und daher gibts nen Error.
      Bzw das Array hat irgendwie nich die richtige Größe, so dass der Index drinvorkommt, den das Prog will[/SIZE][/COLOR][/FONT]

    • #include-once
      #include <File.au3>

      ;=================================================================================================
      ; AutoIt Version: 3.3.6.1
      ; Language: German
      ; Platform: Vista,Win7
      ; Author: Kogoro
      ; Requirements: Stable,Beta
      ;=================================================================================================
      ; Credits: Kogoro
      ;=================================================================================================
      ;
      ; Functions:
      ; _Load_Items
      ;
      ;=================================================================================================



      ;==============================================================================
      ; Name...........: _Load_Items
      ; Version........: 1.0.0.0
      ; Description ...: Lädt alle Items aus der PropItem.txt, mitsamt der ID und dem Rest
      ; Parameters ....: $PropItemFile: Pfad zur PropItem.txt
      ; $PropItemFile_Txt: Pfad zur PropItem.txt.txt
      ; $DefineItemFile: Pfad zur DefineItem.h
      ; Return values .: Success : Gibt einen Array (2D) zurück mit folgenen Sachen
      ; [0]ID
      ; [1]Name
      ; [2]Text
      ; [3]PackMax
      ; [4]ItemKind1
      ; [5]Job
      ; [6]Sex
      ; [7]Cost
      ; No Success: Nichts
      ; Author ........: Kogoro
      ; Example .......: Nein
      ;=========================================================================================
      Func _Load_Items($PropItemFile, $PropItemFile_Txt, $DefineItemFile)
      Local $PropItemFile_Txt_Array, $PropItemFile_Array, $DefineItemFile_Array, $Return_Array[2][8]
      _FileReadToArray($PropItemFile_Txt, $PropItemFile_Txt_Array)
      _FileReadToArray($PropItemFile, $PropItemFile_Array)
      _FileReadToArray($DefineItemFile, $DefineItemFile_Array)

      For $i = 1 To UBound($PropItemFile_Array) - 1
      $split = StringSplit($PropItemFile_Array[$i], @TAB)
      If IsNumber(StringIsInt($split[1])) Then
      $NameLine = StringSplit($split[3], "_")
      If $NameLine[$NameLine[0]] <> 0 Then
      $Name = StringRegExpReplace($PropItemFile_Txt_Array[$NameLine[$NameLine[0]] + 1], "IDS_PROPITEM_TXT_[0-9]+", '')
      $Text = StringRegExpReplace($PropItemFile_Txt_Array[$NameLine[$NameLine[0]] + 2], "IDS_PROPITEM_TXT_[0-9]+", '')
      $ID = StringRegExpReplace(search($DefineItemFile_Array, $split[2]), "#define" & $split[2], '')
      ReDim $Return_Array[UBound($Return_Array) + 1][8]
      $Return_Array[UBound($Return_Array) - 1][0] = $ID
      $Return_Array[UBound($Return_Array) - 1][1] = $Name
      $Return_Array[UBound($Return_Array) - 1][2] = $Text
      $Return_Array[UBound($Return_Array) - 1][3] = $split[5]
      $Return_Array[UBound($Return_Array) - 1][4] = $split[6]
      $Return_Array[UBound($Return_Array) - 1][5] = $split[9]
      $Return_Array[UBound($Return_Array) - 1][6] = $split[12]
      $Return_Array[UBound($Return_Array) - 1][7] = $split[13]
      EndIf
      EndIf
      Next
      Return $Return_Array
      EndFunc ;==>_Load_Items

      ;=================================================================================================
      ;internal functions and infos
      ;=================================================================================================

      Func search($array, $suchwort)
      For $i = 0 To UBound($array) - 1
      If StringInStr($array[$i], $suchwort) > 0 Then
      Return StringStripWS($array[$i], 8)
      EndIf
      Next
      EndFunc ;==>search

      immernoch^^

    • [FONT="Franklin Gothic Medium"][COLOR="Sienna"][SIZE="2"]Du solltest den folgenden Code laufen lassen:

      C-Quellcode

      1. #include-once
      2. #include <File.au3>
      3. #include <Array.au3>
      5. ;================================================= ================================================
      6. ; AutoIt Version: 3.3.6.1
      7. ; Language: German
      8. ; Platform: Vista,Win7
      9. ; Author: Kogoro
      10. ; Requirements: Stable,Beta
      11. ;================================================= ================================================
      12. ; Credits: Kogoro
      13. ;================================================= ================================================
      14. ;
      15. ; Functions:
      16. ; _Load_Items
      17. ;
      18. ;================================================= ================================================
      22. ;================================================= =============================
      23. ; Name...........: _Load_Items
      24. ; Version........: 1.0.0.0
      25. ; Description ...: Lädt alle Items aus der PropItem.txt, mitsamt der ID und dem Rest
      26. ; Parameters ....: $PropItemFile: Pfad zur PropItem.txt
      27. ; $PropItemFile_Txt: Pfad zur PropItem.txt.txt
      28. ; $DefineItemFile: Pfad zur DefineItem.h
      29. ; Return values .: Success : Gibt einen Array (2D) zurück mit folgenen Sachen
      30. ; [0]ID
      31. ; [1]Name
      32. ; [2]Text
      33. ; [3]PackMax
      34. ; [4]ItemKind1
      35. ; [5]Job
      36. ; [6]Sex
      37. ; [7]Cost
      38. ; No Success: Nichts
      39. ; Author ........: Kogoro
      40. ; Example .......: Nein
      41. ;================================================= ========================================
      42. Func _Load_Items($PropItemFile, $PropItemFile_Txt, $DefineItemFile)
      43. Local $PropItemFile_Txt_Array, $PropItemFile_Array, $DefineItemFile_Array, $Return_Array[2][8]
      44. _FileReadToArray($PropItemFile_Txt, $PropItemFile_Txt_Array)
      45. _FileReadToArray($PropItemFile, $PropItemFile_Array)
      46. _FileReadToArray($DefineItemFile, $DefineItemFile_Array)
      48. For $i = 1 To UBound($PropItemFile_Array) - 1
      49. $split = StringSplit($PropItemFile_Array[$i], @TAB)
      50. _arraydisplay($split)
      51. If IsNumber(StringIsInt($split[1])) Then
      52. $NameLine = StringSplit($split[3], "_")
      53. If $NameLine[$NameLine[0]] <> 0 Then
      54. $Name = StringRegExpReplace($PropItemFile_Txt_Array[$NameLine[$NameLine[0]] + 1], "IDS_PROPITEM_TXT_[0-9]+", '')
      55. $Text = StringRegExpReplace($PropItemFile_Txt_Array[$NameLine[$NameLine[0]] + 2], "IDS_PROPITEM_TXT_[0-9]+", '')
      56. $ID = StringRegExpReplace(search($DefineItemFile_Array, $split[2]), "#define" & $split[2], '')
      57. ReDim $Return_Array[UBound($Return_Array) + 1][8]
      58. $Return_Array[UBound($Return_Array) - 1][0] = $ID
      59. $Return_Array[UBound($Return_Array) - 1][1] = $Name
      60. $Return_Array[UBound($Return_Array) - 1][2] = $Text
      61. $Return_Array[UBound($Return_Array) - 1][3] = $split[5]
      62. $Return_Array[UBound($Return_Array) - 1][4] = $split[6]
      63. $Return_Array[UBound($Return_Array) - 1][5] = $split[9]
      64. $Return_Array[UBound($Return_Array) - 1][6] = $split[12]
      65. $Return_Array[UBound($Return_Array) - 1][7] = $split[13]
      66. EndIf
      67. EndIf
      68. Next
      69. Return $Return_Array
      70. EndFunc ;==>_Load_Items
      72. ;================================================= ================================================
      73. ;internal functions and infos
      74. ;================================================= ================================================
      76. Func search($array, $suchwort)
      77. For $i = 0 To UBound($array) - 1
      78. If StringInStr($array[$i], $suchwort) > 0 Then
      79. Return StringStripWS($array[$i], 8)
      80. EndIf
      81. Next
      82. EndFunc ;==>search
      Alles anzeigen


      Dann taucht bei jedem Eintrag ein Fenster auf und von einem Brauche ich den Inhalt.[/SIZE][/COLOR][/FONT]