.版本 2.DLL命令 GetCursorPos, 邏輯型, "user32.dll", "GetCursorPos"  .參數 光標位置, POINT, 傳址.DLL命令 WindowFromPoint, 整數型, "user32.dll", "WindowFromPoint"  .參數 X軸光標, 整數型  .參數 Y軸光標, 整數型.DLL命令 SendMessage, 整數型, , "SendMessageA"  .參數 hwnd, 整數型  .參數 wMsg, 整數型  .參數 wParam, 整數型  .參數 lParam, 文本型, 傳址, any.DLL命令 GetClassName, 整數型, "user32.dll", "GetClassNameA"  .參數 句柄, 整數型  .參數 文本, 文本型  .參數 文本長度, 整數型.DLL命令 GetClassLong, 整數型, , "GetClassLongA"  .參數 句柄, 整數型  .參數 信息, 整數型.DLL命令 GetWindowLong, 整數型, "user32.dll", "GetWindowLongA"  .參數 句柄, 整數型  .參數 信息, 整數型.DLL命令 GetWindowRect, 整數型, "user32.dll", "GetWindowRect"  .參數 句柄, 整數型  .參數 大小, RECT, 傳址

.版本 2.常量 WM_GETTEXT, "13"

.版本 2.數據類型 POINT  .成員 x, 整數型, , , X軸坐標  .成員 y, 整數型, , , Y軸坐標.數據類型 RECT  .成員 Left, 整數型  .成員 Top, 整數型  .成員 Right, 整數型  .成員 Bottom, 整數型.數據類型 MSG  .成員 hwnd, 整數型  .成員 message, 整數型  .成員 wParam, 整數型  .成員 lParam, 整數型  .成員 time, 整數型  .成員 ptx, 整數型  .成員 pty, 整數型

.版本 2.程序集 窗口程序集1.程序集變量 句柄, 整數型.程序集變量 獲取值, 整數型.程序集變量 獲取文本, 文本型.子程序 _時鐘1_周期事件.局部變量 光標位置, POINT, 靜態.局部變量 窗口大小, RECT, 靜態GetCursorPos (光標位置)獲取值 ＝ WindowFromPoint (光標位置.x, 光標位置.y).如果真 (獲取值 ≠ 句柄)  句柄 ＝ 獲取值  窗口句柄.內容 ＝ “（&H” ＋ 取十六進制文本 (獲取值) ＋ “）” ＋ 到文本 (獲取值)  獲取文本 ＝ 取空白文本 (255)  SendMessage (句柄, #WM_GETTEXT, 256, 獲取文本)  窗口標題.內容 ＝ 獲取文本  獲取文本 ＝ 取空白文本 (255)  GetClassName (句柄, 獲取文本, 255)  窗口類名.內容 ＝ 獲取文本  獲取值 ＝ GetClassLong (句柄, -32)  窗口類值.內容 ＝ “（&H” ＋ 取十六進制文本 (獲取值) ＋ “）” ＋ 到文本 (獲取值)  獲取值 ＝ GetWindowLong (句柄, -16)  窗口風格.內容 ＝ “（&H” ＋ 取十六進制文本 (獲取值) ＋ “）” ＋ 到文本 (獲取值)  獲取值 ＝ GetWindowLong (句柄, -6)  窗口擴展風格.內容 ＝ “（&H” ＋ 取十六進制文本 (獲取值) ＋ “）” ＋ 到文本 (獲取值)  獲取值 ＝ GetWindowLong (句柄, -12)  窗口ID.內容 ＝ “（&H” ＋ 取十六進制文本 (獲取值) ＋ “）” ＋ 到文本 (獲取值)  GetWindowRect (句柄, 窗口大小)  窗口范圍.內容 ＝ 到文本 (窗口大小.Left) ＋ “ ” ＋ 到文本 (窗口大小.Top) ＋ “ ” ＋ 到文本 (窗口大小.Right) ＋ “ ” ＋ 到文本 (窗口大小.Bottom).如果真結束