AMOS Professional fournit plusieurs methodes pour deplacer les Bobs, et chaque Bob peut afficher une sequence d images differentes pour creer une animation. Lorsqu on anime les Bobs avec AMAL, il est possible de perdre de vue l image actuellement affichee. La fonction suivante est donc fournie pour resoudre ce probleme.
I BOB
fonction : obtenir le numero de l image utilisee par un Bob
image = I Bob(numero)
I BOB retourne le numero de l image actuellement assignee au Bob specifie. Si le numero de Bob que vous voulez examiner n existe pas, une erreur de fonction illegale sera retournee. Il est donc essentiel de definir le Bob correctement avant d utiliser I BOB. Exemple :
E> Load "AMOSPro Tutorial:Objects/Bobs.abk"
Flash Off : Get Bob Palette : Double Buffer : Autoback 0
Bob 1,160,100,1 : Rem Affiche le Bob 1 au centre de l ecran
Do
For IMAGE=1 To Length(1) : Rem Cree une animation simple
Rem Deplace le Bob 1 avec la souris
Bob 1,X Screen(X Mouse),Y Screen(Y Mouse),IMAGE
For W=0 To 3 : Wait Vbl : Next W
Rem Affiche le numero de l image a l ecran
Locate 0,0 : Print "Image ";I Bob(1);" ";
Next IMAGE
Loop
GET BOB PALETTE
instruction : charger les couleurs d image dans l ecran courant
Get Bob Palette
Get Bob Palette masque
Cette commande charge toute la palette de couleurs utilisee par vos Bobs dans l ecran courant. Un masque peut etre ajoute pour ne charger qu une selection de ces couleurs. Chaque couleur individuelle est representee par un "bit" du masque mis a zero (off) ou a un (on). Les couleurs vont de droite a gauche, donc la couleur zero correspond au bit le plus a droite du masque, la couleur 1 est le bit juste a gauche, et ainsi de suite. Supposons qu il y ait 16 couleurs dans votre palette, vous pourriez copier les 4 premieres couleurs comme ceci :
X> Get Bob Palette %0000000000001111
Suppression du masque des Bobs
NO MASK
instruction : supprimer le masque de la couleur zero pour un Bob
No Mask numero