Home » Archimedes archive » Acorn User » AU 1998-10.adf » Features » DesktopPD/WimpBar2/!WimpBar2/!Run

DesktopPD/WimpBar2/!WimpBar2/!Run

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Archimedes archive » Acorn User » AU 1998-10.adf » Features
Filename: DesktopPD/WimpBar2/!WimpBar2/!Run
Read OK:
File size: 04B7 bytes
Load address: 0000
Exec address: 0000
File contents
|
| !Run file for WimpBar 2, � 1998 Technium220.
|
Set WB2$Dir <Obey$Dir>
IconSprites <WB2$Dir>.Resources.!Sprites

RmEnsure UtilityModule 3 Error This application requires RISC OS 3 or later.
RmEnsure WB2Support 0 RmLoad <WB2$Dir>.Resources.Support

| This variable only dictates where the Choices are read from - they are
| always written to Choices$Write or the application directory if not
| available. So it's a bit pointless changing it.
Set WB2Choices$Path Choices:WimpBar2.,<WB2$Dir>.

WimpSlot -min 48k -max 48k

<WB2$Dir>.Resources.ResFind WB2

| Possible parameters passed to WimpBar 2:
|
| -readonly  Disables the 'Configure' options
| -nostatus  Removes the time/memory icon
| -noback    Stops the bar going to the back when the pointer moves off it
|
| -b         Set maximum number of buttons on the bar
| -i         Set maximum number of items in a button
|            (ie menu entries or action commands)
|
|            The absolute maximum for the above two options is 64.
|
| -w         Set the maximum size of text workspace. The default size
|            is 8192 bytes, which should be plenty.
|
| Example:
| <WB2$Dir>.!RunImage -b20 -i32 -w8192 -readonly

