UzGo Posted September 18, 2013 Share Posted September 18, 2013 I've been wondering if there are "Party Only" maps than there might also be "Clan/Guild only" maps. And if someone has a plesure to create a tutorial about such maps i will be very happy !!! Link to comment Share on other sites More sharing options...
coziboy Posted September 19, 2013 Share Posted September 19, 2013 my and deathkeeper mod to make such a dungeon party map with keyreplace```' Check to see if its a Party DungeonIf Map(mapnum).Moral = MAP_MORAL_PARTY_MAP Then' Check to make sure the player is in a party. If not exit the sub so they dont change mapsIf TempPlayer(index).inParty < 1 ThenCall PlayerMsg(index, "This is a party map. You have to be in a party to enter it.", Red)Exit SubEnd IfEnd If```with```' Check to see if its a Party DungeonIf Map(mapnum).Moral = MAP_MORAL_PARTY_MAP And GetPlayerAccess(index) = 0 ThenIf HasItem(index, 100) And TempPlayer(index).inParty > 0 Then TakeInvItem index, 100, 1 ElseCall PlayerMsg(index, "You don't have dungeon key", Red)With Map(GetPlayerMap(index)) ' to the bootmap if it is set If .BootMap > 0 Then PlayerWarp index, .BootMap, .BootX, .BootY Else PlayerWarp index, START_MAP, START_X, START_Y End If End WithExit SubEnd If' Check to make sure the player is in a party. If not exit the sub so they dont change mapsIf TempPlayer(index).inParty < 1 ThenCall PlayerMsg(index, "This is a party map. You have to be in a party to enter it.", Red)With Map(GetPlayerMap(index)) ' to the bootmap if it is set If .BootMap > 0 Then PlayerWarp index, .BootMap, .BootX, .BootY Else PlayerWarp index, START_MAP, START_X, START_Y End If End WithExit SubEnd IfIf TempPlayer(index).inParty > 1 And HasItem(index, 100) = 0 ThenCall PlayerMsg(index, "You have party but you don't have dungeon key!", Red)With Map(GetPlayerMap(index)) ' to the bootmap if it is set If .BootMap > 0 Then PlayerWarp index, .BootMap, .BootX, .BootY Else PlayerWarp index, START_MAP, START_X, START_Y End If End WithExit SubEnd IfIf TempPlayer(index).inParty < 1 And HasItem(index, 100) = 1 ThenCall PlayerMsg(index, "You have dungeon key but you dont' have party!", Red)With Map(GetPlayerMap(index)) ' to the bootmap if it is set If .BootMap > 0 Then PlayerWarp index, .BootMap, .BootX, .BootY Else PlayerWarp index, START_MAP, START_X, START_Y End If End WithExit SubEnd IfEnd If```look at```TakeInvItem index, 100, 1```it mean when they want to enter dungeon, server will take item number #100 onceyou can change item number as you wishand you can combine this with this tutorial to make free daily key -> [http://www.eclipseorigins.com/community/index.php?/topic/130200-eo-daily-reward-system/](http://www.eclipseorigins.com/community/index.php?/topic/130200-eo-daily-reward-system/) :P 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