if second of gives then trytomake;

##trytomake:
combine pickaxe with rubber in $actor to make a pinapple;
if $new_id > 0 then madeit else makenoise;

##makenoise:
print "[$actor] does not have all that it needs";

##madeit:
multiset $new_id = "colour='yellow', loc=$loc, host=$init_obj, hosthow='beside' ";
print "[$actor] produces [$new_id]";
dedupe $new_id;
relook $loc;

rem - what the above does line by line -
paint the new object and moves it into the room (from inside the $actor)
tell everyone in the room that we made it
if more that one of this object, resolved into one object with a qty
get everyone to look and see it