📄 frmfighter.frm
字号:
Width = 1875
End
Begin VB.PictureBox picPlayerKickDomesticRight
AutoSize = -1 'True
Height = 1530
Left = 7200
Picture = "frmFighter.frx":F8A5D
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 34
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picPlayerBackDomesticRight
AutoSize = -1 'True
Height = 1530
Left = 7320
Picture = "frmFighter.frx":F926A
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 33
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picPlayerNoneDomesticRight
AutoSize = -1 'True
Height = 1530
Left = 7440
Picture = "frmFighter.frx":F9A5A
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 32
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picPlayerForwardDomesticRight
AutoSize = -1 'True
Height = 1530
Left = 7560
Picture = "frmFighter.frx":FA23C
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 31
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picPlayerPunchDomesticLeft
AutoSize = -1 'True
Height = 1530
Left = 840
Picture = "frmFighter.frx":FAA1E
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 30
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picPlayerHitDomesticLeft
AutoSize = -1 'True
Height = 1530
Left = 720
Picture = "frmFighter.frx":FB1AA
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 29
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picPlayerLossDomesticLeft
AutoSize = -1 'True
Height = 1530
Left = 600
Picture = "frmFighter.frx":FBADE
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 28
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picPlayerKickDomesticLeft
AutoSize = -1 'True
Height = 1530
Left = 480
Picture = "frmFighter.frx":FC382
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 27
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picPlayerBackDomesticLeft
AutoSize = -1 'True
Height = 1530
Left = 360
Picture = "frmFighter.frx":FCB89
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 26
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picPlayerNoneDomesticLeft
AutoSize = -1 'True
Height = 1530
Left = 240
Picture = "frmFighter.frx":FD37C
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 25
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picCompLoss
AutoSize = -1 'True
Height = 1530
Left = 4200
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 9
Top = 4680
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picCompPunch
AutoSize = -1 'True
Height = 1530
Left = 4320
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 11
Top = 4680
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picCompKick
AutoSize = -1 'True
Height = 1530
Left = 4440
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 8
Top = 4680
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picCompHit
AutoSize = -1 'True
Height = 1530
Left = 4560
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 7
Top = 4680
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picCompBack
AutoSize = -1 'True
Height = 1530
Left = 4680
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 5
Top = 4680
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picPlayerPunch
AutoSize = -1 'True
Height = 1530
Left = 3480
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 18
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picPlayerHit
AutoSize = -1 'True
Height = 1530
Left = 3360
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 14
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picPlayerLoss
AutoSize = -1 'True
Height = 1530
Left = 3240
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 15
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picPlayerKick
AutoSize = -1 'True
Height = 1530
Left = 3120
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 17
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picPlayerBack
AutoSize = -1 'True
Height = 1530
Left = 3000
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 12
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.Timer tmrRegeneration
Enabled = 0 'False
Interval = 700
Left = 4800
Top = 0
End
Begin VB.Timer tmrPlayerRecover
Interval = 500
Left = 3480
Top = 0
End
Begin VB.Timer tmrComputerAI
Interval = 500
Left = 5280
Top = 0
End
Begin VB.PictureBox picCompNone
AutoSize = -1 'True
Height = 1530
Left = 4800
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 10
Top = 4680
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picCompForward
AutoSize = -1 'True
Height = 1530
Left = 4920
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 6
Top = 4680
Visible = 0 'False
Width = 1875
End
Begin VB.Timer tmrCompRecover
Enabled = 0 'False
Interval = 500
Left = 4080
Top = 0
End
Begin MSComctlLib.ProgressBar w
Height = 255
Left = 1200
TabIndex = 2
Top = 1560
Width = 2055
_ExtentX = 3625
_ExtentY = 450
_Version = 393216
Appearance = 0
Scrolling = 1
End
Begin MSComctlLib.ProgressBar l
Height = 255
Left = 6120
TabIndex = 3
Top = 1560
Width = 2055
_ExtentX = 3625
_ExtentY = 450
_Version = 393216
Appearance = 0
Scrolling = 1
End
Begin VB.PictureBox picPlayerNone
AutoSize = -1 'True
Height = 1530
Left = 2880
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 16
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picPlayerForward
AutoSize = -1 'True
Height = 1530
Left = 2760
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 13
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin VB.PictureBox picPlayerForwardDomesticLeft
AutoSize = -1 'True
Height = 1530
Left = 120
Picture = "frmFighter.frx":FDB5A
ScaleHeight = 1470
ScaleWidth = 1815
TabIndex = 24
Top = 3120
Visible = 0 'False
Width = 1875
End
Begin MSWinsockLib.Winsock ws
Left = 5760
Top = 0
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin VB.Label Label6
BackStyle = 0 'Transparent
Caption = "Points: $"
BeginProperty Font
Name = "Arial"
Size = 11.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 270
Left = 7560
TabIndex = 99
Top = 360
Width = 945
End
Begin VB.Label lblCompPoints
Alignment = 2 'Center
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "0"
BeginProperty Font
Name = "Arial"
Size = 11.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 270
Left = 8790
TabIndex = 98
Top = 360
Width = 135
End
Begin VB.Label Label4
BackStyle = 0 'Transparent
Caption = "Points: $"
BeginProperty Font
Name = "Arial"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -