dforw ; skip requests if not at dest (dest can be equal to src!) bne atsource-pc ; execute request(s) calls "snmp_init" ; initialize push 160 calls "snmp_pdu_init" ; create a new PDU (now reads 160 = SNMP_MSG_GET) push "sysName.0" calls "snmp_pdu_addvar_null" ; add an uninitialized variable push "sysContact.0" calls "snmp_pdu_addvar_null" ; add an uninitialized variable push "sysLocation.0" calls "snmp_pdu_addvar_null" ; add an uninitialized variable push "sysORDescr.1" calls "snmp_pdu_addvar_null" ; add an uninitialized variable push "sysDescr.0" calls "snmp_pdu_addvar_null" ; add an uninitialized variable calls "snmp_pdu_send" ; again send the request calls "snmp_close" ; close push 1 ; go to source getsrc dforwto pop ; at the source: print result atsource: push 7777 demux #data 0