Home » Archimedes archive » Archimedes World » AW-1995-01-Disc2.adf » Disk2Jan95 » !AWJan95/Goodies/Event/Docs/Strings
!AWJan95/Goodies/Event/Docs/Strings
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 » Archimedes World » AW-1995-01-Disc2.adf » Disk2Jan95 |
Filename: | !AWJan95/Goodies/Event/Docs/Strings |
Read OK: | ✔ |
File size: | 081C bytes |
Load address: | 0000 |
Exec address: | 0000 |
Duplicates
There is 1 duplicate copy of this file in the archive:
- Archimedes archive » Acorn Computing » 1994 08 subscription disc.adf » 9408s » Shareware/Event/Documents/!EShellDoc/TextHelp/Strings
- Archimedes archive » Archimedes World » AW-1995-01-Disc2.adf » Disk2Jan95 » !AWJan95/Goodies/Event/Docs/Strings
File contents
FNshell_GetString() Returns the string at the given address. Terminators may be any character below ASCII 32. Params => int address <= string found at address -------------------------------------------------------- FNshell_StringArrayGetLongest() Params => array name of string array int number of elements <= int length of longest element -------------------------------------------------------- FNshell_StringExchange() Params => str source string str target string str substitution string <= str transformed string -------------------------------------------------------- FNshell_StringUpperCase() Params => str source string <= str transformed string -------------------------------------------------------- FNshell_StringLowerCase() Params => str source string <= str transformed string -------------------------------------------------------- FNshell_StringPadLeading() Params => str source string str pad character int length to pad to <= str transformed string -------------------------------------------------------- FNshell_StringPadTrailing() Params => str source string str pad character int length to pad to <= str transformed string -------------------------------------------------------- FNshell_StringStripAll() Params => str source string str character to strip <= str transformed string -------------------------------------------------------- FNshell_StringStripLeading() Params => str source string str character to strip <= str transformed string -------------------------------------------------------- FNshell_StringStripTrailing() Params => str source string str character to strip <= str transformed string --------------------------------------------------------
00000000 46 4e 73 68 65 6c 6c 5f 47 65 74 53 74 72 69 6e |FNshell_GetStrin| 00000010 67 28 29 0a 52 65 74 75 72 6e 73 20 74 68 65 20 |g().Returns the | 00000020 73 74 72 69 6e 67 20 61 74 20 74 68 65 20 67 69 |string at the gi| 00000030 76 65 6e 20 61 64 64 72 65 73 73 2e 0a 54 65 72 |ven address..Ter| 00000040 6d 69 6e 61 74 6f 72 73 20 6d 61 79 20 62 65 20 |minators may be | 00000050 61 6e 79 20 63 68 61 72 61 63 74 65 72 20 62 65 |any character be| 00000060 6c 6f 77 0a 41 53 43 49 49 20 33 32 2e 0a 20 0a |low.ASCII 32.. .| 00000070 50 61 72 61 6d 73 20 20 3d 3e 0a 20 20 20 20 20 |Params =>. | 00000080 20 20 20 20 69 6e 74 20 61 64 64 72 65 73 73 0a | int address.| 00000090 0a 20 20 20 20 20 20 20 20 3c 3d 0a 20 20 20 20 |. <=. | 000000a0 20 20 20 20 20 73 74 72 69 6e 67 20 66 6f 75 6e | string foun| 000000b0 64 20 61 74 20 61 64 64 72 65 73 73 0a 0a 2d 2d |d at address..--| 000000c0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |----------------| * 000000f0 2d 2d 2d 2d 2d 2d 0a 0a 46 4e 73 68 65 6c 6c 5f |------..FNshell_| 00000100 53 74 72 69 6e 67 41 72 72 61 79 47 65 74 4c 6f |StringArrayGetLo| 00000110 6e 67 65 73 74 28 29 0a 50 61 72 61 6d 73 20 3d |ngest().Params =| 00000120 3e 0a 20 20 20 20 20 20 20 20 20 61 72 72 61 79 |>. array| 00000130 20 6e 61 6d 65 20 6f 66 20 73 74 72 69 6e 67 20 | name of string | 00000140 61 72 72 61 79 0a 20 20 20 20 20 20 20 20 20 69 |array. i| 00000150 6e 74 20 20 20 6e 75 6d 62 65 72 20 6f 66 20 65 |nt number of e| 00000160 6c 65 6d 65 6e 74 73 0a 0a 20 20 20 20 20 20 20 |lements.. | 00000170 3c 3d 0a 20 20 20 20 20 20 20 20 20 69 6e 74 20 |<=. int | 00000180 20 20 6c 65 6e 67 74 68 20 6f 66 20 6c 6f 6e 67 | length of long| 00000190 65 73 74 20 65 6c 65 6d 65 6e 74 0a 0a 2d 2d 2d |est element..---| 000001a0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |----------------| * 000001d0 2d 2d 2d 2d 2d 0a 0a 46 4e 73 68 65 6c 6c 5f 53 |-----..FNshell_S| 000001e0 74 72 69 6e 67 45 78 63 68 61 6e 67 65 28 29 0a |tringExchange().| 000001f0 50 61 72 61 6d 73 20 3d 3e 0a 20 20 20 20 20 20 |Params =>. | 00000200 20 20 20 73 74 72 20 73 6f 75 72 63 65 20 73 74 | str source st| 00000210 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 73 74 |ring. st| 00000220 72 20 74 61 72 67 65 74 20 73 74 72 69 6e 67 0a |r target string.| 00000230 20 20 20 20 20 20 20 20 20 73 74 72 20 73 75 62 | str sub| 00000240 73 74 69 74 75 74 69 6f 6e 20 73 74 72 69 6e 67 |stitution string| 00000250 0a 0a 20 20 20 20 20 20 20 3c 3d 0a 20 20 20 20 |.. <=. | 00000260 20 20 20 20 20 73 74 72 20 74 72 61 6e 73 66 6f | str transfo| 00000270 72 6d 65 64 20 73 74 72 69 6e 67 0a 0a 2d 2d 2d |rmed string..---| 00000280 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |----------------| * 000002b0 2d 2d 2d 2d 2d 0a 0a 46 4e 73 68 65 6c 6c 5f 53 |-----..FNshell_S| 000002c0 74 72 69 6e 67 55 70 70 65 72 43 61 73 65 28 29 |tringUpperCase()| 000002d0 0a 50 61 72 61 6d 73 20 3d 3e 0a 20 20 20 20 20 |.Params =>. | 000002e0 20 20 20 20 73 74 72 20 73 6f 75 72 63 65 20 73 | str source s| 000002f0 74 72 69 6e 67 0a 0a 20 20 20 20 20 20 20 3c 3d |tring.. <=| 00000300 0a 20 20 20 20 20 20 20 20 20 73 74 72 20 74 72 |. str tr| 00000310 61 6e 73 66 6f 72 6d 65 64 20 73 74 72 69 6e 67 |ansformed string| 00000320 0a 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |..--------------| 00000330 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |----------------| * 00000350 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 46 4e 73 68 |----------..FNsh| 00000360 65 6c 6c 5f 53 74 72 69 6e 67 4c 6f 77 65 72 43 |ell_StringLowerC| 00000370 61 73 65 28 29 0a 50 61 72 61 6d 73 20 3d 3e 0a |ase().Params =>.| 00000380 20 20 20 20 20 20 20 20 20 73 74 72 20 73 6f 75 | str sou| 00000390 72 63 65 20 73 74 72 69 6e 67 0a 0a 20 20 20 20 |rce string.. | 000003a0 20 20 20 3c 3d 0a 20 20 20 20 20 20 20 20 20 73 | <=. s| 000003b0 74 72 20 74 72 61 6e 73 66 6f 72 6d 65 64 20 73 |tr transformed s| 000003c0 74 72 69 6e 67 0a 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d |tring..---------| 000003d0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |----------------| * 000003f0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a |---------------.| 00000400 0a 46 4e 73 68 65 6c 6c 5f 53 74 72 69 6e 67 50 |.FNshell_StringP| 00000410 61 64 4c 65 61 64 69 6e 67 28 29 0a 50 61 72 61 |adLeading().Para| 00000420 6d 73 20 3d 3e 0a 20 20 20 20 20 20 20 20 20 73 |ms =>. s| 00000430 74 72 20 73 6f 75 72 63 65 20 73 74 72 69 6e 67 |tr source string| 00000440 0a 20 20 20 20 20 20 20 20 20 73 74 72 20 70 61 |. str pa| 00000450 64 20 63 68 61 72 61 63 74 65 72 0a 20 20 20 20 |d character. | 00000460 20 20 20 20 20 69 6e 74 20 6c 65 6e 67 74 68 20 | int length | 00000470 74 6f 20 70 61 64 20 74 6f 0a 0a 20 20 20 20 20 |to pad to.. | 00000480 20 20 3c 3d 0a 20 20 20 20 20 20 20 20 20 73 74 | <=. st| 00000490 72 20 74 72 61 6e 73 66 6f 72 6d 65 64 20 73 74 |r transformed st| 000004a0 72 69 6e 67 0a 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |ring..----------| 000004b0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |----------------| * 000004d0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a |--------------..| 000004e0 46 4e 73 68 65 6c 6c 5f 53 74 72 69 6e 67 50 61 |FNshell_StringPa| 000004f0 64 54 72 61 69 6c 69 6e 67 28 29 0a 50 61 72 61 |dTrailing().Para| 00000500 6d 73 20 3d 3e 0a 20 20 20 20 20 20 20 20 20 73 |ms =>. s| 00000510 74 72 20 73 6f 75 72 63 65 20 73 74 72 69 6e 67 |tr source string| 00000520 0a 20 20 20 20 20 20 20 20 20 73 74 72 20 70 61 |. str pa| 00000530 64 20 63 68 61 72 61 63 74 65 72 0a 20 20 20 20 |d character. | 00000540 20 20 20 20 20 69 6e 74 20 6c 65 6e 67 74 68 20 | int length | 00000550 74 6f 20 70 61 64 20 74 6f 0a 0a 20 20 20 20 20 |to pad to.. | 00000560 20 20 3c 3d 0a 20 20 20 20 20 20 20 20 20 73 74 | <=. st| 00000570 72 20 74 72 61 6e 73 66 6f 72 6d 65 64 20 73 74 |r transformed st| 00000580 72 69 6e 67 0a 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |ring..----------| 00000590 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |----------------| * 000005b0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a |--------------..| 000005c0 46 4e 73 68 65 6c 6c 5f 53 74 72 69 6e 67 53 74 |FNshell_StringSt| 000005d0 72 69 70 41 6c 6c 28 29 0a 50 61 72 61 6d 73 20 |ripAll().Params | 000005e0 3d 3e 0a 20 20 20 20 20 20 20 20 20 73 74 72 20 |=>. str | 000005f0 73 6f 75 72 63 65 20 73 74 72 69 6e 67 0a 20 20 |source string. | 00000600 20 20 20 20 20 20 20 73 74 72 20 63 68 61 72 61 | str chara| 00000610 63 74 65 72 20 74 6f 20 73 74 72 69 70 0a 0a 20 |cter to strip.. | 00000620 20 20 20 20 20 20 3c 3d 0a 20 20 20 20 20 20 20 | <=. | 00000630 20 20 73 74 72 20 74 72 61 6e 73 66 6f 72 6d 65 | str transforme| 00000640 64 20 73 74 72 69 6e 67 0a 0a 2d 2d 2d 2d 2d 2d |d string..------| 00000650 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |----------------| * 00000680 2d 2d 0a 0a 46 4e 73 68 65 6c 6c 5f 53 74 72 69 |--..FNshell_Stri| 00000690 6e 67 53 74 72 69 70 4c 65 61 64 69 6e 67 28 29 |ngStripLeading()| 000006a0 0a 50 61 72 61 6d 73 20 3d 3e 0a 20 20 20 20 20 |.Params =>. | 000006b0 20 20 20 20 73 74 72 20 73 6f 75 72 63 65 20 73 | str source s| 000006c0 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 73 |tring. s| 000006d0 74 72 20 63 68 61 72 61 63 74 65 72 20 74 6f 20 |tr character to | 000006e0 73 74 72 69 70 0a 0a 20 20 20 20 20 20 20 3c 3d |strip.. <=| 000006f0 0a 20 20 20 20 20 20 20 20 20 73 74 72 20 74 72 |. str tr| 00000700 61 6e 73 66 6f 72 6d 65 64 20 73 74 72 69 6e 67 |ansformed string| 00000710 0a 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |..--------------| 00000720 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |----------------| * 00000740 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 46 4e 73 68 |----------..FNsh| 00000750 65 6c 6c 5f 53 74 72 69 6e 67 53 74 72 69 70 54 |ell_StringStripT| 00000760 72 61 69 6c 69 6e 67 28 29 0a 50 61 72 61 6d 73 |railing().Params| 00000770 20 3d 3e 0a 20 20 20 20 20 20 20 20 20 73 74 72 | =>. str| 00000780 20 73 6f 75 72 63 65 20 73 74 72 69 6e 67 20 20 | source string | 00000790 20 20 20 20 20 20 0a 20 20 20 20 20 20 20 20 20 | . | 000007a0 73 74 72 20 63 68 61 72 61 63 74 65 72 20 74 6f |str character to| 000007b0 20 73 74 72 69 70 0a 0a 20 20 20 20 20 20 20 3c | strip.. <| 000007c0 3d 0a 20 20 20 20 20 20 20 20 20 73 74 72 20 74 |=. str t| 000007d0 72 61 6e 73 66 6f 72 6d 65 64 20 73 74 72 69 6e |ransformed strin| 000007e0 67 0a 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |g..-------------| 000007f0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |----------------| * 00000810 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a |-----------.| 0000081c