function system (cmd:string) %{ _stp_ctl_write(STP_SYSTEM, THIS->cmd, strlen(THIS->cmd)+1); %}