Ultimate Amiga

Please login or register.

Login with username, password and session length
Advanced search  
Pages: [1]   Go Down

Author Topic: AMIGA BASIC LOGIN SIMPLE OS SPEAKING  (Read 4968 times)

0 Members and 1 Guest are viewing this topic.

Toolkitman

  • A600
  • *
  • Karma: 0
  • Offline Offline
  • Gender: Male
  • Posts: 81
  • Amiga 1200 raspberry pi Ideator & Creator
AMIGA BASIC LOGIN SIMPLE OS SPEAKING
« on: October 07, 2018, 08:03:22 PM »

Hello There!
I have programmed an AMIGA login interface with 2 simple program! nothing at all but this os can speak instead of write on screen. For example a guide voice.
Logged

Toolkitman

  • A600
  • *
  • Karma: 0
  • Offline Offline
  • Gender: Male
  • Posts: 81
  • Amiga 1200 raspberry pi Ideator & Creator
Re: AMIGA BASIC LOGIN SIMPLE OS SPEAKING
« Reply #1 on: October 07, 2018, 08:47:58 PM »

This is the code:

1 Screen Open 0,320,256,16,Lowres
2 Load Iff"DH1:PROVA/amigac.iff"
3 Ink 2:Paper 8
5 Say "LOADING AMIGA BASIC",0
7 FOR N = 1 TO 5000
8 NEXT N
9 IF N = 5000 THEN GOTO 11
11 Say "MEMORIZE LOGIN":INPUT B$
12 CLS
14 PRINT"":Say "LOGIN"
15 INPUT C$
16 IF B$ = C$ THEN Say "WELCOME TO AMIGA BASIC, START CODING FROM LINE 42"
17 IF B$ <> C$ THEN GOTO 14
18 Say "TYPE L OR L1 TO LOAD, N TO BASIC":INPUT D$
19 IF D$ = "L" THEN Say "HELLO WORLD":GOTO 19
22 IF D$ = "L1" THEN GOTO 37
25 IF D$ = "N" THEN GOTO 41
30 IF D$ < > "L" THEN GOTO 18
35 IF D$ < > "N" THEN GOTO 18
36 IF D$ < > "L1" THEN GOTO 18
37 Say "INSERT NUMBER TO COUNT":INPUT F
38 FOR X = 1 TO F
39 PRINT X
40 NEXT X
41 Say "HELLO FROM AMIGA!!!!
9999 END
Logged

Volvo_0ne

  • A600
  • *
  • Karma: 0
  • Offline Offline
  • Gender: Male
  • Posts: 71
  • A1200 lover
Re: AMIGA BASIC LOGIN SIMPLE OS SPEAKING
« Reply #2 on: October 12, 2018, 09:34:54 PM »

This is the code:

1 Screen Open 0,320,256,16,Lowres
2 Load Iff"DH1:PROVA/amigac.iff"
3 Ink 2:Paper 8
5 Say "LOADING AMIGA BASIC",0
7 FOR N = 1 TO 5000
8 NEXT N
9 IF N = 5000 THEN GOTO 11
11 Say "MEMORIZE LOGIN":INPUT B$
12 CLS
14 PRINT"":Say "LOGIN"
15 INPUT C$
16 IF B$ = C$ THEN Say "WELCOME TO AMIGA BASIC, START CODING FROM LINE 42"
17 IF B$ <> C$ THEN GOTO 14
18 Say "TYPE L OR L1 TO LOAD, N TO BASIC":INPUT D$
19 IF D$ = "L" THEN Say "HELLO WORLD":GOTO 19
22 IF D$ = "L1" THEN GOTO 37
25 IF D$ = "N" THEN GOTO 41
30 IF D$ < > "L" THEN GOTO 18
35 IF D$ < > "N" THEN GOTO 18
36 IF D$ < > "L1" THEN GOTO 18
37 Say "INSERT NUMBER TO COUNT":INPUT F
38 FOR X = 1 TO F
39 PRINT X
40 NEXT X
41 Say "HELLO FROM AMIGA!!!!
9999 END

What the heck is this supposed to do?
It seems like a (poor) attempt at using the "say" command, however it could be optimised in several ways .

If I knew the intended purpose of the routine, I may understand.....
Logged
Transuranic heavy elements may not be used where there is life.

Toolkitman

  • A600
  • *
  • Karma: 0
  • Offline Offline
  • Gender: Male
  • Posts: 81
  • Amiga 1200 raspberry pi Ideator & Creator
Re: AMIGA BASIC LOGIN SIMPLE OS SPEAKING
« Reply #3 on: October 13, 2018, 02:19:56 AM »

Hello, i told dont blame me i'm new at amiga programming!
But leaving apart this it's a LOGIN TO AMIGA BASIC but basic works only inside AMOS otherwise compiled in a bootup floppy disk you go into
AMIGA DOS. The login works in this way, you tape a name or number or code of your imagination and in the next screen you are prompt to enter to the next screen after inserting the previouse name you can wait the time you want to enter the logion so disabling the control c exploit it's a good protection to entering your workbench, in the next screen there are 2 simple program for example starting with L return and L1 return. But programming you can add every program you like. With N you go to Basic but only inside AMOS PRO 2.0 after pressing the exit button.
Logged

Toolkitman

  • A600
  • *
  • Karma: 0
  • Offline Offline
  • Gender: Male
  • Posts: 81
  • Amiga 1200 raspberry pi Ideator & Creator
Re: AMIGA BASIC LOGIN SIMPLE OS SPEAKING
« Reply #4 on: October 13, 2018, 02:21:58 AM »

