function QQSpeed_Common() {
this.版本 = "2021/06/01"
this.UI = Object()
this.批量关闭 = function () {
Api.Shell("taskkill /f /t /im GameApp.exe", 0)
Api.Shell("taskkill /f /t /im QQSpeed_loader.exe", 0)
}
this.清理进程 = function () {
var WMI = GetObject("WinMgmts:")
var wind = ['"IIPSHostApp.exe"', '"QQSpeedChatBrowser.exe"', '"QQSpeedCefProcess.exe"']
var n = WMI.ExecQuery('select * from win32_process where name=' + wind.join('or name=')).Count
for (var i = 0; i < wind.length; i++) {
......................
阅读全部
|
王宇577
贴于 2022年3月21日 01:59
hide
bbsi
Option Explicit
Const C_WorkProgress = 4
Class UI_Class
Public Form, Tip, config, AppName, Starting, Angel
Private Menu, hMenu1(1), hMenu2(0), timing
Private Tooptip
Private DisablePowerSave
Private Sub Create()
Dim i, v, s, j, arr
Set Menu = Control.Menu()
Set Form = Api.NewForm()
Set Tooptip = Control.Tooptip()
......................
阅读全部
|
王宇577
贴于 2022年3月21日 01:03
hide
bbsi
Option Explicit
Dim JScript, CString, File, Control, System, NetWork '定义线程级变量 '每个线程不同
Dim Window, VBSlibrary
Dim HttpProgress
Const IsDebug = 0
Const Version = "0.0.0.7"
Sub Main()
If Globals("App").PrevInstance Then
Dim ws, WMI, Process
Set ws = CreateObject("wscript.shell")
ws.SendKeys "{HOME}"
Set WMI = GetObject("WinMgmts:")
......................
阅读全部
|
王宇577
贴于 2022年3月21日 00:57
hide
bbsi
Option Explicit
Const C_WorkProgress = 4
Class UI_Class
Public Form, Tip, config, AppName, Starting, Angel
Private Menu, hMenu1(1), hMenu2(0), timing
Private Tooptip
Private DisablePowerSave
Private Sub Create()
Dim i, v, s, j, arr
Set Menu = Control.Menu()
Set Form = Api.NewForm()
Set Tooptip = Control.Tooptip()
......................
阅读全部
|
王宇577
贴于 2022年3月21日 00:38
hide
bbsi
Option Explicit
Const C_GameWith = 1024
Const C_GameHeight = 768
Const C_GameSmallWith = 320
Const C_GameSmallHeight = 240
'黑带 16 20
Dim GamehWnd, dm, AppName, config, bgkms, KMData
config = ".\Angel.ini"
AppName = "Angel_BP"
Function CmpMutlColor(Args, Sleep)
Dim i
For i = 0 To UBound(Args)
......................
阅读全部
|
王宇577
贴于 2022年3月21日 00:35
hide
bbsi
#include <stdio.h>
unsigned foo( unsigned n );
int main( void )
{
unsigned n;
printf( "请输入台阶的级数：" );
scanf( "%u", &n );
printf( "走完%u级台阶有%u种走法\n", n, foo(n) );
}
......................
阅读全部
|
小神女
贴于 2022年3月20日 21:39
hide
bbsi
#include <stdio.h>
unsigned foo( unsigned n );
int main( void )
{
unsigned n;
printf( "请输入台阶的级数：" );
scanf( "%u", &n );
printf( "走完%u级台阶有%u种走法\n", n, foo(n) );
}
......................
阅读全部
|
小神女
贴于 2022年3月20日 21:39
hide
bbsi
Option Explicit
Const C_WorkProgress = 4
Class UI_Class
Public Form, Tip, config, AppName, Starting, Angel
Private Menu, hMenu1(1), hMenu2(0), timing
Private Tooptip
Private DisablePowerSave
Private Sub Create()
Dim i, v, s, j, arr
Set Menu = Control.Menu()
Set Form = Api.NewForm()
Set Tooptip = Control.Tooptip()
......................
阅读全部
|
王宇577
贴于 2022年3月20日 09:31
hide
bbsi
Option Explicit
Const C_GameWith = 1024
Const C_GameHeight = 768
Const C_GameSmallWith = 320
Const C_GameSmallHeight = 240
'黑带 16 20
Dim GamehWnd, dm, AppName, config, bgkms, KMData
config = ".\Angel.ini"
AppName = "Angel_BP"
Function CmpMutlColor(Args, Sleep)
Dim i
For i = 0 To UBound(Args)
......................
阅读全部
|
王宇577
贴于 2022年3月20日 05:09
hide
bbsi
Option Explicit
Const C_GameWith = 1024
Const C_GameHeight = 768
Const C_GameSmallWith = 320
Const C_GameSmallHeight = 240
'黑带 16 20
Dim GamehWnd, dm, AppName, config, bgkms, KMData
config = ".\Angel.ini"
AppName = "Angel_BP"
Function CmpMutlColor(Args, Sleep)
Dim i
For i = 0 To UBound(Args)
......................
阅读全部
|
王宇577
贴于 2022年3月20日 05:07
hide
bbsi