.版本 2
.DLL命令 GetProcAddress, 整數型, "kernel32", "GetProcAddress", , 返回函數地址
  .參數 hModule, 整數型
  .參數 lpProcName, 文本型
.DLL命令 GetModuleHandle, 整數型, "kernel32", "GetModuleHandleA", , 獲取一個應用程序或動態鏈接庫的模塊句柄 如執行成功成功，則返回模塊句柄。零表示失敗。會設置GetLastError
  .參數 lpModuleName, 文本型, , 指定模塊名，這通常是與模塊的文件名相同的一個名字。例如，NOTEPAD.EXE程序的模塊文件名就叫作NOTEPAD;
.DLL命令 IsBadCodePtr, 整數型, "kernel32", "IsBadCodePtr", , 確定讀指針的合法性
  .參數 lpfn, 整數型
.DLL命令 LoadLibrary, 整數型, "kernel32", "LoadLibraryA", , 載入指定的動態鏈接庫，并將它映射到當前進程使用的地址空間。一旦載入，即可訪問庫內保存的資源 成功則返回庫模塊的句柄，零表示失敗。會設置GetLastError
  .參數 lpLibFileName, 文本型, , 指定要載入的動態鏈接庫的名稱。采用與CreateProcess函數的lpCommandLine參數指定的同樣的搜索順序;

.版本 2
.常量 NULL, "0"
.常量 MB_OK, "0"
.常量 MB_ICONHAND, "16"
.常量 MB_ICONQUESTION, "32"
.常量 MB_ICONEXCLAMATION, "48"
.常量 MB_ICONASTERISK, "64"
.常量 MB_USERICON, "128"
.常量 TRUE, "1"

.版本 2
.支持庫 spec
.程序集 窗口程序集1
.子程序 __啟動窗口_創建完畢
.子程序 _CALL, 整數型
.參數 調用地址, 整數型
.參數 參數1, 整數型, 可空
.參數 參數2, 整數型, 可空
.參數 參數3, 整數型, 可空
.參數 參數4, 整數型, 可空
.參數 參數5, 整數型, 可空
.參數 參數6, 整數型, 可空
.參數 參數7, 整數型, 可空
.參數 參數8, 整數型, 可空
.參數 參數9, 整數型, 可空
.參數 參數10, 整數型, 可空
.參數 參數11, 整數型, 可空
.參數 參數12, 整數型, 可空
.參數 參數13, 整數型, 可空
.參數 參數14, 整數型, 可空
.參數 參數15, 整數型, 可空
.如果真 (IsBadCodePtr (調用地址) ＝ #TRUE)
  返回 (0)
.如果真結束
置入代碼 ({ 86, 190, 15, 0, 0, 0, 141, 77, 8, 141, 76, 241, 252, 139, 65, 4, 133, 192, 116, 2, 255, 49, 78, 131, 233, 8, 133, 246, 117, 239, 255, 85, 8, 94, 201, 194, 124, 0 })
返回 (0)
.子程序 _PrScrn, 整數型
.局部變量 bRet, 整數型
bRet ＝ _CALL (GetProcAddress (LoadLibrary (“PrScrn.dll”), “PrScrn”))
返回 (bRet)
.子程序 _截屏按鈕_被單擊
.局部變量 bRet, 整數型
bRet ＝ _PrScrn ()
.如果 (bRet ＝ #TRUE)
  調試輸出 (“截圖成功”)
.否則
  調試輸出 (“截圖失敗”)
.如果結束