Autore Topic: Aggiunta di routine per lancio di schermate introduttive a tempo in un prg Basic  (Letto 8912 volte)

Kick Off

  • Utente
  • **
  • Post: 125
  • Gioco Preferito: Black Tiger, Buggy Boy, MondialSoccer, TurricanI e II
Saluti a tutta la comunità di Ready64 e del suo forum.

Dunque, come beninteso nel titolo ho una piccola idea che vorrei realizzare giusto per diletto, e spero di trovare qualcuno ben disposto ad aiutarmi, sò che l'impresa perlo più sarà ardua benchè siano passati molti anni.

L'idea è questa, vorrei creare una o più routine da inserire in un programma in Basic, oppure scrivere le routine e l'intero programma (già realizzato in Basic), in linguaggio L.M.(linguaggio macchina), lo scopo di questa/e routine è di garantirmi la succesione di schermate "temporizzate".

Nella prima deve apparire la sequenza dei titoli del programma, l'autore, l'anno di pubblicazione/creazione.

Nella successiva schermata deve apparire il messaggio:

"press key return to begin" oppure "press key return to continue"

Sè l'utente ha premuto il tasto richiesto, (in questo caso il return), vorrei che passasse alla schermata del menù a scelta del programma.

Da notare che la schermata del menù a scelta è da me già scritto in basic all'interno del programma.

(entrambe le schermate a video, possono essere scritte in inglese o italiano per me è indifferente. Purchè atte allo scopo.)

Vi ricordo ancora che il programma in questione con il menù a scelta, la grafica e il suo contenuto sono stati da me già scritti in Basic semplice senza loader gira perfettamente su un C64 reale, ma mi manca la parte appunto che vi ho appena descritto.
Spero vivamente che abbiate tutti compreso e vi ringrazio da subito per gli aiuti, e le dritte che eventualmente mi fornirete.

Eh scusatemi per la richiesta un pò stupida credo.
Kick Off

Flavioweb

  • Redazione
  • Utente
  • ****
  • Post: 58
    • http://www.flavioweb.it
  • Gioco Preferito: Maniac Mansion
Il metodo più semplice per farlo è questo:
Codice: [Seleziona]
10 print "premi return"
20 get a$: if a$<>chr$(13) then goto 20
30 print "aspetta un attimo..."
40 for i=1 to 1500:next i
50 goto 10

La linea 20 aspetta la pressione del tasto RETURN (codice PETSCII 13), mentre la linea 40 attende circa 3 secondi.
Col Cbm64, all' incirca, un ciclo FOR...NEXT di 500 iterazioni "a vuoto" impiega 1 secondo per essere portato a termine, quindi il valore 1500 crea un' "attesa" di, più o meno, 3 secondi.

Kick Off

  • Utente
  • **
  • Post: 125
  • Gioco Preferito: Black Tiger, Buggy Boy, MondialSoccer, TurricanI e II
Il metodo più semplice per farlo è questo:
Codice: [Seleziona]
10 print "premi return"
20 get a$: if a$<>chr$(13) then goto 20
30 print "aspetta un attimo..."
40 for i=1 to 1500:next i
50 goto 10

La linea 20 aspetta la pressione del tasto RETURN (codice PETSCII 13), mentre la linea 40 attende circa 3 secondi.
Col Cbm64, all' incirca, un ciclo FOR...NEXT di 500 iterazioni "a vuoto" impiega 1 secondo per essere portato a termine, quindi il valore 1500 crea un' "attesa" di, più o meno, 3 secondi.

Interessante....per rendere meglio l'idea vorrei postare alcune immagini del programma sè mi consentite a farlo.

[allegato eliminato da un amministratore]
Kick Off

Kick Off

  • Utente
  • **
  • Post: 125
  • Gioco Preferito: Black Tiger, Buggy Boy, MondialSoccer, TurricanI e II
seconda immagine

[allegato eliminato da un amministratore]
Kick Off

Kick Off

  • Utente
  • **
  • Post: 125
  • Gioco Preferito: Black Tiger, Buggy Boy, MondialSoccer, TurricanI e II
tre

[allegato eliminato da un amministratore]
Kick Off

Kick Off

  • Utente
  • **
  • Post: 125
  • Gioco Preferito: Black Tiger, Buggy Boy, MondialSoccer, TurricanI e II
quattro

[allegato eliminato da un amministratore]
Kick Off

Kick Off

  • Utente
  • **
  • Post: 125
  • Gioco Preferito: Black Tiger, Buggy Boy, MondialSoccer, TurricanI e II
Ora le schermate del prog. in basic senza nessuna modifica.

[allegato eliminato da un amministratore]
Kick Off

Kick Off

  • Utente
  • **
  • Post: 125
  • Gioco Preferito: Black Tiger, Buggy Boy, MondialSoccer, TurricanI e II
fine.
Faccio notare che le prime quattro foto riguardano il listato basic senza modifiche.
Mentre queste due ultime sono la sua eseguzione.

[allegato eliminato da un amministratore]
« Ultima modifica: 06 Dicembre 2016, 17:26:51 da Kick Off »
Kick Off

Kick Off

  • Utente
  • **
  • Post: 125
  • Gioco Preferito: Black Tiger, Buggy Boy, MondialSoccer, TurricanI e II
Ora vorrei illustrarvi invece un'esempio di programma grafico preso dal volume:
 "La Grande guida del Programmatore"  Editore Jackson. Scritto da Rita Bonelli



[allegato eliminato da un amministratore]
Kick Off

Kick Off

  • Utente
  • **
  • Post: 125
  • Gioco Preferito: Black Tiger, Buggy Boy, MondialSoccer, TurricanI e II
2

[allegato eliminato da un amministratore]
Kick Off

Kick Off

  • Utente
  • **
  • Post: 125
  • Gioco Preferito: Black Tiger, Buggy Boy, MondialSoccer, TurricanI e II
Questo programma fà lo scroll orizzontale come si può vedere in foto:

[allegato eliminato da un amministratore]
Kick Off

Kick Off

  • Utente
  • **
  • Post: 125
  • Gioco Preferito: Black Tiger, Buggy Boy, MondialSoccer, TurricanI e II
ecco lo scroll in foto è fermo (perchè non si può allegare video sigh.)

[allegato eliminato da un amministratore]
Kick Off

Kick Off

  • Utente
  • **
  • Post: 125
  • Gioco Preferito: Black Tiger, Buggy Boy, MondialSoccer, TurricanI e II
Con una blanda modifica

[allegato eliminato da un amministratore]
Kick Off

Kick Off

  • Utente
  • **
  • Post: 125
  • Gioco Preferito: Black Tiger, Buggy Boy, MondialSoccer, TurricanI e II
seconda foto del listato

[allegato eliminato da un amministratore]
Kick Off

Kick Off

  • Utente
  • **
  • Post: 125
  • Gioco Preferito: Black Tiger, Buggy Boy, MondialSoccer, TurricanI e II
ottengo questo....

[allegato eliminato da un amministratore]
Kick Off