PWI - Guide for finding chat message offsets - C# code included

[dumbfck]

I found the problem.....
The problem is that I'm actually slightly retarded lol.
I'm still in the process of reinstalling everything after starting with some fresh HDDs - Well, what I hadn't got around to was installing my soundcard
So erm... yeah... That's why it wouldn't load =P

Playing with it now. This is pretty awesome, thanks again, omarranimado =]

[omarranimado]

Originally Posted by dumbfck

I found the problem.....
The problem is that I'm actually slightly retarded lol.
I'm still in the process of reinstalling everything after starting with some fresh HDDs - Well, what I hadn't got around to was installing my soundcard
So erm... yeah... That's why it wouldn't load =P

Playing with it now. This is pretty awesome, thanks again, omarranimado =]

yeah, glad to hear that it work now fine
must really smile wen i read what was the "error".

i search the board for infos about catshop inventory, now i try something.
4x times my pw crashed

i think i stop it now, was hard day working and im empty.
better watch a movie then wrote some spagetti code

[dumbfck]

Sounds like you might have injected some code into the wrong address somewhere? That's the most common cause of a client crash.
Maybe using sendPackets stuff and got the wrong address for that?
If you're on PWI, the sendPackets function address is 0x64FB50
For other versions, I have no idea, sorry.

[omarranimado]

Originally Posted by dumbfck

Sounds like you might have injected some code into the wrong address somewhere? That's the most common cause of a client crash.
Maybe using sendPackets stuff and got the wrong address for that?
If you're on PWI, the sendPackets function address is 0x64FB50
For other versions, I have no idea, sorry.

thanks
i try it the days, today is not my coding day
so i take a look on the item id problem some users here have.

do u take a look in the file element\data\gshop.data ?
theres item id and more inside

maybe i code quick a tool to read the file clear out, but not today.

[dumbfck]

Yeah gshop.data seems to be the items from the cash shop - Not sure how useful that file is because I think all of those items also appear in elements.data
Although I could be wrong.... I was once =P

[Smurfin]

Originally Posted by omarranimado

yep, autoit can make colored listview colums.
heres a sample for that:

 Spoiler

#Include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <GuiListView.au3>

;custom draw constants
;~ Global Const $CDDS_ITEM = 0x10000
;~ Global Const $CDDS_MAPPART = 0x5
;~ Global Const $CDDS_POSTERASE = 0x4
;~ Global Const $CDDS_POSTPAINT = 0x2
;~ Global Const $CDDS_PREERASE = 0x3
;~ Global Const $CDDS_PREPAINT = 0x1
;~ Global Const $CDDS_SUBITEM = 0x20000
;~ Global Const $CDDS_ITEMPOSTERASE = BitOR($CDDS_ITEM, $CDDS_POSTERASE)
;~ Global Const $CDDS_ITEMPOSTPAINT = BitOR($CDDS_ITEM, $CDDS_POSTPAINT)
;~ Global Const $CDDS_ITEMPREERASE = BitOR($CDDS_ITEM, $CDDS_PREERASE)
;~ Global Const $CDDS_ITEMPREPAINT = BitOR($CDDS_ITEM, $CDDS_PREPAINT)

;~ Global Const $CDIS_CHECKED = 0x8
;~ Global Const $CDIS_DEFAULT = 0x20
;~ Global Const $CDIS_DISABLED = 0x4
;~ Global Const $CDIS_FOCUS = 0x10
;~ Global Const $CDIS_GRAYED = 0x2
;~ Global Const $CDIS_HOT = 0x40
;~ Global Const $CDIS_INDETERMINATE = 0x100
;~ Global Const $CDIS_MARKED = 0x80
;~ Global Const $CDIS_SELECTED = 0x1
;~ Global Const $CDIS_SHOWKEYBOARDCUES = 0x200

;~ Global Const $CDRF_DODEFAULT = 0x0
;~ Global Const $CDRF_NEWFONT = 0x2
;~ Global Const $CDRF_NOTIFYITEMDRAW = 0x20
;~ Global Const $CDRF_NOTIFYPOSTERASE = 0x40
;~ Global Const $CDRF_NOTIFYPOSTPAINT = 0x10
;~ Global Const $CDRF_NOTIFYSUBITEMDRAW = 0x20
;~ Global Const $CDRF_SKIPDEFAULT = 0x4

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
                        "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
                        "dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
                        "dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
                        "dword", 0, "str", "")
                        


