#Include <APIConstants.au3>
#Include <WinAPIEx.au3>
$hLibrary = _WinAPI_LoadLibraryEx(@SystemDir & '\user32.dll', $LOAD_LIBRARY_AS_DATAFILE)
$aData = _WinAPI_EnumResourceNames($hLibrary, $RT_STRING)
For $i = 1 To $aData[0]
ConsoleWrite('!resource ' & $aData[$i] & @CR)
$hInfo = _WinAPI_FindResource($hLibrary, $RT_STRING, $aData[$i])
$hResource = _WinAPI_LoadResource($hLibrary, $hInfo)
$pData = _WinAPI_LockResource($hResource)
$Offset = 0
For $j = 0 To 15
$Length = DllStructGetData(DllStructCreate('ushort', $pData + $Offset), 1)
If $Length Then
$Text = DllStructGetData(DllStructCreate('wchar[' & $Length & ']', $pData + $Offset + 2), 1)
$ID = ($aData[$i] - 1) * 16 + $j
ConsoleWrite(StringFormat('%-4s - %s', $ID, $Text) & @CR)
EndIf
$Offset += 2 * ($Length + 1)
Next
If $i < $aData[0] Then
ConsoleWrite(@CR)
EndIf
Next
_WinAPI_FreeLibrary($hLibrary)