autostop

%macro autostop();

%let condition = 0;

%do while (condition = 1)

call sleep(60,1); /*隔60秒检查一次*/

%let distance = %sysfunc(detect_distance_between(“meter’,D1, D2); /*检查两车距离*/

%if &distance <= 5000 then /*如果距离小于5000米，执行停车动作*/

%do ;

call stop(D1);

%let condition = 1; /*设置condition = 1, 跳出循环*/

%end;

%end;

%mend;

%autostop;

**************

所有表现为硬件故障的事故，原因都是软件故障。我上课的时候每次强调，做软件开发是人命关天的大事，一定要有敬业的精神，要先进行职业道德教育。核电站控制，动车组控制，战斗识别系统，供电，银行……所有这一切都是软件在支撑。

我们的教学规划中缺少欧美计算机专业第一学期必须要学习的《计算机与社会、道德、职业》这一门课程。我已经说很多遍了。

孩子们，要么你们去做公务员，要么你们就认真地写程序，不要出现这样的问题吧。

××××××××××

向华已经因为做GIS而后悔了，我们也为了不能教育出好好写代码的程序员而后悔。这是全社会的责任，我忍不住还是要说，神呀，饶恕这个罪恶深重的国家吧，让我们悔改我们的罪。