iHero Posted January 29, 2012 Author Share Posted January 29, 2012 **Beginning**First download the following file in your \data files\graphics named minimap and see if the file is saved in bmp.![](http://img52.imageshack.us/img52/9902/minimaph.png)[http://www.mediafire…fh6oh4t5gj1j023](http://www.mediafire.com/?fh6oh4t5gj1j023)What exists on the minimap?* White icon when there's nothing on the map.* Icon that shows the players that are present on the map.* Icon that shows NPCs that are on the map.* Icon showing map of blocks.* Icon for different players killers.* Icon that shows the teleportation of the map.* Icon that shows the items from the map.* Icon that shows the map and shops by attribute and by being NPC.* Different icon for each type of NPC.**Screenshot**![](http://img717.imageshack.us/img717/149/minimapn.png)**Client~side**> modDirectDraw7Find:``` ' Render the barsBltBars```Below add:``` ' minimapIf Options.Minimap = 1 Then BltMiniMap```Find:```Public DDS_Bars As DirectDrawSurface7```Below add:```Public DDS_MiniMap As DirectDrawSurface7```Find:```Public DDSD_Bars As DDSURFACEDESC2```Below add:```Public DDSD_MiniMap As DDSURFACEDESC2```Find:``` If FileExist(App.Path & "\data files\graphics\bars.bmp", True) Then Call InitDDSurf("bars", DDSD_Bars, DDS_Bars)```Below add:``` If FileExist(App.Path & "\data files\graphics\minimap.bmp", True) Then Call InitDDSurf("minimap", DDSD_MiniMap, DDS_MiniMap)```Find:``` Set DDS_Target = NothingZeroMemory ByVal VarPtr(DDSD_Target), LenB(DDSD_Target)```Below add:``` Set DDS_MiniMap = NothingZeroMemory ByVal VarPtr(DDSD_MiniMap), LenB(DDSD_MiniMap)```At the end of the module add:```Sub BltMiniMap()Dim i As LongDim x As Integer, Y As IntegerDim CameraX As Long, CameraY As LongDim BlockRect As RECT, WarpRect As RECT, ItemRect As RECT, ShopRect As RECT, NpcOtherRect As RECT, PlayerRect As RECT, PlayerPkRect As RECT, NpcAttackerRect As RECT, NpcShopRect As RECT, BlankRect As RECTDim MapX As Long, MapY As Long' If debug mode, handle error then exit outIf Options.Debug = 1 Then On Error GoTo errorhandler' Map sizeMapX = Map.MaxXMapY = Map.MaxY' ****************' ** Rectangles **' ****************' BlankWith BlankRect.top = 4.Bottom = .top + 4.Left = 0.Right = .Left + 4End With' Player - NormWith PlayerRect.top = 0.Bottom = .top + 4.Left = 4.Right = .Left + 4End With' Player - PKWith PlayerPkRect.top = 0.Bottom = .top + 4.Left = 8.Right = .Left + 4End With' NPC - Attack when attackedWith NpcAttackerRect.top = 0.Bottom = .top + 4.Left = 12.Right = .Left + 4End With' NPC - ShopkeeperWith NpcShopRect.top = 0.Bottom = .top + 4.Left = 16.Right = .Left + 4End With' NPC - OthersWith NpcOtherRect.top = 0.Bottom = .top + 4.Left = 20.Right = .Left + 4End With' Attributes - BlockWith BlockRect.top = 4.Bottom = .top + 4.Left = 4.Right = .Left + 4End With' Attributes - WarpWith WarpRect.top = 4.Bottom = .top + 4.Left = 8.Right = .Left + 4End With' Attributes - ItemWith ItemRect.top = 4.Bottom = .top + 4.Left = 12.Right = .Left + 4End With' Attributes - ShopWith ShopRect.top = 4.Bottom = .top + 4.Left = 16.Right = .Left + 4End With' Set attributes in mapFor x = 0 To MapXFor Y = 0 To MapY' Camera locCameraX = Camera.Left + 25 + (x * 4)CameraY = Camera.top + 25 + (Y * 4)' Blank tileEngine_BltFast CameraX, CameraY, DDS_MiniMap, BlankRect, DDBLTFAST_WAIT Or DDBLTFAST_SRCCOLORKEYSelect Case Map.Tile(x, Y).TypeCase TILE_TYPE_BLOCKEDEngine_BltFast CameraX, CameraY, DDS_MiniMap, BlockRect, DDBLTFAST_WAIT Or DDBLTFAST_SRCCOLORKEYCase TILE_TYPE_WARPEngine_BltFast CameraX, CameraY, DDS_MiniMap, WarpRect, DDBLTFAST_WAIT Or DDBLTFAST_SRCCOLORKEYCase TILE_TYPE_ITEMEngine_BltFast CameraX, CameraY, DDS_MiniMap, ItemRect, DDBLTFAST_WAIT Or DDBLTFAST_SRCCOLORKEYCase TILE_TYPE_SHOPEngine_BltFast CameraX, CameraY, DDS_MiniMap, ShopRect, DDBLTFAST_WAIT Or DDBLTFAST_SRCCOLORKEYEnd SelectNext YNext x' Set players in mini mapFor i = 1 To Player_HighIndexIf IsPlaying(i) Then' Player locx = Player(i).xY = Player(i).Y' Camera locCameraX = Camera.Left + 25 + (x * 4)CameraY = Camera.top + 25 + (Y * 4)Select Case Player(i).PKCase NOCall Engine_BltFast(CameraX, CameraY, DDS_MiniMap, PlayerRect, DDBLTFAST_WAIT Or DDBLTFAST_SRCCOLORKEY)Case YESCall Engine_BltFast(CameraX, CameraY, DDS_MiniMap, PlayerPkRect, DDBLTFAST_WAIT Or DDBLTFAST_SRCCOLORKEY)End SelectEnd IfNext i' Set npcs in mini mapFor i = 1 To Npc_HighIndexIf MapNpc(i).num > 0 Then' Npc locx = MapNpc(i).xY = MapNpc(i).Y' Camera locCameraX = Camera.Left + 25 + (x * 4)CameraY = Camera.top + 25 + (Y * 4)Select Case Npc(MapNpc(i).num).BehaviourCase NPC_BEHAVIOUR_ATTACKONSIGHT Or NPC_BEHAVIOUR_ATTACKWHENATTACKEDCall Engine_BltFast(CameraX, CameraY, DDS_MiniMap, NpcAttackerRect, DDBLTFAST_WAIT Or DDBLTFAST_SRCCOLORKEY)Case NPC_BEHAVIOUR_SHOPKEEPERCall Engine_BltFast(CameraX, CameraY, DDS_MiniMap, NpcShopRect, DDBLTFAST_WAIT Or DDBLTFAST_SRCCOLORKEY)Case ElseCall Engine_BltFast(CameraX, CameraY, DDS_MiniMap, NpcOtherRect, DDBLTFAST_WAIT Or DDBLTFAST_SRCCOLORKEY)End SelectEnd IfNext i' Error handlerExit Suberrorhandler:HandleError "BltMiniMap", "modDirectDraw7", Err.Number, Err.Description, Err.Source, Err.HelpContextErr.ClearExit SubEnd Sub```> frmMainWithin the picOptions create a label with the following caption:> MiniMapNow create a PictureBox with any name in it and add 2 optionsBox with the following settingsOptionBox1> Name: optMiniMapOn> > Caption: OnOptionBox2> Name: optMiniMapOff> > Caption: OffWithin the optMiniMapOn add:``` ' If debug mode, handle error then exit outIf Options.Debug = 1 Then On Error GoTo errorhandlerOptions.Minimap = 1SaveOptions' Error handlerExit Suberrorhandler:HandleError "optMiniMapOn_Click", "frmMain", Err.Number, Err.Description, Err.Source, Err.HelpContextErr.ClearExit Sub```And within the optMiniMapOff add:``` ' If debug mode, handle error then exit outIf Options.Debug = 1 Then On Error GoTo errorhandlerOptions.Minimap = 0SaveOptions' Error handlerExit Suberrorhandler:HandleError "optMiniMapOff_Click", "frmMain", Err.Number, Err.Description, Err.Source, Err.HelpContextErr.ClearExit Sub```> modTypesAt the end of Private Type OptionsRec before the End type, add:``` Minimap As Byte```> modDatabaseFind:``` Call PutVar(fileName, "Options", "Debug", Str(Options.Debug))```Below add:``` Call PutVar(fileName, "Options", "MiniMap", Str(Options.Minimap))```Find:``` Options.Debug = 0```Below add:``` Options.Minimap = 1```Find:``` Options.Debug = GetVar(fileName, "Options", "Debug")```Below add:``` Options.Minimap = GetVar(fileName, "Options", "MiniMap")```Find:``` If Options.Sound = 0 ThenfrmMain.optSOff.Value = TrueElsefrmMain.optSOn.Value = TrueEnd If```Below add:``` If Options.Minimap = 0 ThenfrmMain.optMiniMapOff.Value = TrueElsefrmMain.optMiniMapOn.Value = TrueEnd If```Now delete the config.ini**Credits**iRicardo Link to comment Share on other sites More sharing options...
Rew Posted January 30, 2012 Share Posted January 30, 2012 Wow, this look awesome. Link to comment Share on other sites More sharing options...
santa-clause Posted January 30, 2012 Share Posted January 30, 2012 it isnt working i cant see iti dont get error i only get nothing Link to comment Share on other sites More sharing options...
Justn Posted January 30, 2012 Share Posted January 30, 2012 Can you explain what's not working? Did you get an error? Link to comment Share on other sites More sharing options...
Rew Posted January 30, 2012 Share Posted January 30, 2012 Uh.. where is picOption and optionBox? I can´t find this tool. Link to comment Share on other sites More sharing options...
santa-clause Posted January 30, 2012 Share Posted January 30, 2012 that is your option image in frm main wheremusicon offsoundon offthat is picoption Link to comment Share on other sites More sharing options...
santa-clause Posted January 30, 2012 Share Posted January 30, 2012 i didnt get an error it is just not working Link to comment Share on other sites More sharing options...
PVJsquad Posted January 30, 2012 Share Posted January 30, 2012 @Rew:> Uh.. where is picOption and optionBox? I can´t find this tool.make like it![](http://www.freemmorpgmaker.com/files/imagehost/pics/5b9b954043c6220cad38b7eff2ba6bd0.bmp) Link to comment Share on other sites More sharing options...
santa-clause Posted January 30, 2012 Share Posted January 30, 2012 nice answer Link to comment Share on other sites More sharing options...
Rew Posted January 30, 2012 Share Posted January 30, 2012 And what is option box? :D Link to comment Share on other sites More sharing options...
santa-clause Posted January 30, 2012 Share Posted January 30, 2012 ![](http://www.freemmorpgmaker.com/files/imagehost/pics/5b9b954043c6220cad38b7eff2ba6bd0.bmp)this is the option box the hole thing do you understand ?????else you need to learn a lot about programming not that i am a good programmer (i am a bad programmer)but i can read and understand everything Link to comment Share on other sites More sharing options...
Tic Tac 2 Posted January 30, 2012 Share Posted January 30, 2012 Method or Data member not foundhighlighting ".Minimap =" Link to comment Share on other sites More sharing options...
Domino_ Posted January 30, 2012 Share Posted January 30, 2012 @Tic:> Method or Data member not found> > highlighting ".Minimap ="pay someone to do this in your place… >.> ^^Also looks good and clear, I see you are adding here simple but needed tutorials, keep it up and good luck. ;)p.s. I see you arent centering code any more.. :D Link to comment Share on other sites More sharing options...
Zopto Posted January 30, 2012 Share Posted January 30, 2012 ty man good minimap system it work BRAWOOO!!!! Link to comment Share on other sites More sharing options...
Justn Posted January 30, 2012 Share Posted January 30, 2012 Don't you think serenades minimap looks alittle better though? I don't think I like the extra white area around the map but still good job adding all the different things to it even though I would prefer to use the blank tile attribute to get rid of the extra nonplayable areaalso u said> I looked at various forums, three types of minimaps and theyall had tocreate a new type called white tile to make a piece ofwhiteminimap to know that there was nothing in a certain place,I'm not sure you understood his map system cause the white is automatically drawn and a "blank tile" is used to remove extra not needed white space… Not a "white tile" to draw a white space.... Link to comment Share on other sites More sharing options...
PVJsquad Posted January 31, 2012 Share Posted January 31, 2012 @Tic:> Method or Data member not found> > highlighting ".Minimap ="Add in /Data Files/**config.ini**Like That```[Options]Game_Name=Eclipse OriginsUsername=Password=SavePass= 0IP=localhostPort= 7001MenuMusic=reddwarf.midMusic= 1Sound= 1Debug= 0MiniMap = 1```@santa-clause:> ![](http://www.freemmorpgmaker.com/files/imagehost/pics/5b9b954043c6220cad38b7eff2ba6bd0.bmp)> this is the option box the hole thing do you understand ?????> else you need to learn a lot about programming not that i am a good programmer (i am a bad programmer)> but i can read and understand everythingWhat the problem ,Sorry hehhe :P Link to comment Share on other sites More sharing options...
Prince Posted February 9, 2012 Share Posted February 9, 2012 that small minimap can show the whole map? or when we get bigger map it will show just area on the big map? Sorry for bad english.EDIT: and it's not working :3 Link to comment Share on other sites More sharing options...
SeMike Posted March 24, 2012 Share Posted March 24, 2012 Help me please. I am using EO 2.0 and I think i made all what it need and look at this ![](http://imageupload.org/en/file/206257/helppls.png.html) help me pls..(Sorry for my bad English) Link to comment Share on other sites More sharing options...
SeMike Posted March 24, 2012 Share Posted March 24, 2012 http://imageupload.org/en/file/206257/helppls.png.html (reupload image) Link to comment Share on other sites More sharing options...
iHero Posted March 24, 2012 Author Share Posted March 24, 2012 Sorry, I packed the system Link to comment Share on other sites More sharing options...
Zopto Posted March 25, 2012 Share Posted March 25, 2012 it is grate but when is map biger and minimap is biger :S Link to comment Share on other sites More sharing options...
Mr.LLoyd Posted April 13, 2012 Share Posted April 13, 2012 I Get this error when i try to log in game:Run-time error 5Invalid procedure call or argument>! ![](http://www.freemmorpgmaker.com/files/imagehost/pics/ec2f35eb875d9d41f72beec6230c6bcc.png) Link to comment Share on other sites More sharing options...
Zopto Posted April 13, 2012 Share Posted April 13, 2012 you put minimap file in client/data??if you put that and you still geting error just delete all accounts Link to comment Share on other sites More sharing options...
Mr.LLoyd Posted April 13, 2012 Share Posted April 13, 2012 Yes i have added the file>! ![](http://www.freemmorpgmaker.com/files/imagehost/pics/eee74bfdda0c86b8cd2df90faf1563e4.png)Deleted all accounts and still the same error Link to comment Share on other sites More sharing options...
Zopto Posted April 13, 2012 Share Posted April 13, 2012 ok just do that whiteout making folder minimap just put pictures in grafic folderso like this (minimap picture) datafiles/grafic/ and dont create minimap folder just put picture here Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now