国产一区一区-色丁香在线-在线天堂视频-亚洲综合久久久久久888-丁香六月婷婷激情-欧美人与动牲交app视频-www.亚洲免费-91九色视频在线-国产视频福利一区-免费视频亚洲-亚洲男女激情-无码中文av波多野吉衣迅雷下载-亚洲电影区图片区小说区-国产精品一区二区在线-又黄又爽又猛的视频免费

93329737
級別: 探索解密
精華主題: 0
發帖數量: 23 個
工控威望: 188 點
下載積分: 519 分
在線時間: 18(小時)
注冊時間: 2009-04-14
最后登錄: 2025-03-20
查看93329737的 主題 / 回貼
樓主  發表于: 2010-11-10 14:44
A #Dequeue
JCN exit // 為0時跳轉
L #DB_NO //裝載表所在數據塊號
T #dbnr
OPN DB 【#dbnr】 //打開裝載數據塊

L P#8.0 //初始讀指針
T #Run_Point
L P#0.0 //初始讀指針
T #Standby_Point

L #Run_Point
LAR1
L 16
+AR1
L DBW 【AR1,P#0.0】

next: T #CNTR
L #Run_Point
LAR1
L 16
+AR1
L DBW 【AR1,P#0.0】
L 0
<>I
= #Exit
JCN exit

CALL "FIFO"
TABLE :=DB111.DBW8
RET_VAL:=#data

CALL "ATT"
DATA :=#data
TABLE:=DB111.DBW0


L #CNTR
LOOP next
exit: NOP 1
L #DB_NO
T #dbnr
OPN DB 【#dbnr】