$hGUI = GUICreate("Listview Custom Draw", 400, 300)

$cListView = GUICtrlCreateListView("", 2, 2, 394, 268, -1, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
$hListView = GUICtrlGetHandle($cListView)
GUICtrlCreateInput("", 50, 275, 100, 15)

_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
    _GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
    For $j = 1 To 2
        _GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
    Next
Next

$tNewProc = DllCallbackRegister("_NewWindowProc", "int", "hwnd;uint;wparam;lparam")
$pOldProc = _WinAPI_SetWindowLong($hGUI, -4, DllCallbackGetPtr($tNewProc))
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
_WinAPI_SetWindowLong($hGUI, -4, $pOldProc)
DllCallbackFree($tNewProc)
Exit

Func _NewWindowProc($hWnd, $Msg, $wParam, $lParam)
    If $Msg = $WM_NOTIFY Then
        Local $iRet = WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
        If $iRet <> $GUI_RUNDEFMSG Then Return $iRet
    EndIf
    Return _CallWindowProc($pOldProc, $hWnd, $Msg, $wParam, $lParam)
EndFunc
Func _CallWindowProc($pOldProc, $hWnd, $Msg, $wParam, $lParam)
    Local $aRet = DllCall('user32.dll', 'uint', 'CallWindowProc', 'ptr', $pOldProc, 'hwnd', $hWnd, 'uint', $Msg, 'wparam', $wParam, 'lparam', $lParam)
;~  If @error Then Return 0
    Return $aRet[0]
EndFunc
Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
    Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

    $tNMHDR = DllStructCreate($tagNMHDR, $lParam)
    $hWndFrom = DllStructGetData($tNMHDR, "hWndFrom")
    $iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
    $iCode = DllStructGetData($tNMHDR, "Code")
    Switch $hWndFrom
        Case $hListView
            Switch $iCode
                Case $NM_CUSTOMDRAW
                    If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
                    Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
                                        'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
                                        'dword clrText;dword clrTextBk;int SubItem;' & _
                                        'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
                                        $lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $tRect, $iColor1, $iColor2, $iColor3
                    $iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
                    Switch $iDrawStage
                        Case $CDDS_PREPAINT
                            Return $CDRF_NOTIFYITEMDRAW
                        Case $CDDS_ITEMPREPAINT
                            Return $CDRF_NOTIFYSUBITEMDRAW
                        Case $CDDS_ITEMPOSTPAINT
                        Case BitOR($CDDS_ITEMPREPAINT, $CDDS_SUBITEM)
                            $iItem = DllStructGetData($tCustDraw, 'ItemSpec')
                            $iSubitem = DllStructGetData($tCustDraw, 'SubItem')
                            If _GUICtrlListView_GetItemSelected($hWndFrom, $iItem) Then
                                $hDC = DllStructGetData($tCustDraw, 'hdc');_WinAPI_GetDC($hWndFrom)
                                $tRect = DllStructCreate('long;long;long;long')
                                If $iSubitem = 0 Then
                                    DllCall('user32.dll','int','SendMessage', 'hwnd',$hWndFrom, 'uint',$LVM_GETSUBITEMRECT, 'wparam',$iItem, 'lparam',DllStructGetPtr($tRect))
                                    DllStructSetData($tRect, 1, 2)
                                    DllCall('user32.dll', 'int', 'FillRect', 'ptr', $hDC, 'ptr', DllStructGetPtr($tRect), 'int', _WinAPI_GetStockObject(4))
                                EndIf
                                DllStructSetData($tRect, 1, 2)
                                DllStructSetData($tRect, 2, $iSubitem)
                                DllCall('user32.dll','int','SendMessage', 'hwnd',$hWndFrom, 'uint',$LVM_GETSUBITEMRECT, 'wparam',$iItem, 'lparam',DllStructGetPtr($tRect))
                                Local $sText = _GUICtrlListView_GetItemText($hWndFrom, $iItem, $iSubitem)
                                DLLCall("gdi32.dll","int","SetTextColor", "ptr", $hDC, "int", RGB2BGR(0xffff00))
                                DLLCall("gdi32.dll","int","SetBkMode", "ptr", $hDC, "int", 1)
                                Local $iAlign = 6
                                If $iSubitem = 0 Then $iAlign = 2
                                DllStructSetData($tRect, 1, DllStructGetData($tRect, 1)+$iAlign)
                                _WinAPI_DrawText($hDC, $sText, $tRect, 0x8000) ;; $DT_END_ELLIPSIS
;~                              _WinAPI_ReleaseDC($hWndFrom, $hDC)                          
                                Return $CDRF_SKIPDEFAULT
                            EndIf
                            Switch $iItem
                                Case 0 To 9 ;for rows 1-10 lets do this
                                    $iColor1 = RGB2BGR(0xFBFFD8)
                                    $iColor2 = RGB2BGR(-1)
                                    $iColor3 = RGB2BGR(0xFF0000)
                                    If Mod($iSubitem, 2) Then ;odd columns
                                        DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
                                        DllStructSetData($tCustDraw, 'clrText', 0)
                                    Else ;even columns
                                        DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
                                        DllStructSetData($tCustDraw, 'clrText', $iColor3)
                                    EndIf
                                Case 10 To 19 ;for rows 11-20 lets do this
                                    $iColor1 = RGB2BGR(0xFBFFD8)
                                    $iColor2 = RGB2BGR(0x3DF8FF)
                                    $hDC = DllStructGetData($tCustDraw, 'hdc')
                                    If Mod($iItem, 2) Then
                                        If Mod($iSubitem, 2) Then
                                            DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
                                        Else
                                            DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
                                        EndIf
                                        DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
                                    Else
                                        If Mod($iSubitem, 2) Then
                                            DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
                                        Else
                                            DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
                                        EndIf
                                        DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
                                    EndIf
                                Case 20 To 29 ;for rows 21-30 lets do this
                                    $iColor1 = RGB2BGR(0xFBFFD8)
                                    $iColor2 = RGB2BGR(-1)
                                    If Mod($iItem, 2) Then ;odd rows
                                        DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
                                    Else
                                        DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
                                    EndIf                           
                            EndSwitch
                            Return $CDRF_NEWFONT
                        Case BitOR($CDDS_ITEMPOSTPAINT, $CDDS_SUBITEM)                      
                        Case Else
                    EndSwitch
            EndSwitch
    EndSwitch
    Return $GUI_RUNDEFMSG
EndFunc   ;==>WM_NOTIFY

Func RGB2BGR($iColor)
    Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc

nice, any column/row can have its own color
thanks for the listview columns coloring sample script

[dumbfck]

Regarding the AH stuff, just found some potentially interesting files in surfaces.pck\ingame

auctionid.txt - Wondering if it might be some sort of ID mapping. Although as far as I've noticed, the IDs already seem to tie up?

auctiontree.txt - The exact tree listing of the auction filters. Might be useful if anyone is planning to make some sort of advanced AH bot =P

I won't get to play with these until later - maybe even tomorrow, but thought I'd put them out there for the people already working on AH stuff ^_^

[omarranimado]

Originally Posted by dumbfck

Regarding the AH stuff, just found some potentially interesting files in surfaces.pck\ingame

auctionid.txt - Wondering if it might be some sort of ID mapping. Although as far as I've noticed, the IDs already seem to tie up?

auctiontree.txt - The exact tree listing of the auction filters. Might be useful if anyone is planning to make some sort of advanced AH bot =P

I won't get to play with these until later - maybe even tomorrow, but thought I'd put them out there for the people already working on AH stuff ^_^

thats nice, but i would say better use the gshop.data
since its a small file, containing all the needed infos like id ++
i checked ur item id file:

18314 18314 Chain Boots

now look at this screen from gshop.data values:

 Spoiler

and that say pwidatabase:


all matched, but gshop.data smaller and can be used after every game update + no need to extract pck files

[dumbfck]

Oh that does look pretty cool. I have that program too, but never took much notice of it =P
Only downside though is that not all in game items are available from the cash shop - I think that data file only contains cash shop items. Very handy, nonetheless.


I just played a bit more with the AH text files in surfaces.pck
Seems that auctiontree.txt is a straight representation of the filter lists you can see in the AH.
auctionid.txt shows the possible items that can be seen in a given filter which allows for showing different variations of those items, e.g., 1*, 2*, 3* versions



Now the cool part... We can add filters! This is potentially useful for filtering stuff that they haven't added to the AH filters yet, such as fashion - They normally take ages to add fashion to the AH on PWI lol.

Ok, might as well give a quick guide: (Sorry btw, this might only work for PWI and CN versions D: - The sPCK part should work, but sELedit probably wont. You can, however, get the item IDs using other methods mentioned in various places around this forum )

If you don't already have a working copy of sPCK, download .
Unzip it to a folder somewhere and run the pwtools-binaries.bat file. This will download all the other programs too - They're interesting to play with and I can't be arsed to edit the bat to just download sPCK and sELedit lol.

Once it's all downloaded, take a look in the stools-src\bin\sPCK folder.
In your Perfect World\elements folder, make a backup of surfaces.pck and then copy this file to stools-src\bin\sPCK
Then run sPCK.exe (I have , which has a nice 'send to command prompt' addon ^^)
Then the command you want is:

sPCK.exe -x surfaces.pck

This will unpack everything into surfaces.pck.files

Now open that new folder and go to surfaces.pck.files\surfaces\ingame
Look for the two files:
auctionid.txt
auctiontree.txt

Load them both up in wordpad.
Now, think of some items you want to add. On PWI, the new Kitty stuff isn't yet in the filter system in the AH, so lets go to sELedit (which you just downloaded in the pwTools package hehe)
File -> Load -> Choose your PW version if it's in the list (sorry if it isn't )
Then navigate to your Perfect World\elements\data\elements.data file
This should load up the data file.
Now from the dropdown list in sELedit, scroll down and find the fashion list. Then in the search box at the bottom, type 'Kitty' and hit the Find button.
Hopefully it will find the new Kitty fashion items.

