主题：收盘价大于MA13，且当根K线收盘价大于前根K线的收盘价，并且MACD柱高于前一根MACD柱；

macd:=stkindi('','macd.macd1',0,2);//红字"2”代表是5分钟周期，如果要改周期请参考stkindi的函数说明
ma13:=ma(c,13);
kd:=c>ma13 and c>ref(c,1) and macd>ref(macd,1);
if kd then begin
sellshort(holding<0,holding,market);
buy(kd and holding=0,1,market);
end
kk:=c<ma13 and c<ref(c,1) and macd<ref(macd,1);
if kk then begin
sell(holding>0,holding,market);
buyshort(holding=0,1,market);
end