home *** CD-ROM | disk | FTP | other *** search
/ PSION CD 2 / PsionCDVol2.iso / Programs / 376 / Appinfo-opxSIS.sis (.txt) < prev    next >
EPOC Installation Package  |  2001-10-22  |  24KB  |  344 lines
  1. E:\Psioncd2work\Psioncd2\Sistemp\AppInfoTest.opl!:\PsionCD\Appinfo-opx\AppInfoTest.oplE:\Psioncd2work\Psioncd2\Sistemp\AppInfo-Readme!:\PsionCD\Appinfo-opx\AppInfo-ReadmeE:\Psioncd2work\Psioncd2\Sistemp\Appinfo_wins.opx!:\PsionCD\Appinfo-opx\Appinfo_wins.opxE:\Psioncd2work\Psioncd2\Sistemp\AppInfo.txh!:\PsionCD\Appinfo-opx\AppInfo.txhE:\Psioncd2work\Psioncd2\Sistemp\AppInfo.oxh!:\PsionCD\Appinfo-opx\AppInfo.oxhE:\Psioncd2work\Psioncd2\Sistemp\AppInfo.oxh!:\PsionCD\Appinfo-opx\AppInfo.sisE:\Psioncd2work\Psioncd2\Sistemp\appinfo.SISE:\Psioncd2work\Psioncd2\Sistemp\Bis.txt!:\PsionCD\Appinfo-opxSIS\Bis.txtAppinfo-opxSIS 20.1 kB7
  2. include "AppInfo.oxh"
  3. PROC main:
  4.     local aifFile$(255)
  5.     local iconFile$(255)
  6.     local size&
  7.     local hidden&,newfile&,embed&
  8.     rem extract icons from an aif file
  9.     busy "Extracting icons"        
  10.     aifFile$="z:\system\apps\Comms\Comms.aif"
  11.     size&=48
  12.     iconFile$="c:\System\Temp\icon"
  13.     AppExtractAifIcon:(aifFile$, 16, 0, iconFile$+"16")
  14.     AppExtractAifIcon:(aifFile$, 24, 0, iconFile$+"24")
  15.     AppExtractAifIcon:(aifFile$, 32, 0, iconFile$+"32")
  16.     AppExtractAifIcon:(aifFile$, 48, 0, iconFile$+"48")
  17.     busy off
  18.     rem display icons
  19.     showmbm:(iconFile$+"16",0)
  20.     showmbm:(iconFile$+"24",20)
  21.     showmbm:(iconFile$+"32",48)
  22.     showmbm:(iconFile$+"48",100)
  23.     rem scan for apps
  24.     busy "Scanning..."
  25.     AppUpdate:
  26.     busy off
  27.     AppStartScan:
  28.     while AppNext:
  29.         cls
  30.         gcls
  31.         print AppFileName$:
  32.         print AppCaption$:
  33.         AppCapability:(hidden&,newfile&,embed&)
  34.         if hidden&
  35.             print "App is hidden"
  36.         endif
  37.         if embed&=1
  38.             print "App supports embed"
  39.         elseif embed&=2
  40.             print "App supports embed only"
  41.         endif
  42.         AppExtractIcon:(2, 0, iconFile$)
  43.         showmbm:(iconFile$,300)
  44.         get
  45.     endwh
  46.     print "Done"
  47. PROC showmbm:(name$,x%)
  48.     local id%,w%,h%
  49.     id%=gloadbit(name$)
  50.     w%=gwidth
  51.     h%=gheight
  52.     guse 1
  53.     gat x%,0
  54.     gcopy id%,0,0,w%,h%,0
  55.     gclose id%
  56. *TextEd.app
  57. Times New Roman
  58. &Heading 1L
  59. &Heading 2L
  60. &Heading 3L
  61. .Bullet listO
  62. Swiss
  63. EBAPPINFO.OPX Version 1.20
  64. Copyright 1998-1999 Twiddlebit Software
  65. All rights reserved
  66. CONTACT
  67. -------
  68. Note that this OPX is provided on an "as is" basis with no guarantee
  69. of support.
  70. For the latest version see the following www page:
  71.     http://www.twiddlebit.com
  72. NOTE: the WINS version (appinfo_wins.opx) is for use with the ER5 emulator
  73. or the release variant of the ER3 emulator. It will not work on the debug
  74. variant of the ER3 emulator.
  75. INTRODUCTION
  76. ------------
  77. AppInfo.OPX provides information about applications installed on an
  78. EPOC32 machine. This information includes:
  79.     - filenames for the .app file
  80.     - caption names in the current language
  81.     - application capabilities (hidden, embedability, support for new file)
  82.     - icons
  83. The OPX will scan all drives starting at y: down to a: and then z: for
  84. apps. For performance reasons the data it gathers will be cached in memory.
  85. There is a function which allows this cached data to be refreshed as needed.
  86. EXTRACTING ICONS FROM AN AIF FILE
  87. ---------------------------------
  88. Given an AIF file use the following function to extract an icon from
  89. the file:
  90.     AppExtractAifIcon:(aifFile$, iconSize&, iconType&, iconFile$)
  91.     aifFile$  = full filename for aif file
  92.     iconSize& = 16, 24, 32, 48,...
  93.     iconType& = 0 for the normal icon, 1 for the mask icon
  94.     iconFile$ = full filename for icon mbm file to be created
  95. NOTE: see also the function AppExtractIcon:() which uses cached data.
  96. SCANNING FOR APPS
  97. -----------------
  98. The first thing that you need to do is to tell the OPX to scan for all
  99. the apps. This is done using:
  100.     AppUpdate:
  101. This only needs to be done once, the info will then be cached.
  102. To rescan the disks for new/deleted apps use the AppUpdate: function again.
  103. This will return 1 if any changes were detected.
  104. To scan the list of cached apps use the following type of code:
  105.     AppStartScan:
  106.     WHILE AppNext:
  107.         REM add your code here
  108.     ENDWH
  109. When using AppNext: the OPX maintains a pointer to the current app info.
  110. Information about this app can be obtained using the following functions:
  111.     AppFileName$:
  112.         The full filename for the app
  113.     AppName$:
  114.         The name of the app file (without path or extension)
  115.     AppUID&:
  116.         The UID for the app
  117.     AppCaption$:
  118.         The name of the app in the current language
  119.     AppCapability:(BYREF hidden&, BYREF newFile&, BYREF embed&)
  120.         This sets the supplied parameters as follows:
  121.         hidden&        = 1 if the app is marked as hidden
  122.         newFile&    = 1 if the app supports the system->new file command
  123.         embed&        = 0 if the app does not support embedding
  124.                     = 1 if the app supports embedding
  125.                     = 2 if the app supports embedding only
  126. You can also obtain one of the 3 icons for the app using this
  127. function:
  128.     AppExtractIcon:(iconIndex&, iconType&, iconFile$)
  129.         iconIndex$    = 0, 1 or 2 (0 for the smallest icon)
  130.         iconType& = 0 for the normal icon, 1 for the mask icon
  131.         iconFile$ = full filename for icon mbm file to be created
  132. SIMULATING EVENTS
  133. -----------------
  134. AppInfo.OPX also allows the simulation of any type of event,
  135. including keypress and pointer events using:
  136.     AppSimulateEvent&:(type&,param1&,param2&)
  137. Constants for the value of type& are defined in the appinfo.oxh file
  138. as follows. The type governs the meaning of param1 and param2 as
  139. follows:
  140. TYPE                PARAM1        PARAM2
  141. KAppEvNone&            -        -
  142. KAppEvPointerSwitchOn&        -        -
  143. KAppEvRedraw&            -        -
  144. KAppEvSwitchOn&            -        -
  145. KAppEvActive&            -        -
  146. KAppEvInactive&            -        -
  147. KAppEvUpdateModifiers&        -        -
  148. KAppEvSwitchOff&        -        -
  149. KAppEvKeyDown&            key scan code    -
  150. KAppEvKeyUp&            key scan code    -
  151. KAppEvPointerMove&        x coord        y coord
  152. KAppEvButton1Down&        x coord        y coord
  153. KAppEvButton1Up&        x coord        y coord
  154. KAppEvButton2Down&        x coord        y coord
  155. KAppEvButton2Up&        x coord        y coord
  156. KAppEvButton3Down&        x coord        y coord
  157. KAppEvButton4Up&        x coord        y coord
  158. Note that the event will be sent to whatever app happens to be
  159. in the foreground or has keyboard focus.
  160. OPX FUNCTION SUMMARY
  161. --------------------
  162.     AppExtractAifIcon:(aifFile$, iconSize&, iconType&, iconFile$)
  163.     AppUpdate:
  164.     AppStartScan:
  165.     AppNext:
  166.     AppName$:
  167.     AppUID&:
  168.     AppFileName$:
  169.     AppCaption$:
  170.     AppCapability:(BYREF hidden&, BYREF newFile&, BYREF embed&)
  171.     AppExtractIcon:(iconIndex&, iconType&, iconFile$)
  172.     AppSimulateEvent&:(type&,param1&,param2&)
  173. Courier
  174. Courier
  175. "word.app
  176. !This program cannot be run in DOS mode.
  177. .text
  178. `.rdata
  179. @.data
  180. .idata
  181. .E32_UID
  182. .reloc
  183. tVHt%Ht
  184. 9s0t[Wj
  185. APPINFO.OPX
  186. EUSER.DLL
  187. APFILE.DLL
  188. APGRFX.DLL
  189. EFSRV.DLL
  190. FBSCLI.DLL
  191. WS32.DLL
  192. OPLR.DLL
  193. 0)0<0M0R0
  194. 7 7$7(7,7
  195. 8$8*80868<8B8H8N8T8Z8`8f8l8r8x8~8
  196. REM ===========================================
  197. REM APPINFO.OXH version 1.20
  198. REM Header File for APPINFO.OPX
  199. REM Copyright (C) 1998-1999 Twiddlebit Software
  200. REM ===========================================
  201. CONST KUidOpxAppInfo&=&10000546
  202. CONST KOpxAppInfoVersion%=$120
  203. CONST KAppEvNone&        =0
  204. CONST KAppEvPointerMove&    =1
  205. CONST KAppEvPointerSwitchOn&    =2
  206. CONST KAppEvKeyDown&        =3
  207. CONST KAppEvKeyUp&        =4
  208. CONST KAppEvRedraw&        =5
  209. CONST KAppEvSwitchOn&        =6
  210. CONST KAppEvActive&        =7
  211. CONST KAppEvInactive&        =8
  212. CONST KAppEvUpdateModifiers&    =9
  213. CONST KAppEvButton1Down&    =10
  214. CONST KAppEvButton1Up&        =11
  215. CONST KAppEvButton2Down&    =12
  216. CONST KAppEvButton2Up&        =13
  217. CONST KAppEvButton3Down&    =14
  218. CONST KAppEvButton4Up&        =15
  219. CONST KAppEvSwitchOff&        =16
  220. DECLARE OPX APPINFO,KUidOpxAppInfo&,KOpxAppInfoVersion%
  221.     AppExtractAifIcon:(aifFile$, iconSize&, iconType&, iconFile$) : 1
  222.     AppUpdate: : 2
  223.     AppStartScan: : 3
  224.     AppNext: : 4
  225.     AppFileName$: : 5
  226.     AppCaption$: : 6
  227.     AppCapability:(BYREF hidden&, BYREF newFile&, BYREF embed&) : 7
  228.     AppExtractIcon:(iconIndex&, iconType&, iconFile$) : 8
  229.     AppName$: : 9
  230.     AppUID&: : 10
  231.     AppSimulateEvent:(type&,param1&,param2&) : 11
  232. END DECLARE
  233. REM ===========================================
  234. REM APPINFO.OXH version 1.20
  235. REM Header File for APPINFO.OPX
  236. REM Copyright (C) 1998-1999 Twiddlebit Software
  237. REM ===========================================
  238. CONST KUidOpxAppInfo&=&10000546
  239. CONST KOpxAppInfoVersion%=$120
  240. REM The following are the event types recognised
  241. REM by AppSimulateEvent:()
  242. CONST KAppEvNone&            =0
  243. CONST KAppEvPointerMove&    =1
  244. CONST KAppEvPointerSwitchOn&=2
  245. CONST KAppEvKeyDown&        =3
  246. CONST KAppEvKeyUp&            =4
  247. CONST KAppEvRedraw&            =5
  248. CONST KAppEvSwitchOn&        =6
  249. CONST KAppEvActive&            =7
  250. CONST KAppEvInactive&        =8
  251. CONST KAppEvUpdateModifiers&=9
  252. CONST KAppEvButton1Down&    =10
  253. CONST KAppEvButton1Up&        =11
  254. CONST KAppEvButton2Down&    =12
  255. CONST KAppEvButton2Up&        =13
  256. CONST KAppEvButton3Down&    =14
  257. CONST KAppEvButton4Up&        =15
  258. CONST KAppEvSwitchOff&        =16
  259. DECLARE OPX APPINFO,KUidOpxAppInfo&,KOpxAppInfoVersion%
  260.     AppExtractAifIcon:(aifFile$, iconSize&, iconType&, iconFile$) : 1
  261.     AppUpdate: : 2
  262.     AppStartScan: : 3
  263.     AppNext: : 4
  264.     AppFileName$: : 5
  265.     AppCaption$: : 6
  266.     AppCapability:(BYREF hidden&, BYREF newFile&, BYREF embed&) : 7
  267.     AppExtractIcon:(iconIndex&, iconType&, iconFile$) : 8
  268.     AppName$: : 9
  269.     AppUID&: : 10
  270.     AppSimulateEvent:(type&,param1&,param2&) : 11
  271. END DECLARE
  272. *texted.app
  273. REM ===========================================
  274. REM APPINFO.OXH version 1.20
  275. REM Header File for APPINFO.OPX
  276. REM Copyright (C) 1998-1999 Twiddlebit Software
  277. REM ===========================================
  278. CONST KUidOpxAppInfo&=&10000546
  279. CONST KOpxAppInfoVersion%=$120
  280. REM The following are the event types recognised
  281. REM by AppSimulateEvent:()
  282. CONST KAppEvNone&            =0
  283. CONST KAppEvPointerMove&    =1
  284. CONST KAppEvPointerSwitchOn&=2
  285. CONST KAppEvKeyDown&        =3
  286. CONST KAppEvKeyUp&            =4
  287. CONST KAppEvRedraw&            =5
  288. CONST KAppEvSwitchOn&        =6
  289. CONST KAppEvActive&            =7
  290. CONST KAppEvInactive&        =8
  291. CONST KAppEvUpdateModifiers&=9
  292. CONST KAppEvButton1Down&    =10
  293. CONST KAppEvButton1Up&        =11
  294. CONST KAppEvButton2Down&    =12
  295. CONST KAppEvButton2Up&        =13
  296. CONST KAppEvButton3Down&    =14
  297. CONST KAppEvButton4Up&        =15
  298. CONST KAppEvSwitchOff&        =16
  299. DECLARE OPX APPINFO,KUidOpxAppInfo&,KOpxAppInfoVersion%
  300.     AppExtractAifIcon:(aifFile$, iconSize&, iconType&, iconFile$) : 1
  301.     AppUpdate: : 2
  302.     AppStartScan: : 3
  303.     AppNext: : 4
  304.     AppFileName$: : 5
  305.     AppCaption$: : 6
  306.     AppCapability:(BYREF hidden&, BYREF newFile&, BYREF embed&) : 7
  307.     AppExtractIcon:(iconIndex&, iconType&, iconFile$) : 8
  308.     AppName$: : 9
  309.     AppUID&: : 10
  310.     AppSimulateEvent:(type&,param1&,param2&) : 11
  311. END DECLARE
  312. *texted.app
  313. AppInfo.opx!:\System\Opx\AppInfo.opxAppInfo OPXy
  314. euser[100000C1].dll
  315. OPLR[10000077].dll
  316. APFILE[1000013f].dll
  317. APGRFX[1000011b].dll
  318. EFSRV[100000BD].dll
  319. FBSCLI[10000176].dll
  320. ws32[1000017d].dll
  321. 0 040H0X0d0p0|0
  322. 7l8x8
  323. 9 9,989D9P9\9h9t9
  324. :(:4:@:L:X:d:p:|:
  325. ;$;4<8<D<H<L<
  326. This SIS-file is designed by BISON Software. 
  327. Bison Software doesn't accept any liability for the 
  328. function of the programme to be installed. 
  329. Please pay attention to the comment in the README file
  330. of the author.
  331. Before installing this software please make a
  332. B A C K U P  of your Psion Series 5.
  333. Have a lot of fun!
  334. Diese SIS-Datei wurde von Bison Software erstellt.
  335. Bison Software 
  336. bernimmt keinerlei Garantie f
  337. r die 
  338. Funktion des zu installierenden Programmes. 
  339. Bitte beachten Sie die Hinweise in der README Datei des
  340. Autors.
  341. Bevor Sie das Programm installieren machen Sie ein  
  342. B A C K U P  Ihres Psion Serie 5.
  343. Viel Spa
  344.