Da ich nicht so bewandert mit dem POLYVECTOR Befehl bin,
suche ich jemanden der die untere Funktion vervollständigt ?
Es soll ein Sprite an X,Y in irgendeiner Farbe unverfälscht angezeigt werden.
FUNCTION Paint(Sprite, x, y, farbe)
STARTPOLY Sprite
POLYVECTOR ...
ENDPOLY
ENDFUNCTION
Mach ich einen moment bitte!
EDIT:
Siehe Anhang!
//spr_id = Sprite ID vom Laden des Sprites
//x,y = die Position. Ausgangspunkt ist hier normal die linke obere Ecke
//sx,sy = spritegröße X und spritegröße Y
//color = Farbe
//alpha = der alphawert des Sprites, ich benutze hier ein PNG mit Alphaindex um diesen zu aktivieren,
// muss man einen alpha von 0.99(.99) eingeben!
FUNCTION Paint: spr_id, x, y, sx, sy, color, alpha
ALPHAMODE alpha // setze Alphamode
STARTPOLY spr_id
POLYVECTOR x, y, 0,0, color
POLYVECTOR x, y+sy, 0,sy, color
POLYVECTOR x+sx, y+sy, sx,sy, color
POLYVECTOR x+sx, y, sx,0, color
ENDPOLY
ALPHAMODE 0 // setze Alphamode zurück!
ENDFUNCTION
[attachment deleted by admin]
Danke, das klappt vorzüglich.