Meta :: Widget :: GTK :: Sprite Meta :: Widget :: GTK :: Sprite is een Perl-module om C64-stijlsprieten te doen.
Download nu

Meta :: Widget :: GTK :: Sprite Rangschikking & Samenvatting

Meta :: Widget :: GTK :: Sprite Tags

widget Perl-module Meta GTK sprite

Meta :: Widget :: GTK :: Sprite Beschrijving

Meta :: Widget :: GTK :: Sprite is een Perl-module om C64-stijlsprieten te doen. Meta :: Widget :: GTK :: Sprite is een Perl-module om C64-stijl Sprites te doen. Synopsis Gebruik GTK; gebruik kabouter; init gnome "test.pl"; Gebruik META :: WIDGET :: GTK :: Sprite; mijn $ MW = nieuw GTK :: Window ("Toplevel"); mijn ($ canvas) = GNOME :: canvas-> nieuw (); $ mw-> voeg ($ canvas) toe; $ canvas-> show; mijn $ kruid = $ canvas-> root; Mijn $ Sprites = Nieuwe Meta :: Widget :: GTK :: Sprite ($ CROOTT); Mijn $ P1 = $ Sprites-> Maken ("./ Player1.xpm", 100, 0); $ Sprites-> Slide_to_Time ($ P1.5000, 100, 100); Mijn $ P2 = $ Sprites-> Maken ("./ Player2.xpm", 0, 0); $ Sprites-> Slide_to_Speed ($ P2,10, 100, 100); $ Sprites-> Set_collision_Handler (BANG); $ mw-> show; Gtk-> main; subbang {print "bang! n"; Uitgang; } Sprite is een module om de simpele grafische programmering van de C64 (hopelijk zonder de toeterscomponent) terug te brengen. Je kunt foto's declareren om 'sprites' op het canvas te zijn en ze vervolgens rond te verplaatsen en ze in elkaar in elkaar te brengen. Notethe canvas is het GNOME :: Canvas-object. Je moet een GTK :: Canvas-object hebben voordat Sprite.methodsnew Meta :: Widget :: GTK :: Sprite ($ canvas_root); de nieuwe methode neemt één argument, het canvaswortelobject voor het canvas dat u wilt tekenen. U kunt de canvaswortel van uw canvas zo verkrijgen: mijn $ CROOTT = $ canvas-> root; $ SPRITE_NUMMER = $ SPRITES-> CREATE ("/ PACE / FILESAME", 10, 20); CREATE ZAL EEN AFBEELDING LADEN Bestand (op dit moment, alleen XPM-formaat) van schijf en maak er een sprite uit. De twee nummers zijn de X- en Y-positie op het canvas. $ Sprites-> Show ($ Sprite_Number); maakt de sprite verschijnt op het canvas $ Sprites-> Huid ($ Sprite_Number); Maak de Sprite-foto uit het canvas. Merk op dat het nog steeds kan botsen met andere sprites. Als je niet wilt om alles te raken, verplaats je het uit de weg of negeert u deze in uw eigen botsingshandler. $ Sprites-> Vernietig ($ Sprite_Number); volledig vernietigt een sprite. $ Sprites-> Move_to ($ Sprited_Nummer 10, 20); Teleporteert de sprite genoemd in $ SPRITE_NUMMER naar de positie die onmiddellijk wordt gegeven. Contrast SLIDE_TO_XXX-functies. $ Sprites-> Slide_to_Time ($ SPRITE_NUMMER, $ TIJD, 10, 20); Zal de Sprite $ Sprite_Number 'Slide' over het canvas naar de positie 10, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, DUITSLUCHT, MAAK, DIAVE DIENT DIEND DIENT DIENT DOEN. Langzame snelheden verschijnen jerky. $ Sprites-> Slide_to_Speed ($ Sprite_Number, $ SPRESS, 10, 20); zal de Sprite $ Sprite_Number naar de positie 10, 20. zullen schuiven 10, 20. Het zal met een snelheid van $ SPEED PIXELS per seconde bewegen . $ Sprites-> POS ($ SPRITE_NUMMER); Retourneert de X- en Y-coördinaten van $ SPRITE_NUMMER $ SPRITES-> VELOCITEIT ($ SPRITE_NUMMER, 5, 6); Stelt de snelheid van $ Sprite_Number in. De getallen zijn de x- en y-snelheden. Negatieve getallen zal de sprite achteruit gaan maken $ sprites-> set_collision_handler (collision_handler). Naam een functie die wordt aangeroepen wanneer twee sprites met elkaar botsen. Merk op dat de collision detection systeem is zeer crappy op dit moment. Het blijkt dat het heel moeilijk is om efficiënt te detecteren collisions.Your functie wordt genoemd als volgt: collision_handler ($ sprite_number, $ sprite_number), waar de twee sprite nummers zijn de twee sprites die botsten. Meerdere sprites botsende zullen veel botsing handler callbacks.Note goed dat als je de botsing handler ingesteld Sprite.pm zal elke sprite te controleren op botsingen elke animatie lus veroorzaken. Ik heb dit niet geoptimaliseerd, zodat je een enorme vertraging zal merken als u meer sprites.To switch botsingen afchecken toe te voegen, stelt de handler aan undef: $ sprites-> set_collision_handler (undef); Vereisten: · Perl

Meta :: Widget :: GTK :: Sprite Gerelateerde software