BSD Licence:

Copyright (c) <2018>, <Matteo Trevisan>
All rights reserved.

Redistribution and use in source and binary forms, with or without
modification, are permitted provided that the following conditions are met:
1. Redistributions of source code must retain the above copyright
   notice, this list of conditions and the following disclaimer.
2. Redistributions in binary form must reproduce the above copyright
   notice, this list of conditions and the following disclaimer in the
   documentation and/or other materials provided with the distribution.
3. All advertising materials mentioning features or use of this software
   must display the following acknowledgement:
   This product includes software developed by the <organization>.
4. Neither the name of the <organization> nor the
   names of its contributors may be used to endorse or promote products
   derived from this software without specific prior written permission.

THIS SOFTWARE IS PROVIDED BY <COPYRIGHT HOLDER> ''AS IS'' AND ANY
EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
DISCLAIMED. IN NO EVENT SHALL <COPYRIGHT HOLDER> BE LIABLE FOR ANY
DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.



Copyright (c) <2018>, <Matteo Trevisan>
Tutti i diritti riservati.

La ridistribuzione e l'uso in forma di codice sorgente e in forma binaria, con o senza modifiche, è consentito
purché siano rispettate le seguenti condizioni:

1. Le ridistribuzioni del codice sorgente devono conservare la nota di copyright sopra riportata, questa lista di condizioni
   e la seguente limitazione di responsabilità.
2. Le ridistribuzioni in forma binarie devono riprodurre la nota di copyright sopra riportata, questa lista di condizioni
   e la seguente limitazione di responsabilità nella documentazione e/o altri materiali forniti con la distribuzione.
3. Ogni materiale pubblicitario che riporti caratteristiche o uso di questo software deve mostrare la seguente attestazione:
   Questo prodotto include software sviluppati dalla <organizzazione>.
4. Né il nome della <organizzazione>, né i nomi dei suoi collaboratori possono essere utilizzati per avallare o promuovere prodotti
   derivati da questo software senza uno specifico permesso scritto.

Questo software è fornito dal <possessore di copyright> "così com'è" e qualsiasi
garanzia espressa o implicita, inclusiva di, ma non limitata a, garanzie implicite
di commerciabilità e idoneità ad uno scopo particolare, viene disconosciuta. In nessun caso il possessore
di copyright sarà ritenuto responsabile per qualsiasi danno diretto, indiretto, connesso, particolare,
esemplare o conseguente (inclusivo di, ma non limitato a, approvvigionamento di beni o servizi alternativi;
perdita di utilità, dati o profitti; interruzione di affari) comunque causati e su qualsiasi ipotesi di
responsabilità, come da contratto, responsabilità oggettiva, o torto (compresa negligenza o altro)
derivante in qualsiasi modo dall'utilizzo di questo software anche se al corrente della possibilità di tale danno

                ,        ,         
               /(        )`       
               \ \___   / |       
               /- _  `-/  '       
              (/\/ \ \   /\       
              / /   | `    \       
              O O   ) /    |       
              `-^--'`<     '       
             (_.)  _  )   /       
              `.___/`    /         
                `-----' /         
   <----.     __ / __   \         
   <----|====O)))==) \) /====|     
   <----'    `--' `.__,' \         
                |        |         
                 \       /       /\
            ______( (_  / \______/
          ,'  ,-----'   |         
          `--{__________)         
Logged

Toolkitman

  • A600
  • *
  • Karma: 0
  • Offline Offline
  • Gender: Male
  • Posts: 81
  • Amiga 1200 raspberry pi Ideator & Creator
Re: AMIGA BASIC LOGIN SIMPLE OS SPEAKING
« Reply #5 on: October 13, 2018, 02:35:28 AM »

If you go to the AMOS FACTORY-PROGRAMS SUBMISION forum section you can find a bootable adf floppy i have compiled with AMIGA BASIC LOGIN program, you can modify the code but you have to tell my name about this program, it's under BSD.
Logged

Volvo_0ne

  • A600
  • *
  • Karma: 0
  • Offline Offline
  • Gender: Male
  • Posts: 71
  • A1200 lover
Re: AMIGA BASIC LOGIN SIMPLE OS SPEAKING
« Reply #6 on: October 14, 2018, 09:44:13 PM »

If you go to the AMOS FACTORY-PROGRAMS SUBMISION forum section you can find a bootable adf floppy i have compiled with AMIGA BASIC LOGIN program, you can modify the code but you have to tell my name about this program, it's under BSD.

So, it loads AMOS from AMIGA BASIC from a floppy disk, and announces what it is doing with the "say" command & narrator.device

I'm confused.
Logged
Transuranic heavy elements may not be used where there is life.

Toolkitman

  • A600
  • *
  • Karma: 0
  • Offline Offline
  • Gender: Male
  • Posts: 81
  • Amiga 1200 raspberry pi Ideator & Creator
Re: AMIGA BASIC LOGIN SIMPLE OS SPEAKING
« Reply #7 on: October 15, 2018, 05:42:38 AM »

Yes you are confused!  ;)
This is an interface that give an access with a login choose by you everytime, and after entering the login there are 2 programs loading with L or L1 return (the program can be added or changed by programming) and N transport you to BASIC if you are inside the AMOS PRO 2.0 (not compiling the program) if the program is compiled you go inside DOS. Try the floppy!!! do you have an emulator with rom 1.3 or 3.1?
Logged
Pages: [1]   Go Up
 

TinyPortal 2.2.2 © 2005-2022