Home » Personal collection » Acorn hard disk » apps » MultiStore » !MultiStor/SwiList
!MultiStor/SwiList
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 » Personal collection » Acorn hard disk » apps » MultiStore |
Filename: | !MultiStor/SwiList |
Read OK: | ✔ |
File size: | 0670 bytes |
Load address: | 0000 |
Exec address: | 0000 |
File contents
10REM > <FlexiFile$Dir>.SwiList SWI number definitions 20 30DEFPROCswilist 40SYS"OS_SWINumberFromString",,"FlexiFile_Command" TO swi% 50SYS"OS_SWINumberFromString",,"FlexiFile_Address" TO swi_a% 60SYS"OS_SWINumberFromString",,"FlexiFile_Variables" TO swi_v% 70reset_%=0:killtask_%=1:selecttask_%=2:format_%=3:abandon_%=4:sd00_%=5 80print_%=6:text_%=7:wimp_%=8:field_%=9:delfield_%=10:sd12_%=11 90sd44_%=12:sd15_%=13:sd16_%=14:flength_%=15:width_%=16:height_%=17 100fnumber_%=18:sd61_%=19:sd62_%=20:sd55_%=21:clear_%=22:cardram_%=23 110makeindex_%=24:makekey_%=25:glayout_%=26:removekey_%=27:subbytes_%=28 120sd20_%=29:sd17_%=30:sd18_%=31:sd21_%=32:sd52_%=33:afile_%=34 130bfile_%=35:sd51_%=36:sd63_%=37:file_%=38:wsbytes_%=39:password_%=40 140setpass_%=41:sd67_%=42:beep_%=43:selectkey_%=44:opt_%=45:sd70_%=46 150gline_%=47:strip_%=48:upper_%=49:sd38_%=50:sd11_%=51:sd64_%=52 160sd57_%=53:create_%=54:close_%=55:cform_%=56:istat_%=57:stat_%=58 170sd58_%=59:sd13_%=60:sd14_%=61:sd39_%=62:gettree_%=63:sd50_%=64 180sd68_%=65:expand_%=66:gfield_%=67:open_%=68:oform_%=69:sd24_%=70 190sd25_%=71:sd26_%=72:sd27_%=73:sd28_%=74:sd29_%=75:sd23_%=76:sd35_%=77 200grec_%=78:locate_%=79:sd60_%=80:subset_%=81:sd45_%=82:next_%=83 210first_%=84:dir_%=85:sd30_%=86:sd37_%=87:sd34_%=88:sd59_%=89:sd43_%=90 220sd32_%=91:seek_%=92:sform_%=93:lform_%=94:line_%=95:sd53_%=96 230nameread_%=97:namewrite_%=98:sd33_%=99:accumulate_%=100:sd65_%=101 240sd66_%=102:add_%=103:pfield_%=104:default_%=105:order_%=106:sd36_%=107 250delrec_%=108:find_%=109:dup_%=110:compact_%=111:checkfile_%=112 260fillcache_%=113:keys_%=114:sd08_%=115 270ENDPROC 280 290DEFFNv_(V%):SYSswi_v%,V%TOV%:=V%
8� > <FlexiFile$Dir>.SwiList SWI number definitions ��swilist (:ș"OS_SWINumberFromString",,"FlexiFile_Command" � swi% 2<ș"OS_SWINumberFromString",,"FlexiFile_Address" � swi_a% <>ș"OS_SWINumberFromString",,"FlexiFile_Variables" � swi_v% FIreset_%=0:killtask_%=1:selecttask_%=2:format_%=3:abandon_%=4:sd00_%=5 PAprint_%=6:text_%=7:wimp_%=8:field_%=9:delfield_%=10:sd12_%=11 ZEsd44_%=12:sd15_%=13:sd16_%=14:flength_%=15:width_%=16:height_%=17 dFfnumber_%=18:sd61_%=19:sd62_%=20:sd55_%=21:clear_%=22:cardram_%=23 nImakeindex_%=24:makekey_%=25:glayout_%=26:removekey_%=27:subbytes_%=28 x@sd20_%=29:sd17_%=30:sd18_%=31:sd21_%=32:sd52_%=33:afile_%=34 �Gbfile_%=35:sd51_%=36:sd63_%=37:file_%=38:wsbytes_%=39:password_%=40 �Fsetpass_%=41:sd67_%=42:beep_%=43:selectkey_%=44:opt_%=45:sd70_%=46 �Bgline_%=47:strip_%=48:upper_%=49:sd38_%=50:sd11_%=51:sd64_%=52 �Dsd57_%=53:create_%=54:close_%=55:cform_%=56:istat_%=57:stat_%=58 �Bsd58_%=59:sd13_%=60:sd14_%=61:sd39_%=62:gettree_%=63:sd50_%=64 �Dsd68_%=65:expand_%=66:gfield_%=67:open_%=68:oform_%=69:sd24_%=70 �Isd25_%=71:sd26_%=72:sd27_%=73:sd28_%=74:sd29_%=75:sd23_%=76:sd35_%=77 �Cgrec_%=78:locate_%=79:sd60_%=80:subset_%=81:sd45_%=82:next_%=83 �Ifirst_%=84:dir_%=85:sd30_%=86:sd37_%=87:sd34_%=88:sd59_%=89:sd43_%=90 �Asd32_%=91:seek_%=92:sform_%=93:lform_%=94:line_%=95:sd53_%=96 �Fnameread_%=97:namewrite_%=98:sd33_%=99:accumulate_%=100:sd65_%=101 �Jsd66_%=102:add_%=103:pfield_%=104:default_%=105:order_%=106:sd36_%=107 �Cdelrec_%=108:find_%=109:dup_%=110:compact_%=111:checkfile_%=112 )fillcache_%=113:keys_%=114:sd08_%=115 � "ݤv_(V%):șswi_v%,V%�V%:=V% �
00000000 0d 00 0a 38 f4 20 3e 20 3c 46 6c 65 78 69 46 69 |...8. > <FlexiFi| 00000010 6c 65 24 44 69 72 3e 2e 53 77 69 4c 69 73 74 20 |le$Dir>.SwiList | 00000020 20 20 53 57 49 20 6e 75 6d 62 65 72 20 64 65 66 | SWI number def| 00000030 69 6e 69 74 69 6f 6e 73 0d 00 14 04 0d 00 1e 0d |initions........| 00000040 dd f2 73 77 69 6c 69 73 74 0d 00 28 3a c8 99 22 |..swilist..(:.."| 00000050 4f 53 5f 53 57 49 4e 75 6d 62 65 72 46 72 6f 6d |OS_SWINumberFrom| 00000060 53 74 72 69 6e 67 22 2c 2c 22 46 6c 65 78 69 46 |String",,"FlexiF| 00000070 69 6c 65 5f 43 6f 6d 6d 61 6e 64 22 20 b8 20 73 |ile_Command" . s| 00000080 77 69 25 0d 00 32 3c c8 99 22 4f 53 5f 53 57 49 |wi%..2<.."OS_SWI| 00000090 4e 75 6d 62 65 72 46 72 6f 6d 53 74 72 69 6e 67 |NumberFromString| 000000a0 22 2c 2c 22 46 6c 65 78 69 46 69 6c 65 5f 41 64 |",,"FlexiFile_Ad| 000000b0 64 72 65 73 73 22 20 b8 20 73 77 69 5f 61 25 0d |dress" . swi_a%.| 000000c0 00 3c 3e c8 99 22 4f 53 5f 53 57 49 4e 75 6d 62 |.<>.."OS_SWINumb| 000000d0 65 72 46 72 6f 6d 53 74 72 69 6e 67 22 2c 2c 22 |erFromString",,"| 000000e0 46 6c 65 78 69 46 69 6c 65 5f 56 61 72 69 61 62 |FlexiFile_Variab| 000000f0 6c 65 73 22 20 b8 20 73 77 69 5f 76 25 0d 00 46 |les" . swi_v%..F| 00000100 49 72 65 73 65 74 5f 25 3d 30 3a 6b 69 6c 6c 74 |Ireset_%=0:killt| 00000110 61 73 6b 5f 25 3d 31 3a 73 65 6c 65 63 74 74 61 |ask_%=1:selectta| 00000120 73 6b 5f 25 3d 32 3a 66 6f 72 6d 61 74 5f 25 3d |sk_%=2:format_%=| 00000130 33 3a 61 62 61 6e 64 6f 6e 5f 25 3d 34 3a 73 64 |3:abandon_%=4:sd| 00000140 30 30 5f 25 3d 35 0d 00 50 41 70 72 69 6e 74 5f |00_%=5..PAprint_| 00000150 25 3d 36 3a 74 65 78 74 5f 25 3d 37 3a 77 69 6d |%=6:text_%=7:wim| 00000160 70 5f 25 3d 38 3a 66 69 65 6c 64 5f 25 3d 39 3a |p_%=8:field_%=9:| 00000170 64 65 6c 66 69 65 6c 64 5f 25 3d 31 30 3a 73 64 |delfield_%=10:sd| 00000180 31 32 5f 25 3d 31 31 0d 00 5a 45 73 64 34 34 5f |12_%=11..ZEsd44_| 00000190 25 3d 31 32 3a 73 64 31 35 5f 25 3d 31 33 3a 73 |%=12:sd15_%=13:s| 000001a0 64 31 36 5f 25 3d 31 34 3a 66 6c 65 6e 67 74 68 |d16_%=14:flength| 000001b0 5f 25 3d 31 35 3a 77 69 64 74 68 5f 25 3d 31 36 |_%=15:width_%=16| 000001c0 3a 68 65 69 67 68 74 5f 25 3d 31 37 0d 00 64 46 |:height_%=17..dF| 000001d0 66 6e 75 6d 62 65 72 5f 25 3d 31 38 3a 73 64 36 |fnumber_%=18:sd6| 000001e0 31 5f 25 3d 31 39 3a 73 64 36 32 5f 25 3d 32 30 |1_%=19:sd62_%=20| 000001f0 3a 73 64 35 35 5f 25 3d 32 31 3a 63 6c 65 61 72 |:sd55_%=21:clear| 00000200 5f 25 3d 32 32 3a 63 61 72 64 72 61 6d 5f 25 3d |_%=22:cardram_%=| 00000210 32 33 0d 00 6e 49 6d 61 6b 65 69 6e 64 65 78 5f |23..nImakeindex_| 00000220 25 3d 32 34 3a 6d 61 6b 65 6b 65 79 5f 25 3d 32 |%=24:makekey_%=2| 00000230 35 3a 67 6c 61 79 6f 75 74 5f 25 3d 32 36 3a 72 |5:glayout_%=26:r| 00000240 65 6d 6f 76 65 6b 65 79 5f 25 3d 32 37 3a 73 75 |emovekey_%=27:su| 00000250 62 62 79 74 65 73 5f 25 3d 32 38 0d 00 78 40 73 |bbytes_%=28..x@s| 00000260 64 32 30 5f 25 3d 32 39 3a 73 64 31 37 5f 25 3d |d20_%=29:sd17_%=| 00000270 33 30 3a 73 64 31 38 5f 25 3d 33 31 3a 73 64 32 |30:sd18_%=31:sd2| 00000280 31 5f 25 3d 33 32 3a 73 64 35 32 5f 25 3d 33 33 |1_%=32:sd52_%=33| 00000290 3a 61 66 69 6c 65 5f 25 3d 33 34 0d 00 82 47 62 |:afile_%=34...Gb| 000002a0 66 69 6c 65 5f 25 3d 33 35 3a 73 64 35 31 5f 25 |file_%=35:sd51_%| 000002b0 3d 33 36 3a 73 64 36 33 5f 25 3d 33 37 3a 66 69 |=36:sd63_%=37:fi| 000002c0 6c 65 5f 25 3d 33 38 3a 77 73 62 79 74 65 73 5f |le_%=38:wsbytes_| 000002d0 25 3d 33 39 3a 70 61 73 73 77 6f 72 64 5f 25 3d |%=39:password_%=| 000002e0 34 30 0d 00 8c 46 73 65 74 70 61 73 73 5f 25 3d |40...Fsetpass_%=| 000002f0 34 31 3a 73 64 36 37 5f 25 3d 34 32 3a 62 65 65 |41:sd67_%=42:bee| 00000300 70 5f 25 3d 34 33 3a 73 65 6c 65 63 74 6b 65 79 |p_%=43:selectkey| 00000310 5f 25 3d 34 34 3a 6f 70 74 5f 25 3d 34 35 3a 73 |_%=44:opt_%=45:s| 00000320 64 37 30 5f 25 3d 34 36 0d 00 96 42 67 6c 69 6e |d70_%=46...Bglin| 00000330 65 5f 25 3d 34 37 3a 73 74 72 69 70 5f 25 3d 34 |e_%=47:strip_%=4| 00000340 38 3a 75 70 70 65 72 5f 25 3d 34 39 3a 73 64 33 |8:upper_%=49:sd3| 00000350 38 5f 25 3d 35 30 3a 73 64 31 31 5f 25 3d 35 31 |8_%=50:sd11_%=51| 00000360 3a 73 64 36 34 5f 25 3d 35 32 0d 00 a0 44 73 64 |:sd64_%=52...Dsd| 00000370 35 37 5f 25 3d 35 33 3a 63 72 65 61 74 65 5f 25 |57_%=53:create_%| 00000380 3d 35 34 3a 63 6c 6f 73 65 5f 25 3d 35 35 3a 63 |=54:close_%=55:c| 00000390 66 6f 72 6d 5f 25 3d 35 36 3a 69 73 74 61 74 5f |form_%=56:istat_| 000003a0 25 3d 35 37 3a 73 74 61 74 5f 25 3d 35 38 0d 00 |%=57:stat_%=58..| 000003b0 aa 42 73 64 35 38 5f 25 3d 35 39 3a 73 64 31 33 |.Bsd58_%=59:sd13| 000003c0 5f 25 3d 36 30 3a 73 64 31 34 5f 25 3d 36 31 3a |_%=60:sd14_%=61:| 000003d0 73 64 33 39 5f 25 3d 36 32 3a 67 65 74 74 72 65 |sd39_%=62:gettre| 000003e0 65 5f 25 3d 36 33 3a 73 64 35 30 5f 25 3d 36 34 |e_%=63:sd50_%=64| 000003f0 0d 00 b4 44 73 64 36 38 5f 25 3d 36 35 3a 65 78 |...Dsd68_%=65:ex| 00000400 70 61 6e 64 5f 25 3d 36 36 3a 67 66 69 65 6c 64 |pand_%=66:gfield| 00000410 5f 25 3d 36 37 3a 6f 70 65 6e 5f 25 3d 36 38 3a |_%=67:open_%=68:| 00000420 6f 66 6f 72 6d 5f 25 3d 36 39 3a 73 64 32 34 5f |oform_%=69:sd24_| 00000430 25 3d 37 30 0d 00 be 49 73 64 32 35 5f 25 3d 37 |%=70...Isd25_%=7| 00000440 31 3a 73 64 32 36 5f 25 3d 37 32 3a 73 64 32 37 |1:sd26_%=72:sd27| 00000450 5f 25 3d 37 33 3a 73 64 32 38 5f 25 3d 37 34 3a |_%=73:sd28_%=74:| 00000460 73 64 32 39 5f 25 3d 37 35 3a 73 64 32 33 5f 25 |sd29_%=75:sd23_%| 00000470 3d 37 36 3a 73 64 33 35 5f 25 3d 37 37 0d 00 c8 |=76:sd35_%=77...| 00000480 43 67 72 65 63 5f 25 3d 37 38 3a 6c 6f 63 61 74 |Cgrec_%=78:locat| 00000490 65 5f 25 3d 37 39 3a 73 64 36 30 5f 25 3d 38 30 |e_%=79:sd60_%=80| 000004a0 3a 73 75 62 73 65 74 5f 25 3d 38 31 3a 73 64 34 |:subset_%=81:sd4| 000004b0 35 5f 25 3d 38 32 3a 6e 65 78 74 5f 25 3d 38 33 |5_%=82:next_%=83| 000004c0 0d 00 d2 49 66 69 72 73 74 5f 25 3d 38 34 3a 64 |...Ifirst_%=84:d| 000004d0 69 72 5f 25 3d 38 35 3a 73 64 33 30 5f 25 3d 38 |ir_%=85:sd30_%=8| 000004e0 36 3a 73 64 33 37 5f 25 3d 38 37 3a 73 64 33 34 |6:sd37_%=87:sd34| 000004f0 5f 25 3d 38 38 3a 73 64 35 39 5f 25 3d 38 39 3a |_%=88:sd59_%=89:| 00000500 73 64 34 33 5f 25 3d 39 30 0d 00 dc 41 73 64 33 |sd43_%=90...Asd3| 00000510 32 5f 25 3d 39 31 3a 73 65 65 6b 5f 25 3d 39 32 |2_%=91:seek_%=92| 00000520 3a 73 66 6f 72 6d 5f 25 3d 39 33 3a 6c 66 6f 72 |:sform_%=93:lfor| 00000530 6d 5f 25 3d 39 34 3a 6c 69 6e 65 5f 25 3d 39 35 |m_%=94:line_%=95| 00000540 3a 73 64 35 33 5f 25 3d 39 36 0d 00 e6 46 6e 61 |:sd53_%=96...Fna| 00000550 6d 65 72 65 61 64 5f 25 3d 39 37 3a 6e 61 6d 65 |meread_%=97:name| 00000560 77 72 69 74 65 5f 25 3d 39 38 3a 73 64 33 33 5f |write_%=98:sd33_| 00000570 25 3d 39 39 3a 61 63 63 75 6d 75 6c 61 74 65 5f |%=99:accumulate_| 00000580 25 3d 31 30 30 3a 73 64 36 35 5f 25 3d 31 30 31 |%=100:sd65_%=101| 00000590 0d 00 f0 4a 73 64 36 36 5f 25 3d 31 30 32 3a 61 |...Jsd66_%=102:a| 000005a0 64 64 5f 25 3d 31 30 33 3a 70 66 69 65 6c 64 5f |dd_%=103:pfield_| 000005b0 25 3d 31 30 34 3a 64 65 66 61 75 6c 74 5f 25 3d |%=104:default_%=| 000005c0 31 30 35 3a 6f 72 64 65 72 5f 25 3d 31 30 36 3a |105:order_%=106:| 000005d0 73 64 33 36 5f 25 3d 31 30 37 0d 00 fa 43 64 65 |sd36_%=107...Cde| 000005e0 6c 72 65 63 5f 25 3d 31 30 38 3a 66 69 6e 64 5f |lrec_%=108:find_| 000005f0 25 3d 31 30 39 3a 64 75 70 5f 25 3d 31 31 30 3a |%=109:dup_%=110:| 00000600 63 6f 6d 70 61 63 74 5f 25 3d 31 31 31 3a 63 68 |compact_%=111:ch| 00000610 65 63 6b 66 69 6c 65 5f 25 3d 31 31 32 0d 01 04 |eckfile_%=112...| 00000620 29 66 69 6c 6c 63 61 63 68 65 5f 25 3d 31 31 33 |)fillcache_%=113| 00000630 3a 6b 65 79 73 5f 25 3d 31 31 34 3a 73 64 30 38 |:keys_%=114:sd08| 00000640 5f 25 3d 31 31 35 0d 01 0e 05 e1 0d 01 18 04 0d |_%=115..........| 00000650 01 22 1f dd a4 76 5f 28 56 25 29 3a c8 99 73 77 |."...v_(V%):..sw| 00000660 69 5f 76 25 2c 56 25 b8 56 25 3a 3d 56 25 0d ff |i_v%,V%.V%:=V%..| 00000670