modstring.bas

使用vb寫出完美網頁遊戲外掛的原始碼分享

Attribute VB_Name = "ModString"
Option Explicit
Public User As String
Public Pass As String
Public Loc As String
Public Server As Integer
Public World As Integer
Public Char As Integer
Public Constate As Integer
Public RecvData As String
Public Const WM_LBUTTONDBLCLK = &H203
Public Const WM_RBUTTONDOWN = &H204
Public People() As PeopleInfo

Type Coord
    X As Integer
    Y As Integer
End Type
Type PeopleInfo
    ID As String * 4
    pos As Coord
    NextPos As Coord
    Time As Long
    NameID As Long
    speed As Integer
    Sex As String
    Name As String
    account As String
    Hair As String
    Class As String
    Healed As Integer
    Online As Boolean
    Leader As Boolean
    Map As String
    OldMap As String
    HP As Integer
    MaxHP As Integer
    Guild As String
    Exp As String
    Position As String
    Party As String
    Lv As String
End Type