Home » Recent acquisitions » Acorn ADFS disks » adfs_ArchimedesWorld_199207.adf » !AWJULY92 » !AWJUL92/Goodies/Wimp/!WimpPool/!Run

!AWJUL92/Goodies/Wimp/!WimpPool/!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 » Recent acquisitions » Acorn ADFS disks » adfs_ArchimedesWorld_199207.adf » !AWJULY92
Filename: !AWJUL92/Goodies/Wimp/!WimpPool/!Run
Read OK:
File size: 0224 bytes
Load address: 0000
Exec address: 0000
File contents
   | 
   | 
   | Run file for application : !wimppool
   | 
   | 
     Set WimpPool$Dir <Obey$Dir>
     IconSprites <Obey$Dir>.!Sprites
     WimpSlot -min 32K -max 32K
     Run <Obey$Dir>.!RunImage
   |
   |
   | Notes:
   |
   | The Wimp procedures require two memory blocks  wimp% and icon_memory%
   | (See FNWimp_Initialise)
   |
   | The parameters after !RunImage are the sizes of these blocks.
   | 
   | They may need altering by the user
   | 
   | If no parameters are present then wimp% is set to length &1000
   | and icon_memory% to 0
00000000  20 20 20 7c 20 0a 20 20  20 7c 20 0a 20 20 20 7c  |   | .   | .   ||
00000010  20 52 75 6e 20 66 69 6c  65 20 66 6f 72 20 61 70  | Run file for ap|
00000020  70 6c 69 63 61 74 69 6f  6e 20 3a 20 21 77 69 6d  |plication : !wim|
00000030  70 70 6f 6f 6c 0a 20 20  20 7c 20 0a 20 20 20 7c  |ppool.   | .   ||
00000040  20 0a 20 20 20 20 20 53  65 74 20 57 69 6d 70 50  | .     Set WimpP|
00000050  6f 6f 6c 24 44 69 72 20  3c 4f 62 65 79 24 44 69  |ool$Dir <Obey$Di|
00000060  72 3e 0a 20 20 20 20 20  49 63 6f 6e 53 70 72 69  |r>.     IconSpri|
00000070  74 65 73 20 3c 4f 62 65  79 24 44 69 72 3e 2e 21  |tes <Obey$Dir>.!|
00000080  53 70 72 69 74 65 73 0a  20 20 20 20 20 57 69 6d  |Sprites.     Wim|
00000090  70 53 6c 6f 74 20 2d 6d  69 6e 20 33 32 4b 20 2d  |pSlot -min 32K -|
000000a0  6d 61 78 20 33 32 4b 0a  20 20 20 20 20 52 75 6e  |max 32K.     Run|
000000b0  20 3c 4f 62 65 79 24 44  69 72 3e 2e 21 52 75 6e  | <Obey$Dir>.!Run|
000000c0  49 6d 61 67 65 0a 20 20  20 7c 0a 20 20 20 7c 0a  |Image.   |.   |.|
000000d0  20 20 20 7c 20 4e 6f 74  65 73 3a 0a 20 20 20 7c  |   | Notes:.   ||
000000e0  0a 20 20 20 7c 20 54 68  65 20 57 69 6d 70 20 70  |.   | The Wimp p|
000000f0  72 6f 63 65 64 75 72 65  73 20 72 65 71 75 69 72  |rocedures requir|
00000100  65 20 74 77 6f 20 6d 65  6d 6f 72 79 20 62 6c 6f  |e two memory blo|
00000110  63 6b 73 20 20 77 69 6d  70 25 20 61 6e 64 20 69  |cks  wimp% and i|
00000120  63 6f 6e 5f 6d 65 6d 6f  72 79 25 0a 20 20 20 7c  |con_memory%.   ||
00000130  20 28 53 65 65 20 46 4e  57 69 6d 70 5f 49 6e 69  | (See FNWimp_Ini|
00000140  74 69 61 6c 69 73 65 29  0a 20 20 20 7c 0a 20 20  |tialise).   |.  |
00000150  20 7c 20 54 68 65 20 70  61 72 61 6d 65 74 65 72  | | The parameter|
00000160  73 20 61 66 74 65 72 20  21 52 75 6e 49 6d 61 67  |s after !RunImag|
00000170  65 20 61 72 65 20 74 68  65 20 73 69 7a 65 73 20  |e are the sizes |
00000180  6f 66 20 74 68 65 73 65  20 62 6c 6f 63 6b 73 2e  |of these blocks.|
00000190  0a 20 20 20 7c 20 0a 20  20 20 7c 20 54 68 65 79  |.   | .   | They|
000001a0  20 6d 61 79 20 6e 65 65  64 20 61 6c 74 65 72 69  | may need alteri|
000001b0  6e 67 20 62 79 20 74 68  65 20 75 73 65 72 0a 20  |ng by the user. |
000001c0  20 20 7c 20 0a 20 20 20  7c 20 49 66 20 6e 6f 20  |  | .   | If no |
000001d0  70 61 72 61 6d 65 74 65  72 73 20 61 72 65 20 70  |parameters are p|
000001e0  72 65 73 65 6e 74 20 74  68 65 6e 20 77 69 6d 70  |resent then wimp|
000001f0  25 20 69 73 20 73 65 74  20 74 6f 20 6c 65 6e 67  |% is set to leng|
00000200  74 68 20 26 31 30 30 30  0a 20 20 20 7c 20 61 6e  |th &1000.   | an|
00000210  64 20 69 63 6f 6e 5f 6d  65 6d 6f 72 79 25 20 74  |d icon_memory% t|
00000220  6f 20 30 0a                                       |o 0.|
00000224