Now look at the screenshot - I think this should explain it all ^_^
(Note that I put all the new items in the same area, just for illustrative purposes)


Once you've edited the .txt files, save them both then go back to your sPCK folder.

Run sPCK again, but this time with the command:

sPCK.exe -c surfaces.pck.files

This will re-pack the files into surfaces.pck (you might want to remove the original one you placed in this folder, just to be sure it worked)

Now just copy the new surfaces.pck file into your perfect world\elements folder and start the game ^_^

Now go to the AH and..... Hey presto ^_^


And there you have it. You now have a simple way to look for new fashion items in the AH that most people won't notice or be able to find ^_^ (although, they have fixed the search function now.... so others can still find it if they're sharp enough to figure that out =P)

[omarranimado]

*lol* thats very cool
send this tutorial to pwi stuff, that such updates not take so long.

i take a closer look at the gshop.data, its the cashshop item list only

[Interest07]

When I still played PW MS I had edited those files to be able to search at all, since PW MS hadn't translated those from chinese

But ya they could be handy

[omarranimado]

i dont liked to take hours to find out were exactly the item ids and names are stored.
so i quickly type some sort of code with my furry hands, extracting all the id and names from the online database.
so i can use the created database for my catshopper



Have Fun with the Autoit Source:

 Spoiler

