LEZIONE 4:

Le Stringhe

In AMOS sono permesse numerose operazioni con le stringhe, qui di seguito riportate. In particolare si può sottrarre una determinata sequenza di caratteri di una stringa, o tutte le sue ricorrenze; ad esempio se voglio sottrarre alla stringa A$ tutte le lettere "a" si immetterà: A$=A$-a; se voglio invece eliminare tutte le ricorrenze della lettera iniziale della stringa A$ si immetterà: A$=A$-Mid$(A$,1,1); ecc.
Segue l'elenco dei comandi per la completa gestione delle strnghe.

=Asc(A$)
Ritorna il codice ascii internazionale del proprio carattere della stringa A$.

At(x,y)
Codice di controllo simile a Locate, che appartiene alla stringa; se la x o la y non sono specificate, sarà considerata la colonna o riga corrente.
Si può utilizzare omettendo uno dei due valori che per default verrà considerato 0.

Es.: Print AT(10,10);"Prova"

Questo posizionerà il cursore alla decima colonna e decima riga inerenti alle coordinate di testo e lì stamperà la stringa. Ricordiamo che le colonne partono da sinistra verso destra e le rige dall'alto verso il basso.

Border$(A$,n)
Codice di controllo che circonda la stringa A$ con un box avente caratteristiche che cambiano in base al valore che noi attribuiamo ad n.

Es.: Print Border$("Prova",1)

L'esempio stamperà la stringa circondata da una cornice avente angoli smussati. n può variare da 1 a 15.

Centre A$
Centra la stringa A$ o Str$(a) nella riga attuale (da usare assieme ai comandi At(x,y) e Border$(a$)).

Es.: Centre At(,10)+Border$("AMOS",1)

L'esempio stamperà la stringa al centro della riga 10 e circondata da un box rettangolare.

=Chr$(n)
Ritorna il carattere ascii di n. Utile per il riconoscimento del tasto premuto.

Es.:

Repeat
     Print"Fermami premendo lo spazio!"
     A$=INKEY$ : C=Chr$(A$)
Until C=32

Ogni tasto è contrassegnato da un codice Ascii. In questo caso l'esempio utilizza il tasto "Barra Spazio" che ha come codice Ascii il numero 32.
Ricordiamo che il manuale di Amiga fornisce una tabella completa dove sono indicati i tali codici in corrispondenza al tasto della tastiera.

=Flip$(n$)
Inverte l'ordine dei caratteri della stringa n$

Es.: Print Flip$("SOMA")

L'esempio stamperà "AMOS"

=Instr(D$,S$,[,p])
Ritorna la posizione della prima ricorrenza S$ nella stringa D$ e con p (che comunque è opzionale) è possibile stabilire la posizione iniziale di ricerca. Utile per cercare le estensioni nei nomi dei file.

Es.: f$="manuale" : Print f$ : If Instr(f$,".doc",1)=0 Then f$=f$+".doc" : Print F$

L'esempio ricerca dentro f$ la parola ".doc", e se non la trova la aggiungerà.

=Left$(A$,n)
Ritorna gli n caratteri all'estrema sinistra della stringa A$.

Es.: Print Left$("AMOS",2)

L'esempio stamperà "AM" cioè i primi due caratteri partendo da sinistra nella stringa "AMOS"

=Len(A$)
Ritorna il numero totale dei caratteri che compongono le stringa A$, spazi compresi.

Locate x,y
Posiziona il cursore alla colonna x ed alla riga y. Simile al comando At, ma non necessita del comando Print. Si può utilizzare omettendo uno dei due valori che per default verrà considerato 0.

=Lower$(A$)
Trasforma in minuscolo i caratteri della stringa A$.

Es.: Print Lower$("CIao")

L'esempio stamperà "ciao".

Match(A$/A/A#(0),N$,N,N#)
Ricerca l'array alfabetico A$, numerico A, numerico reale A# rispettivamente: la stringa N$, il numero N, il numero reale N# e, in caso positivo, ne ritorna la posizione (espressa in caratteri)

Es.:

Dim A$(3)

A$(0)="Sergio"
A$(1)="Davide"
A$(2)="Adriano"
A$(3)="Paolo"

A=Match(A$(0),"Davide") : Print A , A$(A)

L'esempio effettuerà la ricerca della parola "Davide" nell'array dimensionato. E come risultato ritornerà il numero della variabile contenente la parola ricercata. ATTENZIONE! Nella stringa di sintassi del comando Match nella variabile di array, che nel nostro caso è A$(n), è imperativo usare sempre lo zero tra le parentesi, altrimenti potranno verificarsi errori. L'argomento Array che risulta essere abbastanza complesso verrà spiegato nelle prossime lezioni.

=Mid$(A$,p,n)
Ritorna gli n caratteri della stringa A$ a partire dalla posizione (carattere) p.

Es.: Print Mid$("Alberto",2,3)

Stampa "lbe"

=Right$(A$,n)
Ritorna gli n caratteri all'estrema destra della stringa A$.

Es.: Print Right$("Alberto",3)

Stampa "rto"

Sort a/a#/a$(0)
Ordina in senso ascendente gli elementi dell'array numerico a, numerico reale a# o alafabetico a$.

=Space$(n)
Ritorna una stringa di n spazi (equivalenti al carattere ascii CHR$(32)).

=String$(A$,n)
Ritorna n volte il primo carattere della stringa A$ (si può usare anche con il comando Chr$).

Es.: "Albert"+STRING("o",1)

Stampa "Alberto"

=Str$(num)
Converte una variabile numerica in una di tipo alfanumerica.

=Upper$(A$)
Trasforma in maiuscolo i caratteri muniscoli contenuti in A$. Esatto opposto del comando Lower$

=Val(A$)
Converte una variabile alfanumerica in una variabile letterale. Ovviamente la variabile da trasformare deve contenere un numero, se contenesse lettere o lettere a numeri, la funzione ritornerà 0.

Bene! La quarta lezione è terminata (pant, pant :-P), nella prossima finalmente parleremo della grafica.

[Index]    [3° Lezione]    [5° Lezione]