;
;        ____     ___        ___     ___ ___ ___ ___ ____      ___ ___ ___
;         /  /__//_         /__ /  //_ //__ /  //_    /  / / //_ //__//_  
;        /  /  //__        ___//__//__/___//__//     /  /_/_//  //  \/__  
;
;-----------------------------------------------------------------------------
;   - FOR ABO'S CONTACT US AT:   BP:28 1170 WATERMAEL-BOITSFORT 1 BELGIUM!!...
;
;-----------------------------------------------------------------------------
;                           - DON'T SEND ANY DISKS -
;
;-----------------------------------------------------------------------------
;
;
;
;                       THE LEGENDARY >> SUBSOFTWARE << IN 87/88/89/90/91!!...
;                       ------------------------------------------------------
;


;-----------------------------------------------------------------------
; Exemple de source d'un Vector-balls
;-----------------------------------------------------------------------
; Vector-balls normal (Amiga)
;-----------------------------------------------------------------------
;(Format Seka)
;
; Génération de l'objet
;
;a (return)
;wi (return)
;nom de l'objet (return)
;start (return)
;end (return)
;------------------------------------------------------------------------

start:
dc.l    "BALL"                            ; Type de l'objet

ballsObj1:
dc.l ballPoints-ballsObj1                 ; offset de structure de points
dc.l ballArt-ballsObj1                    ; offset de structure de balles
dc.w 650                                  ; zoom = 650
dc.w 0,$500,$710,$930,$a50,$d90,$fd0
dc.w $000,$5,$6,$118,$33a,$55b,$88c,$ccd
dc.w $fff                                 ; 16 couleurs
dc.l 0                                    ; pas d'initialisation
dc.l 0                                    ; pas de routine

ballArt:                                  ; Structure des balles
blk.w 24,6
blk.w 24,26

ballPoints:                               ; structure des points
dc.w 48                                   ; Nombre de balles
DC.W 000, 000, 000                        ; Coordonnées (x/y/z)
DC.W 015,-015, 000
DC.W 045,-045, 000
DC.W 030,-030, 000
DC.W 060,-060, 000
DC.W -015, 015, 000
DC.W -030, 030, 000
DC.W -045, 045, 000
DC.W -060, 060, 000
DC.W -075, 045, 000
DC.W -090, 030, 000
DC.W -105, 015, 000
DC.W 075,-060, 015
DC.W 060,-045, 015
DC.W 045,-030, 015
DC.W 030,-015, 015
DC.W 015, 000, 015
DC.W 000, 015, 015
DC.W -015, 030, 015
DC.W -030, 045, 015
DC.W -045, 060, 015
DC.W -060, 045, 015
DC.W -075, 030, 015
DC.W -090, 015, 015
DC.W -075, 015, 030
DC.W -060, 030, 030
DC.W -045, 045, 030
DC.W -030, 060, 030
DC.W -015, 045, 030
DC.W 000, 030, 030
DC.W 015, 015, 030
DC.W 030, 000, 030
DC.W 045,-015, 030
DC.W 060,-030, 030
DC.W 075,-045, 030
DC.W 090,-060, 030
DC.W -060, 015, 045
DC.W -045, 030, 045
DC.W -030, 045, 045
DC.W -015, 060, 045
DC.W 000, 045, 045
DC.W 015, 030, 045
DC.W 030, 015, 045
DC.W 045, 000, 045
DC.W 060,-015, 045
DC.W 075,-030, 045
DC.W 090,-045, 045
DC.W 105,-060, 045

end: