:look
say player "It's a pen."
stop

:pickup
set_global i/r5_pen true
set_active r5_pen false

:use r5_empty_sheet
say player "So, let's see..."
set_global i/r5_pen false
set_global i/r5_empty_sheet false
set_global i/r5_filled_sheet true