楼主最近还看过
使用CONDITION条件处理器,CONDITION就是用来响应程序运行链之外的触发器。参考代码如下:
PROGRAM main
VAR
status :INTEGER
a :ARRAY[9] OF INTEGER
i :INTEGER
line_sort :BOOLEAN
counter :INTEGER
ROUTINE mx
BEGIN --mx
WRITE (CR,'we are in interrupt',CR)
WRITE ('counter')
END mx
BEGIN --main
CONDITION[1]:
WHEN line_sort=TRUE DO
mx
ENDCONDITION
line_sort=FALSE
--a=[12,70,53,65,24,56,48,92,86,33]
--a{8}:=[10,25,38,45,45,66,88,90];
a[1]=10
a[2]=25
a[3]=38
a[4]=45
a[5]=45
a[6]=66
a[7]=88
a[8]=90
a[9]=0
ENABLE CONDITION[1]
--heapSort(a,8)
line_sort=TRUE
DELAY 3000
END main
回复本条
卫知楼主
欧克,多谢大佬,我试一下
2024-10-06 15:12:06回复