.版本 2.程序集 窗口程序集1.程序集變量 l, 整數型.程序集變量 r, 整數型.程序集變量 ml, 整數型.程序集變量 mr, 整數型.子程序 _取位置標簽_鼠標左鍵被按下, 邏輯型.參數 橫向位置, 整數型.參數 縱向位置, 整數型.參數 功能鍵狀態, 整數型l ＝ 取位置標簽.左邊r ＝ 取位置標簽.頂邊ml ＝ 取鼠標水平位置 ()mr ＝ 取鼠標垂直位置 ()時鐘1.時鐘周期 ＝ 10.子程序 _時鐘1_周期事件.判斷開始 (取鼠標水平位置 () ＜ _啟動窗口.左邊)  取位置標簽.左邊 ＝ 0.判斷 (取鼠標垂直位置 () ＜ _啟動窗口.頂邊)  取位置標簽.頂邊 ＝ 0.判斷 (取鼠標水平位置 () ＞ _啟動窗口.寬度 ＋ _啟動窗口.左邊)  取位置標簽.左邊 ＝ _啟動窗口.寬度 － 20.判斷 (取鼠標垂直位置 () ＞ _啟動窗口.高度 ＋ _啟動窗口.頂邊)  取位置標簽.頂邊 ＝ _啟動窗口.高度 － 50.默認  取位置標簽.左邊 ＝ l － ml ＋ 取鼠標水平位置 ()  取位置標簽.頂邊 ＝ r － mr ＋ 取鼠標垂直位置 ()  返回 ().判斷結束時鐘1.時鐘周期 ＝ 0.子程序 _取位置標簽_鼠標左鍵被放開, 邏輯型.參數 橫向位置, 整數型.參數 縱向位置, 整數型.參數 功能鍵狀態, 整數型時鐘1.時鐘周期 ＝ 0.子程序 __啟動窗口_鼠標位置被移動, 邏輯型.參數 橫向位置, 整數型.參數 縱向位置, 整數型.參數 功能鍵狀態, 整數型時鐘2.時鐘周期 ＝ 10標簽4.左邊 ＝ 取鼠標水平位置 () － _啟動窗口.左邊標簽5.頂邊 ＝ 取鼠標垂直位置 () － _啟動窗口.頂邊.子程序 _時鐘2_周期事件左邊標簽.標題 ＝ 到文本 (取鼠標水平位置 () － _啟動窗口.左邊)頂邊標簽.標題 ＝ 到文本 (取鼠標垂直位置 () － _啟動窗口.頂邊).子程序 __啟動窗口_創建完畢標簽4.高度 ＝ _啟動窗口.高度標簽5.寬度 ＝ _啟動窗口.寬度.子程序 _取位置標簽_鼠標位置被移動, 邏輯型.參數 橫向位置, 整數型.參數 縱向位置, 整數型.參數 功能鍵狀態, 整數型標簽4.左邊 ＝ 取鼠標水平位置 () － _啟動窗口.左邊標簽5.頂邊 ＝ 取鼠標垂直位置 () － _啟動窗口.頂邊