;#######################################################################
; Perfect World Database Extractor v.2
; quick typed by "Cat in the Bag"
;
; How to use:
; 0. there must be a folder named IMG inside the tool folder, for the images
; 1. enter URL from your PW Database (pwi, my, ru)
; 2. set amount of scanned ID´s , eg. 1000 for ID0 up to  ID1000 ID
; 3. press START and go shopping or dring a lot coke while scanning.
;
; when finish scanning, look in Tool Folder for: database.db
; u can open this file with any texteditor
; images inside IMG folder are named like item id eg. 306.gif
;
; entrys looks like: 
;[ID][@][NAME]
;6@*Steel Falchion
; u can split Item ID and Item Name with @
;
; have fun :D
;#####################################################################
;#######################################################################
; Perfect World Database Extractor v.3
; quick typed by "Cat in the Bag"
;
; How to use:
; 0. there must be a folder named IMG inside the tool folder, for the images
; 1. enter URL from your PW Database (pwi, my, ru)
; 2. set amount of scanned ID´s , eg. 1000 for ID0 up to  ID1000 ID
; 3. press START and go shopping or dring a lot coke while scanning.
;
; when finish scanning, look in Tool Folder for: database.db
; u can open this file with any texteditor
;
; entrys looks like: 
;[ID][@][NAME]
;6@*Steel Falchion
; u can split Item ID and Item Name with @
;
; have fun :D
;#####################################################################
#include <INet.au3>
#include <String.au3>
#include <array.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>



