.#* 1 VMSHelp_Topic_Len+! 0°1 VMSHelp_Topic_Len* 0 VMS_Help_Library+4 SYS$HELP:HELPLIB.HLB°0 VMS_Help_Library,* ( curr_buf ) helptopic+ 1 VMSHelp_Topic_Len.w/c ' whatbuf°( curr_buf. * pop_mark_0ý ( curr_bufþ & sw2buf! 0°1 VMSHelp_Topic_Len/ný
/ VMS Help Topic: + Null_String + Null_Stringþ ) read_mini°) helptopicý* *VMS-Help*þ & sw2buf , erase_buffer ) push_mark" -1°1 VMSHelp_Topic_Lený 0 VMS_Help_Library ) helptopicþ , vms_get_help 3 EXECUTE_ERROR_BLOCKy( vms_help* 2 VMSHelp_This_Topic+
 + Null_String°2 VMSHelp_This_Topic,* $ word+; -/_@=:0-9a-zA-Z¿-ÖØ-Þà-öø-þ°$ wordý $ wordþ + bskip_chars ) push_marký $ wordþ * skip_chars ) bufsubstr°2 VMSHelp_This_Topicý 2 VMSHelp_This_Topicþ & strleny3 vms_help_grab_topic,* & prompt+* ( use_call
 # fun " ch % topic # msg+ý* *VMS-Help*þ & setbuf * pop_mark_1 + Null_String°2 VMSHelp_This_Topic 1 VMSHelp_Topic_Len.ý> Hit RET for '%s', PgDn/PgUp,   & promptþ ' sprintf°# msgý! 1þ ( recenter.. , _clear_error/ný # msgþ ' messageý! 1þ
 7 update_sans_update_hook & getkey°" ch " ch" 13A.v/c " ch" 46A. 3 vms_help_grab_topic.v/cu/c " ch# 127A.! 1°( use_call' page_up°# fun/.ý " chþ ( ungetkey / get_key_binding°# fun°( use_call # fun $ NULLA.  °# fun/c/dý # fun/ self_insert_cmdþ
 & strcmp. " ch" 32A.) page_down°# fun/.ý " chþ ( ungetkeyv/d/b ( use_call.ý # funþ $ call/.ý # funþ $ eval/d/e/cýJ ^[	 ]*\\cAdditional information available:þ * re_fsearchPýý & prompt 2 VMSHelp_This_Topic + Null_Stringþ ) read_miniþ ' strtrim°% topic
ý % topicþ & strlen°1 VMSHelp_Topic_Len 1 VMSHelp_Topic_Len. # eob/c ) push_mark % topicy1 vms_help_newtopic