super1x

1-apertura,chiusura,spostamento con finestre e cartelle
2-alterna visualizzazione messaggi,campi ,grafici
3-richiesta dati,assegnazione valore a variabile
4-iterazioni con REPEAT    ;IF THEN ELSE
5-richiesta,stampa dati,attesa
6-assegna valore a variabile- istruzioni per grafica -ON MOUSEDOWN ....istruzioni....END MOUSEDOWN
7-sintassi funzioni varie 

1-apertura,chiusura,spostamento con finestre e cartelle
on mousedown
  	visual effect iris open (close) slow (fast)
	visual effect wipe down (up,left,right) slow (fast)
	visual effect scroll down (up,left,right) slow (fast)
	visual effect venetian blinds slow (fast)
end mousedown
on mousedown
	go to next (prev,last,first) cd (wd)  (cambia card,finestra)
end mousedown
on mousedown
	go to cd codice (wd codice)	(passa a cd,wd indicata)
end mousedown
on opencard
	comandi 
end opencard
on openwindow
	comandi
end openwindow
on mousedown
	close wd
	close all wd
end mousedown
on mousedown
	close cd
end mousedown
on mousedown
	open cd codice  (wd codice)
	close cd codice (wd codice)
end mousedown
on mouseleave.
	comandi(attivo quando mouse abbandona oggetto)
end  mouseleave
on mouseenter
	comandi (attivo quando mouse posto sopra oggetto)
end mouseenter
on mousewithin
	comandi (attivo con mouse fermo su oggetto)
end mousewithin
on mousestilldown
	comandi (attivo fincheÕ mouse resta premuto)
end mousestilldown
on mouseup
	comandi (attivo quando mouse viene sollevato)
end mouseup


2-alterna visualizzazione messaggi,campi ,grafici
on mousedown
 if (visible of msg) then set visible of msg to false
    else
      set visible of msg to true
 end if
end mousedown
on mousedown
 if (visible of cd fld"campo") then set visible of cd fld"campo" to false
    else
      set visible of cd fld"campo" to true
 end if
end mousedown
on mousedown
 if (visible of grc"grafo") then set visible of grc"grafo" to false
    else
      set visible of grc"grafo" to true
 end if
end mousedown
on mousedown
	set visible of cd fld"campo" to true (to false)
	set visible of grc"grafo" to true (to false)
	set visible of msg to true (to false)
	set visible of btn to true (to false)
end mousedown


3-richiesta dati,assegnazione valore a variabile
on mousedown
	ask "testo per richiesta"
	put it into nomevariabile
end mousedown
on mousedown
	put dato into variabile    (put 5 into x) (put "stringa" into x)
end mousedown
on mousedown
	put dato into variabile
	put variabile into cd fld"nomecampo"
end mousedown
on mousedown
	put "a1 a2 a3 a4 a5" into vettore
	put word numero of vettore into cd fld"campo"
end mousedown
on mousedown
	put "a1,a2,a3,a4,A5" into vettore
	put item numero of vettore into cd fld"campo"
end mousedown
on mousedown
	put "abcde" into vettore
	put char numero of vettore into cd fld"campo"
end mousedown
on mousedown
	put "1 2 3 4 5" into vettore
	put word numero of vettore into cd fld"campo"
end mousedown
on mousedown
	put "1,2,3,4,5" into vettore
	put item numero of vettore into cd fld"campo"
end mousedown
on mousedown
	put "12345" into vettore
	put char numero of vettore into cd fld"campo"
end mousedown


4-iterazioni con REPEAT    ;IF THEN ELSE
repeat for n times		(n=numero iteazioni)
  	comandi
end repeat
repeat with a=1 to n		(n=numero iterazioni)
	comandi
end repeat
repeat until it>massimo	(put massimo into it)
	comandi
end repeat
repeat while it>minimo		(put minimo into it)
	comandi
end repeat
repeat with a=1 to n
	comandi
	if k=limite then exit
end repeat
repeat with a=5 down to 1
	ciclo discendente
end repeat
repeat with a=1 to 5
	ciclo ascendente
end repeat
if condizione_vera then azione1  (if v1=v2 ...)
    else azione2
end if
if condizione_vera then azione    (if v1=v2...)
if true then azione1 else azione2 end if
if false then azione1 else azione2 end if
if false then azione1 else azione2
if true then azione3 end if


5-richiesta,stampa dati,attesa
ask "testo richiesta"
ask numero
answer "stampa messaggio tra virgolette"
answer it
answer testo_unito
answer parolaunica
put it
put messaggio
put testo_unito
put "testo tra virgolette"
put numero into cd fld"campo"
put "testo" into cd fld"campo"
wait numero_secondi