! ap120 resources ...
!
ap120.title:                                     APL2 Session Manager
ap120*fontList:                                  apl14
!
! Menu Bar File
ap120*menubar.button_0.labelString:              File
ap120*file_menu.button_0.labelString:              Log
ap120*log_menu.button_0.labelString:                 Name ...
ap120*log_menu.button_1.labelString:                 Save ...
ap120*log_menu.button_2.labelString:                 Load ...
ap120*log_menu.button_3.labelString:                 Size ...
ap120*log_menu.button_4.labelString:                 Clear
ap120*file_menu.button_1.labelString:              Copy
ap120*copy_menu.button_0.labelString:                Filename ...
ap120*copy_menu.button_1.labelString:                On
ap120*copy_menu.button_2.labelString:                Off
ap120*file_menu.button_2.labelString:              Quit
ap120*quit_menu.button_0.labelString:                )CONTINUE
ap120*quit_menu.button_1.labelString:                )OFF
!
! Menu Bar Signals
ap120*menubar.button_1.labelString:              Signals
ap120*signals_menu.button_0.labelString:           Suppress
ap120*signals_menu.button_1.labelString:           Attention
ap120*signals_menu.button_2.labelString:           Interrupt
!
! Menu Bar Options
ap120*menubar.button_2.labelString:              Options
ap120*options_menu.button_0.labelString:          Scroll
ap120*display_menu.button_0.labelString:             Line
ap120*display_menu.button_1.labelString:             Page
ap120*options_menu.button_1.labelString:           Fonts
ap120*font_menu.button_0.labelString:                apl6
ap120*font_menu.button_1.labelString:                apl10
ap120*font_menu.button_2.labelString:                apl12
ap120*font_menu.button_3.labelString:                apl14
ap120*font_menu.button_4.labelString:                apl22
ap120*options_menu.button_2.labelString:           APL Mode
ap120*apl_mode_menu.button_0.labelString:            On
ap120*apl_mode_menu.button_1.labelString:            Off
!
! Menu Bar Help
ap120*menubar.button_3.labelString:              Help
ap120*help_menu.button_0.labelString:              General
ap120*help_menu.button_1.labelString:              Programmer
ap120*help_menu.button_2.labelString:              Keys
!
! Foreground Screen Colors
ap120*sm.fgDebugOutput:      medium violet red
ap120*sm.fgDelEditOut:       cyan
ap120*sm.fgDelEditTs:        LightSteelBlue
ap120*sm.fgDelPrompt:        LightSteelBlue
ap120*sm.fgErrorMsg:         Red
ap120*sm.fgNormalOutput:     SpringGreen
ap120*sm.fgQuadOutput:       SpringGreen
ap120*sm.fgQuadPrompt:       grey6
ap120*sm.fgQuoteQuadInput:   grey6
ap120*sm.fgQuoteQuadOutput:  SpringGreen
ap120*sm.fgSysCommand:       sandybrown
ap120*sm.fgTraceOutputFns:   cyan
ap120*sm.fgTraceOutputVal:   thistle
ap120*sm.fgUserInput:        yellow
ap120*sm.fgLineModified:     white
!
! Background Screen Colors
ap120*sm.backColor:          black
ap120*sm.bgDebugOutput:      black
ap120*sm.bgDelEditOut:       black
ap120*sm.bgDelEditTs:        black
ap120*sm.bgDelPrompt:        black
ap120*sm.bgErrorMsg:         black
ap120*sm.bgNormalOutput:     black
ap120*sm.bgQuadOutput:       black
ap120*sm.bgQuadPrompt:       black
ap120*sm.bgQuoteQuadInput:   black
ap120*sm.bgQuoteQuadOutput:  black
ap120*sm.bgSysCommand:       black
ap120*sm.bgTraceOutputFns:   black
ap120*sm.bgTraceOutputVal:   black
ap120*sm.bgUserInput:        black
ap120*sm.bgLineModified:     black
!
! Union Keyboard and Function key Settings
! NOTE: Union Keyboard is in effect when keyboard is not in APLMODE
ap120*sm.translations: #override\
~Mod3 Ctrl<Key>quoteleft:       quad-slope()         \n\
~Mod3 Ctrl<Key>1:               i-beam()             \n\
~Mod3 Ctrl<Key>2:               del-tilde()          \n\
~Mod3 Ctrl<Key>3:               del-stile()          \n\
~Mod3 Ctrl<Key>4:               delta-stile()        \n\
~Mod3 Ctrl<Key>5:               circle-stile()       \n\
~Mod3 Ctrl<Key>6:               circle-slope()       \n\
~Mod3 Ctrl<Key>7:               circle-bar()         \n\
~Mod3 Ctrl<Key>8:               circle-star()        \n\
~Mod3 Ctrl<Key>9:               down-carat-tilde()   \n\
~Mod3 Ctrl<Key>0:               up-carat-tilde()     \n\
~Mod3 Ctrl<Key>minus:           quote-dot()          \n\
~Mod3 Ctrl<Key>equal:           quad-divide()        \n\
~Mod3 Ctrl<Key>bracketleft:     quad-quote()         \n\
~Mod3 Ctrl<Key>bracketright:    delta-underbar()     \n\
~Mod3 Ctrl<Key>backslash:       dieresis-dot()       \n\
~Mod3 Ctrl<Key>semicolon:       down-tack-jot()      \n\
~Mod3 Ctrl<Key>quoteright:      up-tack-jot()        \n\
~Mod3 Ctrl<Key>comma:           up-shoe-jot()        \n\
~Mod3 Ctrl<Key>period:          slope-bar()          \n\
~Mod3 Ctrl<Key>slash:           slash-bar()          \n\
~Mod3 Alt<Key>quoteleft:        quad-jot()           \n\
~Mod3 Alt<Key>1:                dieresis()           \n\
~Mod3 Alt<Key>2:                overbar()            \n\
~Mod3 Alt<Key>3:                string("<")          \n\
~Mod3 Alt<Key>4:                not-greater()        \n\
~Mod3 Alt<Key>5:                string("=")          \n\
~Mod3 Alt<Key>6:                not-less()           \n\
~Mod3 Alt<Key>7:                string(">")          \n\
~Mod3 Alt<Key>8:                not-equal()          \n\
~Mod3 Alt<Key>9:                down-carat()         \n\
~Mod3 Alt<Key>0:                up-carat()           \n\
~Mod3 Alt<Key>minus:            times()              \n\
~Mod3 Alt<Key>equal:            divide()             \n\
~Mod3 Alt<Key>q:                diamond()            \n\
~Mod3 Alt<Key>w:                omega()              \n\
~Mod3 Alt<Key>e:                epsilon()            \n\
~Mod3 Alt<Key>r:                rho()                \n\
~Mod3 Alt<Key>t:                tilde()              \n\
~Mod3 Alt<Key>y:                up-arrow()           \n\
~Mod3 Alt<Key>u:                down-arrow()         \n\
~Mod3 Alt<Key>i:                iota()               \n\
~Mod3 Alt<Key>o:                circle()             \n\
~Mod3 Alt<Key>p:                string("*")          \n\
~Mod3 Alt<Key>bracketleft:      left-arrow()         \n\
~Mod3 Alt<Key>bracketright:     right-arrow()        \n\
~Mod3 Alt<Key>backslash:        epsilon-underbar()   \n\
~Mod3 Alt<Key>a:                alpha()              \n\
~Mod3 Alt<Key>s:                up-stile()           \n\
~Mod3 Alt<Key>d:                down-stile()         \n\
~Mod3 Alt<Key>f:                string("_")          \n\
~Mod3 Alt<Key>g:                del()                \n\
~Mod3 Alt<Key>h:                delta()              \n\
~Mod3 Alt<Key>j:                jot()                \n\
~Mod3 Alt<Key>k:                iota-underbar()      \n\
~Mod3 Alt<Key>l:                quad()               \n\
~Mod3 Alt<Key>semicolon:        left-tack()          \n\
~Mod3 Alt<Key>quoteright:       right-tack()         \n\
~Mod3 Alt<Key>z:                left-shoe()          \n\
~Mod3 Alt<Key>x:                right-shoe()         \n\
~Mod3 Alt<Key>c:                up-shoe()            \n\
~Mod3 Alt<Key>v:                down-shoe()          \n\
~Mod3 Alt<Key>b:                down-tack()          \n\
~Mod3 Alt<Key>n:                up-tack()            \n\
~Mod3 Alt<Key>m:                stile()              \n\
~Mod3 Alt<Key>comma:            equal-underbar()     \n\
~Mod3 Alt<Key>period:           squad()              \n\
~Mod3 Alt<Key>slash:            slope()              \n\
\
Shift <Key>F8:\
end-log()\
stringa(")HOST apl2&")\
enter()\n\
\
Shift <Key>F9:\
end-log()\
stringa("(13 11 NA '_PI PIPE')/0ؐ2ǐEC '''',,'''_PI0'ؐTSEX '_PI'")\
enter()\n\
\
Ctrl <Key>F1:\
end-log()\
stringa("(13 11 NA '_DPY DISPLAY')/0ؐ2ǐEC '_DPY ',ؐTSEX '_DPY'")\
enter()\n\
\
Ctrl <Key>osfHelp:\
end-log()\
stringa("(13 11 NA '_DPY DISPLAY')/0ؐ2ǐEC '_DPY ',ؐTSEX '_DPY'")\
enter()\n\
\
Ctrl <Key>F2:\
end-log()\
stringa("(13 11 NA '_IDI IDIOMS')/0ؐ2ǐEC '_IDI'ؐTSEX '_IDI'")\
enter()\n\
\
Ctrl <Key>F3:\
end-log()\
stringa("(0^.EC('S'),([1+IO]NL 3 4),'0')/'All Stops removed'")\
enter()\n\
\
Ctrl <Key>F4:\
end-log()\
stringa("(0^.EC('T'),([1+IO]NL 3 4),'0')/'All Traces removed'")\
enter()\n\
\
Ctrl <Key>F5:\
end-log()\
stringa("_EC_,('1,'),_('S'),[1+IO]NL 3 4")\
enter()\
stringa("((0EX'_')^._)/'Stop on first line of all functions and operators'")\
enter()\n\
\
Ctrl <Key>F6:\
end-log()\
stringa("_EC_,('1,'),_('T'),[1+IO]NL 3 4")\
enter()\
stringa("((0EX'_')^._)/'Trace first line of all functions and operators'")\
enter()\n\
\
Ctrl <Key>F7:\
end-log()\
stringa("(0^.EC('S'),([1+IO]NL 3 4),'32768')/'Stop on each line'")\
enter()\n\
\
Ctrl <Key>F8:\
end-log()\
stringa("(0^.EC('T'),([1+IO]NL 3 4),'32768')/'Trace every line'")\
enter()\n\
\
Ctrl <Key>F9:\
end-log() stringa("LC")\
enter()\n\
\
Ctrl <Key>F10:\
end-log()\
stringa("_~NC'PRINTWS'")\
enter()\
stringa(")PCOPY 2 PRINTWS PRINTWS")\
enter()\
stringa("__,'',1 2ƐCR'PRINTWS'")\
enter()\
stringa("TSEX(1,_)/'_' 'PRINTWS',0搽2ǐEC(1_)/'PRINTWS'")\
enter()\n\
\
Ctrl <Key>osfMenu:\
end-log()\
stringa("_~NC'PRINTWS'")\
enter()\
stringa(")PCOPY 2 PRINTWS PRINTWS")\
enter()\
stringa("__,'',1 2ƐCR'PRINTWS'")\
enter()\
stringa("TSEX(1,_)/'_' 'PRINTWS',0搽2ǐEC(1_)/'PRINTWS'")\
enter()\n\
\
Ctrl <Key>osfMenuBar:\
end-log()\
stringa("_~NC'PRINTWS'")\
enter()\
stringa(")PCOPY 2 PRINTWS PRINTWS")\
enter()\
stringa("__,'',1 2ƐCR'PRINTWS'")\
enter()\
stringa("TSEX(1,_)/'_' 'PRINTWS',0搽2ǐEC(1_)/'PRINTWS'")\
enter()\n\
\
Ctrl <Key>F11:\
end-log()\
stringa("_~NC'FIND'")\
enter()\
stringa(")PCOPY 1 UTILITY FIND")\
enter()\
stringa("__,'',1 2ƐCR'FIND'")\
enter()\
stringa("TSEX(1,_)/'_' 'FIND',0搽2ǐEC(1_)/'FIND''',,''''")\
enter()\n\
\
Ctrl <Key>F12:\
end-log()\
stringa("(13 11 NA '_E2 EDITOR_2')/0ؐ2ǐEC '_E2 ''',,''''ؐTSEX '_E2'")\
enter()







