XMap - Kartta lisäominaisuuksilla

Oletko tehnyt jotain, mistä muut voisivat hyötyä. Postita vinkit tänne.
Post Reply
User avatar
Cérebro
Newcomer
Posts: 35
Joined: Wed Jul 16, 2008 8:56 pm

XMap - Kartta lisäominaisuuksilla

Post by Cérebro » Sat Nov 01, 2008 9:37 pm

XMap (extended map) on karttasysteemi sivultakuvatuille vieriville peleille (Side-scrolling).
Sisältää tällä hetkellä kartan vierittämisen ja kartan tuhoamisen.
Koodista löytyy aika varmasti omituisuuksia ja bugeja, ilmoitelkaa niistä.
Tähän olisi tarkoitus laittaa myös törmäystunnistus (jota en jaksanut/osannut laittaa vielä).

Kuva:
Image

Example (paketissa mukana):

Code: Select all

SCREEN 500, 400
FrameLimit 40
Include "XMap.cb" // Sisällytetään XMap.cb lähdekoodiin

XMap = XMap_Create(LoadImage("Map.png"), cbMagenta) // Luodaan kartta kuvasta Map.png, läpinäkyvä väri cbMagenta
Back = MakeImage(1000, 400) // Luodaan tausta
DrawToImage Back
    Color cbLightBlue
    Box 0, 0, 1000, 400
DrawToScreen
XMap_AssignBack(XMap, Back) // Kiinnitetään tausta karttaan

Color 0, 0, 0
AddText "Vieritä vasemmalla ja oikealla nuolinäppäimellä"
AddText "Hiiren vasen tuhoaa karttaa"
Repeat
    If LeftKey() Then XMap_Scroll(XMap, -10, 0) // Vieritetään vasemmalle
    If RightKey() Then XMap_Scroll(XMap, 10, 0) // Vieritetään oikealle
    // Tuhotaan karttaa
    If MouseDown(1) Then XMap_Destruct(XMap, XMap_X#(XMap, MouseX() - 5), XMap_Y#(XMap, MouseY() - 5), 10, 10, 10)
    XMap_Draw(XMap) // Piirretään kartta
    DrawScreen
Until EscapeKey()

XMap_Delete(XMap) // Poistetaan kartta muistista
Viesti on kirjoitettu melko väsyneenä, joten kirjoitusvirheitä sun muuta saattaa löytyä.

Latauslinkki:
http://koti.mbnet.fi/cerebro/XMap.zip
cbLib | XMap
In development: EasyBasic - Basic-tyylinen peliohjelmointikieli

User avatar
MAVmaggot
Advanced Member
Posts: 468
Joined: Fri Aug 31, 2007 10:18 pm
Location: bitspace

Re: XMap - Kartta lisäominaisuuksilla

Post by MAVmaggot » Tue Nov 04, 2008 7:25 pm

Hienoa työtä :) Näytti toimivan todella nopeasti sekä funktiot olivat helppo käyttöisiä. ;) Toivottavasti saat pian laitettua uutta versiota jossa olisi jo törmäystunnistus.

Post Reply