psb := "C:\Users\User\Desktop\Untitled-1.psb"
file := FileOpen(psb, 0x100)
file.Seek(14)

H := DllCall("Ws2_32\ntohl", UInt, file.ReadUInt(), UInt)
W := DllCall("Ws2_32\ntohl", UInt, file.ReadUInt(), UInt)
file.Close()

MsgBox % "Ширина - " . W . "`nВысота - " . H
return

psb := "C:\Users\User\Desktop\Untitled-1.psb"
file := FileOpen(psb, 0x100)
file.Seek(14)

W := H := 0
Loop 4
   H := (H << 8)|file.ReadUChar()

Loop 4
   W := (W << 8)|file.ReadUChar()

file.Close()
MsgBox % "Ширина - " . W . "`nВысота - " . H
return

psd := "d:\temp\1.psd"
file := FileOpen(psd, 0x100)
File.Seek(14)
Y := Swap(file.ReadUInt())
X := Swap(file.ReadUInt())
File.Close()
MsgBox % "Ширина - " . X . "`nВысота - " . Y
return

Swap(N)
{
   Return ((0xFF0000 & N)  >> 8)
         |((0xFF000000 & N) >> 24)
         |((0xFF00 & N)  << 8)
         |((0xFF & N) << 24)
}

...
File.Seek(14)
...