if target of use then doit;
##doit:
new a note;
$sclass = $second's class;
$sname = $second's name;
set $new_id's colour to $second's colour;
set $new_id's extra to '$sclass $sname';
set $new_id's info to $second's code;
print "[$second] was noted";