Global $counter,$Start_Stop="stop",$ExitLoop=False,$Splitcount,$SpanStyle,$NameBuff,$ItemColor
 
Global $item_color[11]
$item_color[0]="#ffffff;"
$item_color[1]="#8080ff;"
$item_color[2]="#ffdc50;"
$item_color[3]="#aa32ff;"
$item_color[4]="#ff6000;"
$item_color[5]="#ffffff;"
$item_color[6]="#b0b0b0;"
$item_color[7]="#00ffae;"
$item_color[8]="#6cfb4b;"
$item_color[9]="#ff0000;"
$item_color[10]="#80ffff;"


$Form1 = GUICreate("PW Database Extractor", 330, 308, 184, 124)
$Group1 = GUICtrlCreateGroup("Amount", 8, 104, 313, 57)
$Label2 = GUICtrlCreateLabel("Scan up to Item ID:", 16, 128, 97, 17)
$MaxITEMS = GUICtrlCreateInput("35000", 114, 124, 81, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$STATUS = GUICtrlCreateLabel("Ready to scan...", 16, 256, 300, 17)
$Group2 = GUICtrlCreateGroup("Status", 8, 240, 313, 57)
$ITEMCount = GUICtrlCreateLabel("0", 96, 276, 220, 17)
$LabelStatus = GUICtrlCreateLabel("Found Items: ", 16, 276, 77, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup("Language", 8, 32, 313, 65)
$LabelLang = GUICtrlCreateLabel("Enter: pwi, my or ru", 16, 50, 97, 21)
$URL = GUICtrlCreateInput("pwi", 114, 48, 97, 21)
$CHK_DL = GUICtrlCreateCheckbox("Download Item Images too", 16, 72, 157, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group4 = GUICtrlCreateGroup("", 8, 168, 313, 65)
Global $Button_Start = GUICtrlCreateButton("Start Scan", 16, 182, 91, 41, $WS_GROUP)
GUICtrlSetOnEvent($Button_Start, "_start")
Global $Button_Stop = GUICtrlCreateButton("Stop Scan", 126, 182, 91, 41, $WS_GROUP)
GUICtrlSetOnEvent($Button_Stop, "_stop")
Global $Button_Exit = GUICtrlCreateButton("Exit", 236, 182, 75, 41, $WS_GROUP)
GUICtrlSetOnEvent($Button_Exit, "_exit")

GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label4 = GUICtrlCreateLabel('Perfect World Database Extractor by "Cat in the Bag"', 10, 8, 309, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)

 
While 1
    $GUIMsg = GUIGetMsg()
	switch $GUIMsg
 
         Case $GUI_EVENT_CLOSE  
             _exit()
		 Case $Button_Exit
			 _exit()

         Case $Button_Start
			if $ExitLoop=False then
            Opt("GUIOnEventMode", 1)
            GUISetOnEvent($GUI_EVENT_CLOSE, "_exit")
            GUICtrlSetOnEvent($Button_Exit, "_exit")		
            GUICtrlSetOnEvent($Button_Stop, "_stop")
			_start()	
			endif

    Endswitch
WEnd


Func _stop() 
	GUICtrlSetState($Button_Start,$GUI_ENABLE)
	GUICtrlSetState($Button_Stop,$GUI_DISABLE)
	$ExitLoop=True
EndFunc
;#############################################################
FUNC _start() 
	if $ExitLoop=False then
	GUICtrlSetState($Button_Start,$GUI_DISABLE)
	GUICtrlSetState($Button_Stop,$GUI_ENABLE)
	;GUICtrlSetData($Button_Start, "Stop Scan")
	GetDatabaseIDs(GUICtrlRead($MaxITEMS)) ; amount to search		
	
	GUICtrlSetData($STATUS, "Finish scanning and new Database saved...")
	
	GUICtrlSetState($Button_Start,$GUI_ENABLE)
	GUICtrlSetState($Button_Stop,$GUI_DISABLE)
Opt("GUIOnEventMode", 0)
	endif
EndFunc	
;#############################################################
FUNC _exit() 
	$ExitLoop=True
	Exit	
EndFunc	
;#############################################################
FUNC GetDatabaseIDs($items)
$Button_Start = False
;open database as unicode
$hDatabase = FileOpen("database.db",34)
;start the loop
$counter=0
For $x=0 To $items-1	
$ItemID = $x
;get website content
$sfileHtml  = _INetGetSource("http://www.pwdatabase.com/" & GUICtrlRead($URL) & "/items/" & $ItemID) 
;remove tab from html text...
$sfileHtml  = StringRegExpReplace($sfileHtml , @CRLF, "@")
; get item name
$ItemName=_StringBetween($sfileHtml,'<th class="itemHeader" colspan="2">','@') ; Item Name
IF not @Error=1 then
	$Chinese = StringInStr($ItemName[0], "N/")  ; chinese string, not ingame item
	IF $Chinese = 0 then 						;if not found...
	   formatName($ItemName[0])                 ;format the html stuff and split string...
		if not $NameBuff="" Then				; if name not empty
			FileWriteLine($hDatabase, $ItemID & "@" & $ItemColor & "@" & $NameBuff & @CRLF); save to database
			;if dl image checked
			if GUICtrlRead($CHK_DL )=1 then
			InetGet("http://www.pwdatabase.com/images/icons/generalm/" & $ItemID & ".gif", "img\" & $ItemID & ".gif", 1)
			endif
		endif
	ENDIF
$counter += 1
ENDIF
;set status counter
GUICtrlSetData($ITEMCount, $counter)
GUICtrlSetData($STATUS, "Scanning Item ID: " & $ItemID & "/" & $items)

If $ExitLoop=True Then ExitLoop	
next
FileClose($hDatabase)	
EndFunc	
;#####################################################################
FUNC formatName($NameTMP)
;look for spanclass
$SpanStyle = StringInStr($NameTMP, "item_color")
IF $SpanStyle > 0 then
    ;get item color
	$ItemColor=_StringBetween($NameTMP,"'","'>")
	;format item color
	$ColorNum = StringTrimLeft($ItemColor[0], 10)
	$ItemColor=$item_color[$ColorNum]
	;remove span
    $SpecialChar=_StringBetween($NameTMP,'>','<')
	$NameBuff=$SpecialChar[0]
Else	
	$ItemColor= $item_color[0]
	$NameBuff=$NameTMP
endif


$NameBuff  = StringRegExpReplace($NameBuff ,"â—�", "•") ; is •
$NameBuff  = StringRegExpReplace($NameBuff ,"â—‹", "ο") ;  is ο
;look for special html chars...
$pathsplit = StringSplit($NameBuff, ';')
For $Splitcount=1 To $pathsplit[0]-1 ;if found change to unicode...
	$SpecialChar=_StringBetween($pathsplit[$Splitcount]&";",'&#',';') 
	; change special html char to unicode char
	$SpecialChar = ChrW($SpecialChar[0])	
	$NameBuff  = StringRegExpReplace($NameBuff, $pathsplit[$Splitcount]&";", $SpecialChar)
next

EndFunc	
;#####################################################################

[dumbfck]

Hehe that's quite neat ^^
I did something similar ages ago in PHP - I'd completely forgotten I'd done it lol. I have a bad feeling that was on my HDD that puked though :P

As for the whole 'cat in the bag' thing - I'm staying out of that lol.

[Sᴡoosh]

I dumped it some time ago - before genesis expansion. here my data , if anyone needs it.

6[§§]☆Steel Falchion

ID --- [Delimiter] --- Name

Cheers

[omarranimado]

Originally Posted by dumbfck

Hehe that's quite neat ^^
I did something similar ages ago in PHP - I'd completely forgotten I'd done it lol. I have a bad feeling that was on my HDD that puked though :P

i udate the reader, so u can download the images too.
u dont need to scan for more then 35.000 id´s, found something about 15.000 items for pwi.
as i see, there are a lot not translated items or unnamed flying devices...hope they insert them sometime too.

u can revocer ur old hd, i use for that:
works for memory cards too, if ur girlfriend format them accidentally *lol*

Originally Posted by dumbfck

As for the whole 'cat in the bag' thing - I'm staying out of that lol.

yeah me too.
i like cats, name sounds cool for my catshopper...catSHOP and items to ur BAG

im shure the fault is the language difference...if all were in german, he understand me right