DUOXG,BK(KAICANG);

///下面两句不会写帮忙修改下

SOUNDDIR:=IF(DUOXG,1,0);

SOUNDURI:=CODE +SOUNDDIR，这里不知道怎么获取品种代码或名称？？？？？？？？？？？？

PLAYSOUND(DUOXG, SOUNDURI);