<WB2$Dir>.!RunImage -b20 -i24
00000000  7c 0a 7c 20 21 52 75 6e  20 66 69 6c 65 20 66 6f  ||.| !Run file fo|
00000010  72 20 57 69 6d 70 42 61  72 20 32 2c 20 a9 20 31  |r WimpBar 2, . 1|
00000020  39 39 38 20 54 65 63 68  6e 69 75 6d 32 32 30 2e  |998 Technium220.|
00000030  0a 7c 0a 53 65 74 20 57  42 32 24 44 69 72 20 3c  |.|.Set WB2$Dir <|
00000040  4f 62 65 79 24 44 69 72  3e 0a 49 63 6f 6e 53 70  |Obey$Dir>.IconSp|
00000050  72 69 74 65 73 20 3c 57  42 32 24 44 69 72 3e 2e  |rites <WB2$Dir>.|
00000060  52 65 73 6f 75 72 63 65  73 2e 21 53 70 72 69 74  |Resources.!Sprit|
00000070  65 73 0a 0a 52 6d 45 6e  73 75 72 65 20 55 74 69  |es..RmEnsure Uti|
00000080  6c 69 74 79 4d 6f 64 75  6c 65 20 33 20 45 72 72  |lityModule 3 Err|
00000090  6f 72 20 54 68 69 73 20  61 70 70 6c 69 63 61 74  |or This applicat|
000000a0  69 6f 6e 20 72 65 71 75  69 72 65 73 20 52 49 53  |ion requires RIS|
000000b0  43 20 4f 53 20 33 20 6f  72 20 6c 61 74 65 72 2e  |C OS 3 or later.|
000000c0  0a 52 6d 45 6e 73 75 72  65 20 57 42 32 53 75 70  |.RmEnsure WB2Sup|
000000d0  70 6f 72 74 20 30 20 52  6d 4c 6f 61 64 20 3c 57  |port 0 RmLoad <W|
000000e0  42 32 24 44 69 72 3e 2e  52 65 73 6f 75 72 63 65  |B2$Dir>.Resource|
000000f0  73 2e 53 75 70 70 6f 72  74 0a 0a 7c 20 54 68 69  |s.Support..| Thi|
00000100  73 20 76 61 72 69 61 62  6c 65 20 6f 6e 6c 79 20  |s variable only |
00000110  64 69 63 74 61 74 65 73  20 77 68 65 72 65 20 74  |dictates where t|
00000120  68 65 20 43 68 6f 69 63  65 73 20 61 72 65 20 72  |he Choices are r|
00000130  65 61 64 20 66 72 6f 6d  20 2d 20 74 68 65 79 20  |ead from - they |
00000140  61 72 65 0a 7c 20 61 6c  77 61 79 73 20 77 72 69  |are.| always wri|
00000150  74 74 65 6e 20 74 6f 20  43 68 6f 69 63 65 73 24  |tten to Choices$|
00000160  57 72 69 74 65 20 6f 72  20 74 68 65 20 61 70 70  |Write or the app|
00000170  6c 69 63 61 74 69 6f 6e  20 64 69 72 65 63 74 6f  |lication directo|
00000180  72 79 20 69 66 20 6e 6f  74 0a 7c 20 61 76 61 69  |ry if not.| avai|
00000190  6c 61 62 6c 65 2e 20 53  6f 20 69 74 27 73 20 61  |lable. So it's a|
000001a0  20 62 69 74 20 70 6f 69  6e 74 6c 65 73 73 20 63  | bit pointless c|
000001b0  68 61 6e 67 69 6e 67 20  69 74 2e 0a 53 65 74 20  |hanging it..Set |
000001c0  57 42 32 43 68 6f 69 63  65 73 24 50 61 74 68 20  |WB2Choices$Path |
000001d0  43 68 6f 69 63 65 73 3a  57 69 6d 70 42 61 72 32  |Choices:WimpBar2|
000001e0  2e 2c 3c 57 42 32 24 44  69 72 3e 2e 0a 0a 57 69  |.,<WB2$Dir>...Wi|
000001f0  6d 70 53 6c 6f 74 20 2d  6d 69 6e 20 34 38 6b 20  |mpSlot -min 48k |
00000200  2d 6d 61 78 20 34 38 6b  0a 0a 3c 57 42 32 24 44  |-max 48k..<WB2$D|
00000210  69 72 3e 2e 52 65 73 6f  75 72 63 65 73 2e 52 65  |ir>.Resources.Re|
00000220  73 46 69 6e 64 20 57 42  32 0a 0a 7c 20 50 6f 73  |sFind WB2..| Pos|
00000230  73 69 62 6c 65 20 70 61  72 61 6d 65 74 65 72 73  |sible parameters|
00000240  20 70 61 73 73 65 64 20  74 6f 20 57 69 6d 70 42  | passed to WimpB|
00000250  61 72 20 32 3a 0a 7c 0a  7c 20 2d 72 65 61 64 6f  |ar 2:.|.| -reado|
00000260  6e 6c 79 20 20 44 69 73  61 62 6c 65 73 20 74 68  |nly  Disables th|
00000270  65 20 27 43 6f 6e 66 69  67 75 72 65 27 20 6f 70  |e 'Configure' op|
00000280  74 69 6f 6e 73 0a 7c 20  2d 6e 6f 73 74 61 74 75  |tions.| -nostatu|
00000290  73 20 20 52 65 6d 6f 76  65 73 20 74 68 65 20 74  |s  Removes the t|
000002a0  69 6d 65 2f 6d 65 6d 6f  72 79 20 69 63 6f 6e 0a  |ime/memory icon.|
000002b0  7c 20 2d 6e 6f 62 61 63  6b 20 20 20 20 53 74 6f  || -noback    Sto|
000002c0  70 73 20 74 68 65 20 62  61 72 20 67 6f 69 6e 67  |ps the bar going|
000002d0  20 74 6f 20 74 68 65 20  62 61 63 6b 20 77 68 65  | to the back whe|
000002e0  6e 20 74 68 65 20 70 6f  69 6e 74 65 72 20 6d 6f  |n the pointer mo|
000002f0  76 65 73 20 6f 66 66 20  69 74 0a 7c 0a 7c 20 2d  |ves off it.|.| -|
00000300  62 20 20 20 20 20 20 20  20 20 53 65 74 20 6d 61  |b         Set ma|
00000310  78 69 6d 75 6d 20 6e 75  6d 62 65 72 20 6f 66 20  |ximum number of |
00000320  62 75 74 74 6f 6e 73 20  6f 6e 20 74 68 65 20 62  |buttons on the b|
00000330  61 72 0a 7c 20 2d 69 20  20 20 20 20 20 20 20 20  |ar.| -i         |
00000340  53 65 74 20 6d 61 78 69  6d 75 6d 20 6e 75 6d 62  |Set maximum numb|
00000350  65 72 20 6f 66 20 69 74  65 6d 73 20 69 6e 20 61  |er of items in a|
00000360  20 62 75 74 74 6f 6e 0a  7c 20 20 20 20 20 20 20  | button.|       |
00000370  20 20 20 20 20 28 69 65  20 6d 65 6e 75 20 65 6e  |     (ie menu en|
00000380  74 72 69 65 73 20 6f 72  20 61 63 74 69 6f 6e 20  |tries or action |
00000390  63 6f 6d 6d 61 6e 64 73  29 0a 7c 0a 7c 20 20 20  |commands).|.|   |
000003a0  20 20 20 20 20 20 20 20  20 54 68 65 20 61 62 73  |         The abs|
000003b0  6f 6c 75 74 65 20 6d 61  78 69 6d 75 6d 20 66 6f  |olute maximum fo|
000003c0  72 20 74 68 65 20 61 62  6f 76 65 20 74 77 6f 20  |r the above two |
000003d0  6f 70 74 69 6f 6e 73 20  69 73 20 36 34 2e 0a 7c  |options is 64..||
000003e0  0a 7c 20 2d 77 20 20 20  20 20 20 20 20 20 53 65  |.| -w         Se|
000003f0  74 20 74 68 65 20 6d 61  78 69 6d 75 6d 20 73 69  |t the maximum si|
00000400  7a 65 20 6f 66 20 74 65  78 74 20 77 6f 72 6b 73  |ze of text works|
00000410  70 61 63 65 2e 20 54 68  65 20 64 65 66 61 75 6c  |pace. The defaul|
00000420  74 20 73 69 7a 65 0a 7c  20 20 20 20 20 20 20 20  |t size.|        |
00000430  20 20 20 20 69 73 20 38  31 39 32 20 62 79 74 65  |    is 8192 byte|
00000440  73 2c 20 77 68 69 63 68  20 73 68 6f 75 6c 64 20  |s, which should |
00000450  62 65 20 70 6c 65 6e 74  79 2e 0a 7c 0a 7c 20 45  |be plenty..|.| E|
00000460  78 61 6d 70 6c 65 3a 0a  7c 20 3c 57 42 32 24 44  |xample:.| <WB2$D|
00000470  69 72 3e 2e 21 52 75 6e  49 6d 61 67 65 20 2d 62  |ir>.!RunImage -b|
00000480  32 30 20 2d 69 33 32 20  2d 77 38 31 39 32 20 2d  |20 -i32 -w8192 -|
00000490  72 65 61 64 6f 6e 6c 79  0a 0a 3c 57 42 32 24 44  |readonly..<WB2$D|
000004a0  69 72 3e 2e 21 52 75 6e  49 6d 61 67 65 20 2d 62  |ir>.!RunImage -b|
000004b0  32 30 20 2d 69 32 34                              |20 -i24|
000004b7