。裝配窗裝配1
。程序集變量進程ID，整數類型
。匯編變量讀寫，內存類
。子程序_ _開始窗口_已創建
加載皮膚(13)
監視器熱鍵(&；在天空中遊泳，#F5鍵)
子程序遊泳飛行
。If(時鐘1。時鐘周期= 0)
時鐘1。時鐘周期= 1。
否則。
時鐘1。時鐘周期= 0。
如果結束了
子程序_時鐘1_周期性事件
。局部變量基址，整數類型。
進程ID =獲取進程ID ("crossfire.exe ")。
基址=讀/寫。讀取整數(進程ID，“基址”)
讀/寫。寫入整數類型(進程ID，“基址”+“偏移量”，要寫入的數值)