怎么做才能执行断电序列？

嗨！
我试着在Perl中这样做。
打印“PowerUp Sequence  n  r”;
;
$ g-> ibwrt（“OUTP：DEL：RISE 1，（ @ 1）”）;
$ g-> ibwrt（“OUTP：DEL：RISE 2，（ @ 2）”）;
$ g-> ibwrt（“OUTP：DEL：RISE 3，（ @ 3）”）;
$ g-> ibwrt（“OUTP：DEL：RISE 4，（ @ 4）”）;
$ g-> ibwrt（“OUTP ON，（ @ 1：4）”）;
打印“断电序列 n  r”;
;
$ g-> ibwrt（“OUTP：DEL：FALL 4，（ @ 1）”）;
$ g-> ibwrt（“OUTP：DEL：FALL 3，（ @ 2）”）;
$ g-> ibwrt（“OUTP：DEL：FALL 2，（ @ 3）”）;
$ g-> ibwrt（“OUTP：DEL：FALL 1，（ @ 4）”）;
$ g-> ibwrt（“OUTP OFF，（ @ 1：4）”）但是只有加电部分工作，但scritp仍然同时关闭所有通道。
为了执行断电序列，我还需要打开其他东西吗？
谢谢。



     以下为原文

  Hi! I tried to do this in Perl.

   print"PowerUp Sequencenr";
   ;
   $g->ibwrt("OUTP:DEL:RISE 1,(@1)");
   $g->ibwrt("OUTP:DEL:RISE 2,(@2)");
   $g->ibwrt("OUTP:DEL:RISE 3,(@3)");
   $g->ibwrt("OUTP:DEL:RISE 4,(@4)");
   $g->ibwrt("OUTP ON,(@1:4)");
   print"Power Off Sequencenr";
   ;
   $g->ibwrt("OUTP:DEL:FALL 4,(@1)");
   $g->ibwrt("OUTP:DEL:FALL 3,(@2)");
   $g->ibwrt("OUTP:DEL:FALL 2,(@3)");
   $g->ibwrt("OUTP:DEL:FALL 1,(@4)");   
   $g->ibwrt("OUTP OFF,(@1:4)")

But only the power up portion works but the scritp still turn off all channels at the same time. Is there something else that I need to turn on in order to perform a power-off sequence?


Thanks.