home *** CD-ROM | disk | FTP | other *** search
- D:\OPP\Common\EScript.pre/
- PESDIALOG%
- PESOFFBUTTON%
- (^!%'
- EScript Library +
- V1.10F (120)K+
- 1999 J.KneenKO
- PROC Init:
- +# GLOBAL Myvars%,ForMy&,App$(1)
- IF NOT EXIST(O"W
- C:\System\OPL\EScript.opoKO"W
- IF NOT EXIST(O"W
- D:\System\OPL\EScript.opoKO"W
- +, STOP rem Or show an error dialog
- ELSE
- LOADM O"W
- D:\System\OPL\EScript.opoKO"W
- ENDIF
- ELSE
- LOADM O"W
- C:\System\OPL\EScript.opoKO"W
- ENDIF
- EsLink:(O"W
- ContinueKO"W
- +*The example code shown here should be used
- +4within your own applications to add EScript support.
- +,The EsLink command is used much like the OPL
- +3toolbar to add Global variables to your application
- +.The EsLink parameter is the name of the module
- +0that continues the execution of the application.
- +1EScript requires EPOCPlusOPX.SIS to be installed.
- CloseO
- CloseO
- +*EScript Library V1.0B (105)
- 1998 J.KneenO
- Stuff
- Next>O
- +*To use EScript within your own applicaionsO
- PROC AnyName: (First procedure)
- GLOBAL Myvars%,ForMy&,App$(1)
- IF NOT EXIST(O"W
- C:\System\OPL\EScript.opKO"W
- IF NOT EXIST(O"W
- D:\System\OPL\EScript.opoKO"W
- +# STOP rem Or show an error dialog
- ELSE
- + LOADM O"W
- D:\System\OPL\EScript.opoKO"W
- ENDIF
- ELSE
- LOADM O"W
- C:\System\OPL\EScript.opoKO"W
- ENDIF
- EsLink:(O"W
- MainKO"W
- GETUID&
- GETFILENAME$
- GETUID&
- system\apps\KW
- .appKW
- .appKO
- .appK
- .APPG[
- z:\system\apps\
- .appKW
- z:\system\apps\
- .appK
- c:\system\apps\
- .appKW
- c:\system\apps\
- .appK
- d:\system\apps\
- .appKW
- d:\system\apps\
- .appK
- z:\system\apps\word\word.appC[
- + z:\system\apps\agenda\agenda.appC[
- z:\system\apps\sheet\sheet.appC[
- z:\system\apps\data\data.appC[
- z:\system\apps\comms\comms.appC[
- + z:\system\apps\record\record.appC[
- +!z:\system\apps\program\texted.appC[
- z:\system\apps\paint\paint.appC[
- z:\system\apps\opl\opl.appC[
- z:\system\apps\shell\shell.appC[
- O$h@`[
- THREAD&
- MACRODEBUG%
- MACROTHREAD&
- DEBUGWIN%
- ESVER%
- AUTOCLOSE%
- AUTOCLOSE%
- AUTOCLOSE%
- (^!%'
- (^!%'
- GETUID&
- (^!%'
- PESGETMAINPROC$
- SettingsK
- ESRUNESCRIPTMACRO
- PESGETMAINPROC$
- MACRODEBUG%
- DEBUGWIN%
- THREAD&
- EScript errorO
- Error in macro codeO
- +(An error occured while trying to execute
- the selected macro
- The error was:-
- Click OK to abort this macro
- BLSWITCHTOCURRENT
- PESGETMAINPROC$
- MACRODEBUG%
- DEBUGWIN%
- THREAD&
- (^!%'
- EScript errorO
- Error in macro codeO
- +(An error occured while trying to execute
- the selected macro
- The error was:-
- Click OK to abort this macro
- ISAPPRUNNING&
- ISOPLAPP%
- PESGETAPPLASTFILE$
- ISDOCRUNNING&
- GETUID&
- FINDAPPFROMDOCUID$
- THREAD&
- AUTOCLOSE%
- (^!%'
- SYSTEMC
- SYSTEMC
- C\`[8
- .APPG["
- z:\system\apps\
- .appKW
- z:\system\apps\
- .appK
- c:\system\apps\
- .appKW
- c:\system\apps\
- .appK
- d:\system\apps\
- .appKW
- d:\system\apps\
- .appK
- BUSYVIEW.APPC[
- c:\busyview
- .OPOG[z
- ISAPPRUNNING&
- ISOPLAPP%
- GETAPPNAMEFROMDOC$
- ISDOCRUNNING&
- (^!%'
- .APPC[
- .APPC[U
- .OPOC[&
- (^!%'
- C:\System\Data\Clpboard.cbd
- (^!%'
- Nothing to CopyO
- c:\system\data\clpboard.cbd(
- CopiedO
- +% SELECT CfgName,cfgVal FROM tblConfigK
- STRSETNAME$
- STRVAL$
- +# FIELDS CfgName,cfgVal TO tblConfigK
- STRSETNAME$
- STRVAL$
- SETTINGOPEN%
- SETTINGCLOSE
- c:\system\data\EPSettings.iniO
- STRVAL$#
- STRSETNAME$'
- STRVAL$'
- SETTINGOPEN%
- SETTINGCLOSE
- c:\system\data\EPSettings.iniO
- STRVAL$#
- SETTINGOPEN%
- SETTINGCLOSE
- c:\system\data\EPSettings.iniO
- MACROTHREAD&
- MACROTHREAD&
- PESCHECKDEBUG%
- ISDOCRUNNING&
- EsIsDocOpen&:(O"W
- ISDOCRUNNING&
- PESCHECKDEBUG%
- ISAPPRUNNING&
- EsIsAppOpen&:(O"W
- ISAPPRUNNING&
- PESCHECKDEBUG%
- SETTINGSET
- EsSaveSetting:(
- MacroO
- SETTINGSET
- MacroO
- PESCHECKDEBUG%
- SETTINGGET$
- EsLoadSetting&:(
- MacroO
- PESCHECKDEBUG%
- SETTINGGET$
- EsLoadSetting%:(
- MacroO
- PESCHECKDEBUG%
- SETTINGGET$
- EsLoadSetting$:(
- MacroO
- SETTINGGET$
- MacroO
- PESCHECKDEBUG%
- EXECCMD
- EsSendCommand:(O"W
- SENDCMDO
- PESCHECKDEBUG%
- EXECCMD
- BLKeyCommand:(O"W
- SENDCMDO
- PESCHECKDEBUG%
- SENDCODES
- EsMenuKey:O
- 4150O
- PESCHECKDEBUG%
- SENDCODES
- BLAppMenu:O
- 4150O
- PESCHECKDEBUG%
- SWITCHTOAPP%
- EsSwitchto( O"W
- SWITCHTOAPP%
- PESCHECKDEBUG%
- SWITCHTOAPP%
- EsBgSwitchtoFile:(O"W
- SWITCHTOAPP%
- PESCHECKDEBUG%
- THREAD&
- MACROTHREAD&
- SwitchtoCurrenApp:O
- THREAD&
- MACROTHREAD&
- ESSWITCHTO
- SystemO
- BLSWITCHTO
- SystemO
- ESBGSWITCHTO
- SystemO
- BLBGSWITCHTO
- SystemO
- ESSWITCHTO
- AgendaO
- ESBGSWITCHTO
- AgendaO
- BLSWITCHTO
- AgendaO
- BLBGSWITCHTO
- AgendaO
- ESSWITCHTO
- DataO
- ESBGSWITCHTO
- DataO
- BLSWITCHTO
- DataO
- BLBGSWITCHTO
- DataO
- BLSWITCHTO
- WordO
- BLBGSWITCHTO
- WordO
- ESSWITCHTO
- WordO
- ESBGSWITCHTO
- WordO
- ESSWITCHTO
- SheetO
- ESBGSWITCHTO
- SheetO
- BLSWITCHTO
- SheetO
- BLBGSWITCHTO
- SheetO
- BLSWITCHTO
- CalcO
- BLBGSWITCHTO
- CalcO
- ESSWITCHTO
- CalcO
- ESBGSWITCHTO
- CalcO
- BLSWITCHTO
- SketchO
- BLBGSWITCHTO
- SketchO
- ESSWITCHTO
- SketchO
- ESBGSWITCHTO
- SketchO
- BLSWITCHTO
- EmailO
- BLBGSWITCHTO
- EmailO
- ESSWITCHTO
- EmailO
- ESBGSWITCHTO
- EmailO
- BLSWITCHTO
- BLBGSWITCHTO
- BLSWITCHTO
- BLBGSWITCHTO
- PESCHECKDEBUG%
- THREAD&
- MACROTHREAD&
- EsSetForegroundO
- THREAD&
- MACROTHREAD&
- THREAD&
- MACROTHREAD&
- THREAD&
- MACROTHREAD&
- THREAD&
- MACROTHREAD&
- PESCHECKDEBUG%
- THREAD&
- MACROTHREAD&
- EsSetBackground:O
- PESCHECKDEBUG%
- MACROTHREAD&
- EsMacroApptoFront:O
- PESCHECKDEBUG%
- MACROTHREAD&
- EsMacroApptoBack:O
- EXECCMD
- SENDCMDO
- CTRL+RIGHTO
- SENDCMDO
- SHIFT+CTRL+RIGHTO
- SENDCMDO
- SHIFT+LEFTO
- ESSELECTNEXTWORD
- EXECCMD
- SENDCMDO
- + CTRL+LEFTO
- SENDCMDO
- + CTRL+LEFTO
- SENDCMDO
- SHIFT+CTRL+RIGHTO
- SENDCMDO
- SHIFT+LEFTO
- ESSELECTLASTWORD
- EXECCMD
- SENDCMDO
- CTRL+RIGHTO
- ESMOVETONEXTWORD
- EXECCMD
- SENDCMDO
- + CTRL+LEFTO
- ESMOVETOPREVIOUSWORD
- EXECCMD
- SENDCMDO
- + CTRL+LEFTO
- SENDCMDO
- SHIFT+CTRL+RIGHTO
- SENDCMDO
- SHIFT+LEFTO
- ESSELECTCURRENTWORD
- EXECCMD
- SENDCMDO
- FN+LEFTO
- SENDCMDO
- SHIFT+FN+RIGHTO
- ESSELECTLINE
- PESCHECKDEBUG%
- PESCOPYCLIP
- EXECCMD
- EsPasteText:(O"W
- SENDCMDO
- CTRL+VO
- ESPASTETEXT
- PESCHECKDEBUG%
- EXECCMD
- EsTypeText:(O"W
- SENDSTRINGO
- ESTYPETEXT
- PESCHECKDEBUG%
- EXECCMD
- ESENTERKEY
- EsTypeTime:(
- SENDSTRINGO
- ETYPETIME
- PESCHECKDEBUG%
- CONVERTTIME$
- Prompt user for the timeO
- Time Entry
- Enter Time
- CancelO
- ESASKFORTIMEINPUT$
- PESCHECKDEBUG%
- EXECCMD
- EsCursorDown:(
- SENDCMDO
- DOWNO
- ESCURSORLEFT
- ESCURSORDOWN
- PESCHECKDEBUG%
- EXECCMD
- EsCursorLeft:(
- SENDCMDO
- LEFTO
- PESCHECKDEBUG%
- EXECCMD
- EsCursorRight:(
- SENDCMDO
- RIGHTO
- ESCURSORRIGHT
- PESCHECKDEBUG%
- EXECCMD
- EsCursorUp:(
- SENDCMDO
- ESCURSORUP
- PESCHECKDEBUG%
- EXECCMD
- EsEnterKey:O
- SENDCMDO
- ENTERO
- ESENTERKEY
- c:\system\data\clpboard.cbdW
- c:\system\data\clpboard.cbd
- ESCLEARCLIPBOARD
- PESCHECKDEBUG%
- PESCOPYCLIP
- EsCopytoClip:(O"W
- PESCOPYCLIP
- ESCLIPTEXT$
- PESCHECKDEBUG%
- PESCLIPTEXT$
- EsClipText$:O
- PESCHECKDEBUG%
- EXECCMD
- PESCLIPTEXT$
- EsCopy$:O
- SENDCMDO
- CTRL+CO
- ESCOPY$
- PESCHECKDEBUG%
- EXECCMD
- + EsEscKey:O
- SENDCMDO
- ESESCKEY
- ESWAITFORENTERKEY
- MACRODEBUG%
- MACRODEBUG%
- APPSIMULATEEVENT&
- APPSIMULATEEVENT&
- APPSIMULATEEVENT&
- PESCHECKDEBUG%
- EsWaitforEnterKey:O
- ESISCURRENTAPP%
- PESCHECKDEBUG%
- EsIsCurrentApp%:(O"W
- ESWAITFORCLOSE
- THREAD&
- (^!%'
- Waiting for
- K+ to closeK(
- BLISCURRENTAPP%
- BLHIDEBACKLITE
- BLBACKLITETOFRONT
- BLBACKLITETOBACK
- BLUNHIDEBACKLITE
- + Backlite+O
- SWITCHTOAPP%
- BLBACKGROUND
- PESSENDKEY
- SENDSTRING
- THREAD&
- SWITCHTOC[C
- + SWITCHTOBC[G
- SENDCMDC[
- CTRL+C[
- SHIFT+C[
- CTRL+SHIFT+C
- SHIFT+CTRL+C`[
- CTRL+SHIFT+FNC
- SHIFT+FN+CTRL+C`
- FN+SHIFT+CTRL+C`
- FN+CTRL+SHIFT+C`[
- FN+C[
- + FN+SHIFT+C
- + SHIFT+FN+C`[
- FN+CTRL+C
- CTRL+FN+C`[
- FN+CTRL+SHIFTC
- SHIFT+CTRL+FN+C`
- FN+SHIFT+CTRLC`
- FN+CTRL+SHIFTC`[
- LEFTC[?
- RIGHTC[?
- UPC[?
- DOWNC[?
- MENUC[
- ENTERC[
- ESCC[
- DELC[
- TABC[
- SENDSTRINGC[
- DEBUG%
- MINTDAY%
- MINTMONTH%
- MINTYEAR%
- THREAD&
- PESSENDKEY
- PESSENDKEY
- (^!%'
- CancelO
- ,C`[+
- MACRODEBUG%
- DEBUGWIN%
- Macro replay(
- Next command:
- K+& ENTER-Continue / SPC-Skip / ESC-AbortKW2
- Next command:
- K+& ENTER-Continue / SPC-Skip / ESC-AbortK
- O {A[
- (^!%'
- .iniK
- O:@`[
- O 0[
- PESDRVEXIST%
- FINDAPPFROMUIDBYDRIVE$
- (^!%'
- MACGETFILENAME$
- GETUID&
- (^!%'
- z:\system\apps\word\word.app
- + z:\system\apps\agenda\agenda.app
- z:\system\apps\sheet\sheet.app
- z:\system\apps\data\data.app
- z:\system\apps\comms\comms.app
- + z:\system\apps\record\record.app
- +!z:\system\apps\program\texted.app
- z:\system\apps\paint\paint.app
- z:\system\apps\opl\opl.app
- z:\system\apps\shell\shell.app
- system\apps\KW
- .appKW
- .appKO
- .appK
- .appK(
- .aifK(
- (^!%'
- 4OZOZOZ
- W.W/O
- H{1\
- H{1\[
- (^!%'
- PESMAIN.
- GETAPPNAMEFROMDOC$
- CHECKAPPUID$
- GETFILENAME$
- GETUID&>
- OLDISOPL%
- ISOPL%n
- ESLINK
- ESAUTOCLOSEONb
- ESAUTOCLOSEOFF
- ISOPLAPP%
- ISDOCRUNNING&(
- ISAPPRUNNING&y
- ESRUNMACROSETTINGS%
- ESRUNMACROW
- ESQUICKMACRO
- ESRUNESCRIPTMACRO
- SWITCHTOAPP%
- OLDSWITCHTOAPP&
- PESCLIPTEXT$
- PESCOPYCLIP
- SETTINGOPEN%,
- SETTINGCLOSE
- SETTINGSET
- SETTINGGET$
- DELSETTING
- STRIPCHARS$
- ESMACROAPPINFRONT%
- BLFOREGROUND%
- ESISDOCOPEN%
- BLISDOCRUNNING&
- ESISAPPOPEN%
- BLISAPPRUNNING&.#
- ESSAVESETTINGY#
- BLSAVESETTING
- ESLOADSETTING&
- ESLOADSETTING%u$
- ESLOADSETTING$
- BLLOADSETTING$f%
- BLHIDEBACKLITE
- BLUNHIDEBACKLITE
- ESSENDCOMMAND
- BLKEYCOMMANDD&
- ESMENUKEY
- BLAPPMENU
- ESSWITCHTOK'
- BLSWITCHTO
- ESBGSWITCHTO
- BLBGSWITCHTOZ(
- ESSWITCHTOCURRENTAPP
- BLSWITCHTOCURRENT
- ESSWITCHTOSYSTEMs)
- BLSWITCHTOSYSTEM
- ESBGSWITCHTOSYSTEM
- BLBGSWITCHTOSYSTEM
- ESSWITCHTOAGENDA+*
- ESBGSWITCHTOAGENDAX*
- BLSWITCHTOAGENDA
- BLBGSWITCHTOAGENDA
- ESSWITCHTODATA
- ESBGSWITCHTODATA
- BLSWITCHTODATA;+
- BLBGSWITCHTODATAf+
- BLSWITCHTOWORD
- BLBGSWITCHTOWORD
- ESSWITCHTOWORD
- ESBGSWITCHTOWORD
- ESSWITCHTOSHEETC,
- ESBGSWITCHTOSHEETo,
- BLSWITCHTOSHEET
- BLBGSWITCHTOSHEET
- BLSWITCHTOCALC
- BLBGSWITCHTOCALC"-
- ESSWITCHTOCALCO-
- ESBGSWITCHTOCALCz-
- BLSWITCHTOSKETCH
- BLBGSWITCHTOSKETCH
- ESSWITCHTOSKETCH
- ESBGSWITCHTOSKETCH0.
- BLSWITCHTOEMAIL_.
- BLBGSWITCHTOEMAIL
- ESSWITCHTOEMAIL
- ESBGSWITCHTOEMAIL
- BLSWITCHTOWEB
- BLBGSWITCHTOWEB=/
- ESSWITCHTOWEBi/
- ESBGSWITCHTOWEB
- ESSHOWTASKLIST
- BLTASKLIST
- ESSETFOREGROUND
- BLFOREGROUNDz0
- BLCURRENTAPPTOFRONT
- BLCURRENTAPPTOBACKN1
- BLBACKGROUND
- ESSETBACKGROUND
- ESMACROAPPTOFRONT
- ESMACROAPPTOBACK
- BLAPPTOFRONTp3
- BLBACKLITETOFRONT
- BLAPPTOBACK
- BLBACKLITETOBACK
- ESSELECTNEXTWORD
- BLSELECTNEXTWORDM4
- ESSELECTPREVIOUSWORDv4
- BLSELECTLASTWORD
- ESMOVETONEXTWORD35
- BLMOVETONEXTWORDl5
- ESMOVETOPREVIOUSWORD
- BLMOVETOPREVIOUSWORD
- ESSELECTCURRENTWORD
- BLSELECTCURRENTWORDr6
- ESSELECTLINE
- BLSELECTLINE
- ESPASTETEXT
- BLPASTETEXT
- ESTYPETEXT
- BLTYPETEXT58
- ESTYPETIME^8
- BLTYPETIME
- ESASKFORTIMEINPUT$
- BLASKFORTIME$
- ESCURSORDOWN
- BLCURSORLEFT
- BLCURSORDOWN
- ESCURSORLEFT
- ESCURSORRIGHTp;
- BLCURSORRIGHT
- ESCURSORUP$<
- BLCURSORUP
- ESENTERKEY
- BLCLICKOK(=
- ESCLEARCLIPK=
- BLCLEARCLIP
- ESCOPYTOCLIP
- BLCOPYCLIP+>
- BLCLIPTEXT$U>
- ESCLIPTEXT$x>
- ESCOPY$
- BLCOPY$/?
- ESESCKEYN?
- BLCLICKCANCEL
- BLWAITFOROK
- ESDEBUGON
- ESDEBUGOFF
- ESPENDOWN;@
- ESPENCLICKu@
- ESPENMOVE
- ESWAITFORENTERKEY
- BLWAITgA
- ESWAITFORSECS
- BLISCURRENTAPP%
- ESISCURRENTAPP%
- BLWAITFORFILEEXITYB
- ESWAITFORCLOSE
- BLMESSAGE
- EXECCMD
- DEBUGPRINT
- CONVERTDATE
- TIMETOSTRING$qI
- CONVERTTIME$
- PESSENDKEY
- SENDSTRING
- SENDCODESfK
- MACGETFILENAME$
- ASKFORSTRING$
- STRIP$
- PESCHECKDEBUG%yM
- PESGETAPPLASTFILE$OO
- PESDRVEXIST%
- FINDAPPFROMDOCUID$
- FINDAPPFROMUIDBYDRIVE$rR
- PESISAPPFILEBASED%
- PESDIALOG%
- PESOFFBUTTON%
- PESGETMAINPROC$
- SYSTEM\
- APPINFOF
- SYSTINFO
- SYSRAM1
-