Groups | Search | Server Info | Login | Register
Groups > comp.sys.acorn.programmer > #6643
| From | Bob Latham <bob@sick-of-spam.invalid> |
|---|---|
| Newsgroups | comp.sys.acorn.programmer |
| Subject | Re: Name of a program |
| Date | 2026-04-18 13:55 +0100 |
| Organization | None |
| Message-ID | <5ccb772778bob@sick-of-spam.invalid> (permalink) |
| References | <5cca837cdbbob@sick-of-spam.invalid> <5cca87776fNews04@avisoft.f9.co.uk> <5cca8d05ebbob@sick-of-spam.invalid> <mpro.tdoqxk00q5yfx0cd6.news@stevefryatt.org.uk> |
In article <mpro.tdoqxk00q5yfx0cd6.news@stevefryatt.org.uk>, Steve Fryatt <news@stevefryatt.org.uk> wrote: > On 16 Apr, Bob Latham wrote in message > <5cca8d05ebbob@sick-of-spam.invalid>: > > If in a Basic assembler file I run SWI OS_GetEnv it just says BASIC, which > > I suppose that is what it is running but it's of no use to me. > > > > I want the name of Basic assembler file. > Isn't it on the tail of the command; something like > BASIC -quit ADFS::0.$.The.Path.To.My.Program > This is how RISC OS runs BASIC programs that you double-click on, > or call via *Filer_Run, or whatever. > From this, you can get the path into a path$ variable as follows: > buffer_size% = 1024 DIM buffer% buffer_size% > REM Read the command line used to call the program. > SYS "OS_GetEnv" TO environment% SYS "OS_ReadArgs", > ",load=quit/K", environment%, buffer%, buffer_size% > SYS "XOS_GenerateError", buffer%!0 TO basic$ SYS > "XOS_GenerateError", buffer%!4 TO path$ > REM We're assuming that we're being run by a double-click, and so > the REM command line will start "BASIC -quit ...". If not, we > don't go REM any further. > IF basic$ <> "BASIC" OR path$ = "" THEN END > PRINT "My file is ";path$ Thanks Steve, I'll look into that and give it a try. Cheers, Bob.
Back to comp.sys.acorn.programmer | Previous | Next — Previous in thread | Find similar
Name of a program Bob Latham <bob@sick-of-spam.invalid> - 2026-04-16 17:34 +0100
Re: Name of a program Martin <News04@avisoft.f9.co.uk> - 2026-04-16 18:17 +0100
Re: Name of a program Bob Latham <bob@sick-of-spam.invalid> - 2026-04-16 19:18 +0100
Re: Name of a program Martin <News04@avisoft.f9.co.uk> - 2026-04-16 22:29 +0100
Re: Name of a program Harriet Bazley <harriet@bazleyfamily.co.uk> - 2026-04-17 10:45 +0100
Re: Name of a program Theo <theom+news@chiark.greenend.org.uk> - 2026-04-17 11:43 +0100
Re: Name of a program Bob Latham <bob@sick-of-spam.invalid> - 2026-04-17 12:59 +0100
Re: Name of a program Martin <News04@avisoft.f9.co.uk> - 2026-04-17 16:52 +0100
Re: Name of a program Bob Latham <bob@sick-of-spam.invalid> - 2026-04-17 20:15 +0100
Re: Name of a program Martin <News04@avisoft.f9.co.uk> - 2026-04-17 23:24 +0100
Re: Name of a program Bob Latham <bob@sick-of-spam.invalid> - 2026-04-18 10:08 +0100
Re: Name of a program Theo <theom+news@chiark.greenend.org.uk> - 2026-04-18 10:56 +0100
Re: Name of a program Martin <News04@avisoft.f9.co.uk> - 2026-04-18 11:13 +0100
Re: Name of a program Bob Latham <bob@sick-of-spam.invalid> - 2026-04-18 13:50 +0100
Re: Name of a program Bob Latham <bob@sick-of-spam.invalid> - 2026-04-18 15:29 +0100
Re: Name of a program Martin <News04@avisoft.f9.co.uk> - 2026-04-18 16:30 +0100
Re: Name of a program Theo <theom+news@chiark.greenend.org.uk> - 2026-04-18 17:54 +0100
Re: Name of a program Martin <News04@avisoft.f9.co.uk> - 2026-04-18 18:06 +0100
Re: Name of a program Martin <News04@avisoft.f9.co.uk> - 2026-04-18 18:51 +0100
Re: Name of a program Bob Latham <bob@sick-of-spam.invalid> - 2026-04-18 19:08 +0100
Re: Name of a program Martin <News04@avisoft.f9.co.uk> - 2026-04-18 19:36 +0100
Re: Name of a program Bob Latham <bob@sick-of-spam.invalid> - 2026-04-17 12:08 +0100
Re: Name of a program Harriet Bazley <harriet@bazleyfamily.co.uk> - 2026-04-17 14:12 +0100
Re: Name of a program Tank <webmaster@tankstage.co.uk> - 2026-04-17 15:09 +0100
Re: Name of a program Harriet Bazley <harriet@bazleyfamily.co.uk> - 2026-04-17 19:35 +0100
Re: Name of a program Bob Latham <bob@sick-of-spam.invalid> - 2026-04-17 20:17 +0100
Re: Name of a program Martin <News04@avisoft.f9.co.uk> - 2026-04-17 23:30 +0100
Re: Name of a program Steve Fryatt <news@stevefryatt.org.uk> - 2026-04-18 11:39 +0100
Re: Name of a program Bob Latham <bob@sick-of-spam.invalid> - 2026-04-18 13:55 +0100
csiph-web