Mirage Source

Free ORPG making software.
It is currently Sat Apr 27, 2024 7:50 pm

All times are UTC


Search found 49 matches
Search these results:

Author Message

 Forum: Resources   Topic: Full Name Needed for Commands

Posted: Sun Dec 24, 2006 4:50 am 

Replies: 11
Views: 4937


Author: Dave Difficulty: 1/5 " This tutorial is supported for only MSE build 1. If you can't handle doing this on your server, no matter what base, you need serious help. This tutorial makes it so you need the entire name of a player to use a command on them. It eliminates confusion between si...

 Forum: Resources   Topic: Transparent Color For Surfaces

Posted: Sat Dec 23, 2006 10:01 pm 

Replies: 12
Views: 4773


Author: Enigmewave Difficulty: 3/5 :: CLIENT SIDE :: In modDirectX.bas, add: Public Sub SetMaskColorFromPixel(ByRef TheSurface As DirectDrawSurface7, ByVal X As Long, ByVal Y As Long) Dim TmpR As RECT Dim TmpDDSD As DDSURFACEDESC2 Dim TmpColorKey As DDCOLORKEY With TmpR .Left = X .Top = Y .Right = ...

 Forum: Resources   Topic: NPCs Talk When Attacked

 Post subject: NPCs Talk When Attacked
Posted: Sun Dec 17, 2006 3:34 am 

Replies: 14
Views: 4873


Author: Izzy545 Difficulty: 1/5 :: SERVER SIDE :: In sub CanAttackNpc, under " ' Make sure they are on the same map ", in the select case statement, for all directions replace: If Npc(NpcNum).Behavior <> NPC_BEHAVIOR_FRIENDLY And Npc(NpcNum).Behavior <> NPC_BEHAVIOR_SHOPKEEPER Then CanAtt...

 Forum: Resources   Topic: Display MapNum

 Post subject: Display MapNum
Posted: Sat Dec 09, 2006 4:04 pm 

Replies: 12
Views: 3296


Author: Perfekt Difficulty: 1/5 :: CLIENT SIDE :: Find: ' Map Editor If LCase(Mid(MyText, 1, 10)) = "/mapeditor" Then Call SendRequestEditMap MyText = "" Exit Sub End If Beneath that, add: ' MapNum If LCase(Mid(MyText, 1, 4)) = "/map" Then If frmMirage.picMapNum.Visibl...

 Forum: Resources   Topic: Adding Width to the MapEditor

Posted: Tue Dec 05, 2006 10:02 pm 

Replies: 12
Views: 3459


Author: Leighland Difficulty: 1/5 See Also: http://www.key2heaven.net/ms/forums/viewtopic.php?t=36 For this tutorial I will be changing the width of the MapEditor tile set from 7 to 14. Please read through the whole tutorial and understand what you're doing before doing it. :: CLIENT SIDE :: In frm...

 Forum: Resources   Topic: /Lag Command (Ping)

 Post subject: /Lag Command (Ping)
Posted: Sun Dec 03, 2006 6:08 am 

Replies: 11
Views: 3478


Author: Dragoons Master Difficulty: 1/5 " That's pretty simple thing but I think it's pretty cool/useful stuff. It's nothing but a little ping command, just like that, it sends a packet to the server and then the server answer your ping packet with an other packet. When the client first sends ...

 Forum: Resources   Topic: NPCs Always Drop Gold

 Post subject: NPCs Always Drop Gold
Posted: Mon Oct 02, 2006 4:35 am 

Replies: 12
Views: 3304


Author: Leighland Difficulty: 1/5 :: SERVER SIDE :: In modGameLogic, and find Sub AttackNpc, find: ' Drop the goods if they get it n = Int(Rnd * Npc(NpcNum).DropChance) + 1 If n = 1 Then Call SpawnItem(Npc(NpcNum).DropItem, Npc(NpcNum).DropItemValue, MapNum, MapNpc(MapNum, MapNpcNum).X, MapNpc(MapN...

 Forum: Resources   Topic: Rebirths (Level Reset)

 Post subject: Rebirths (Level Reset)
Posted: Mon Sep 18, 2006 1:58 am 

Replies: 12
Views: 3431


Author: Leighland Difficulty: 2/5 (May require some modifications.) " Note that you can modify the events that take place upon resetting the players level. Example: I chose to divide the players stats by 4, but you could also have them keep the stats they have. The only problem would be that d...

 Forum: Resources   Topic: Simple EXP Carry-Over

 Post subject: Simple EXP Carry-Over
Posted: Wed Sep 13, 2006 8:48 pm 

Replies: 12
Views: 4343


Author: Magnus Difficulty: 1/5 :: SERVER SIDE :: Find: Sub CheckPlayerLevelUp(ByVal Index As Long) Beneath it, add: Dim ExtraEXP As Long Now, add this before any of the other comment stuff: If GetPlayerExp(Index) > GetPlayerNextLevel(Index) Then ExtraEXP = (GetPlayerExp(Index) - GetPlayerNextLevel(...

 Forum: Resources   Topic: Display Chat Text Over Player (No Bubbles)

Posted: Sun Sep 03, 2006 3:32 pm 

Replies: 14
Views: 7336


Author: GodSentDeath & Tristan Difficulty: 1/5 :: SERVER SIDE :: Find:(it's in the social packet) Call MapMsg(GetPlayerMap(Index), GetPlayerName(Index) & " says, '" & Msg & "'", SayColor) Beneath it, add: Call MapMsg2(GetPlayerMap(Index), Msg, Index) In modServer...

 Forum: Resources   Topic: Server System Tray Support

 Post subject: Server System Tray Support
Posted: Sat Sep 02, 2006 10:13 pm 

Replies: 13
Views: 3021


Author: Magnus Difficulty: 1/5 :: SERVER SIDE :: First, add the existing module "modSysTray" (it's in the server folder) to your project. Now, in Sub InitServer, a few lines below " Randomize Timer " add the following: nid.cbSize = Len(nid) nid.hWnd = frmServer.hWnd nid.uId = vb...

 Forum: Resources   Topic: Fullscreen

 Post subject: Fullscreen
Posted: Fri Aug 25, 2006 1:41 pm 

Replies: 27
Views: 14521


Author: Robin Difficulty: Requires ability to understand. This tutorial will allow user's to be able to choose from several options, including windowed, to make the game more suitable for them. User configuration is really a good thing to add in. For example, in Naruto Realm Beta, user's can choose...

 Forum: Resources   Topic: Simple Click To Move

 Post subject: Simple Click To Move
Posted: Wed Aug 23, 2006 10:38 pm 

Replies: 14
Views: 3976


Author: pingu Difficulty: 1/5 " Click somewhere on the map and your player will automatically walk there. However, blocks are ignored and the player may find themself stuck if they go too far. Double click to run the distance. " :: CLIENT SIDE :: Find: ' Game fps Public GameFPS As Long Un...

 Forum: Resources   Topic: Proper Drag-able Boxes

 Post subject: Proper Drag-able Boxes
Posted: Sun Jul 09, 2006 12:41 am 

Replies: 11
Views: 3873


Author: pingu Difficulty: 1/5 :: CLIENT SIDE :: In modDatabase, after " Option Explicit " add: Public SOffsetX As Integer Public SOffsetY As Integer At the bottom of modDatabase, add: Sub MovePicture(PB As PictureBox, Button As Integer, Shift As Integer, x As Single, y As Single) If Butto...

 Forum: Resources   Topic: Set NPC HP/EXP

 Post subject: Set NPC HP/EXP
Posted: Fri Jun 02, 2006 7:21 pm 

Replies: 21
Views: 13069


Author: grimsk8ter11 Difficulty: 1/5 :: SERVER SIDE :: In modTypes, fin: Type NpcRec Beneath, add: MaxHP As Long GiveEXP As Long Find Sub ClearNPC(ByVal Index As Long), replace it with: Sub ClearNpc(ByVal Index As Long) Npc(Index).Name = "" Npc(Index).AttackSay = "" Npc(Index).S...

 Forum: Resources   Topic: HP Bars Under NPCs

 Post subject: HP Bars Under NPCs
Posted: Fri Jun 02, 2006 7:09 pm 

Replies: 14
Views: 6104


Author: GodSentDeath Difficulty: 1/5 :: SERVER SIDE :: In modHandleData add the following anywhere: ' ::::::::::::::::::::::::::: ' :: Npc hp request packet :: ' ::::::::::::::::::::::::::: Dim Pack As String If LCase(Parse(0)) = "getnpchp" Then Pack = "npchp" & SEP_CHAR For...

 Forum: Resources   Topic: Display Player HP/MP Bars

 Post subject: Display Player HP/MP Bars
Posted: Fri Jun 02, 2006 7:05 pm 

Replies: 17
Views: 9116


Author: GodSentDeath Difficulty: 1/5 Note: This displays everybody's HP bars, but only you can see your own MP bar. :: SERVER SIDE :: In modHandleData, add: ' ::::::::::::::::::::::: ' :: Get players stats :: ' ::::::::::::::::::::::: Dim Packet As String If LCase(Parse(0)) = "playershpmp"...

 Forum: Resources   Topic: Amulet of Speed

 Post subject: Amulet of Speed
Posted: Fri Jun 02, 2006 6:59 pm 

Replies: 12
Views: 5024


Author: grimsk8ter11 Difficulty: 1/5 Example of how you can change some variables in Mirage to get some new effects. The "Amulet of Speed" item: :: CLIENT SIDE :: In modConstants, remove: ' Speed moving vars Public Const WALK_SPEED = 4 Public Const RUN_SPEED = 8 In modGlobals, add: ' Spee...

 Forum: Resources   Topic: Heal and Kill Attributes

 Post subject: Heal and Kill Attributes
Posted: Fri Jun 02, 2006 3:59 am 

Replies: 11
Views: 3674


Author: Mr.Saturn Difficulty: 2/5 Healing Attribute Tile :: SERVER SIDE :: In modTypes, add: Public Const TILE_TYPE_HEAL = 7 In modGamelogic, go to Sub PlayerMove, and add: If Map(GetPlayerMap(Index)).Tile(GetPlayerX(Index), GetPlayerY(Index)).Type = TILE_TYPE_HEAL Then Call SetPlayerHP(Index, GetP...

 Forum: Resources   Topic: Server Shutdown

 Post subject: Server Shutdown
Posted: Thu Jun 01, 2006 10:24 pm 

Replies: 12
Views: 3108


Author: grimsk8ter11 Difficulty: 1/5 :: SERVER SIDE :: In frmServer, add: Private Sub Form_Load() ShutOn = False End Sub Replace the tmrShutdown_Timer sub with: Private Sub tmrShutdown_Timer() Static Secs As Long If ShutOn = False Then Secs = 30 Call TextAdd(frmServer.txtText, "Automated Serve...

 Forum: Resources   Topic: Names Under NPCs

 Post subject: Names Under NPCs
Posted: Thu Jun 01, 2006 10:20 pm 

Replies: 12
Views: 3446


Author: ? (unknown) Difficulty: 1/5 See Also: http://www.key2heaven.net/ms/forums/viewtopic.php?t=55 :: CLIENT SIDE :: In modGameLogic.bas, add: Sub BltMapNPCName(ByVal Index As Long) Dim TextX As Long Dim TextY As Long With Npc(MapNpc(Index).Num) 'Draw name TextX = MapNpc(Index).x * PIC_X + MapNpc...

 Forum: Resources   Topic: Memorize Spells

 Post subject: Memorize Spells
Posted: Thu Jun 01, 2006 10:19 pm 

Replies: 11
Views: 3417


Author: grimsk8ter11 Difficulty: 1/5 :: CLIENT SIDE :: In frmMirage, under " Options Explicit ", add: Dim SpellMemorized As Long Add:(anywhere) Private Sub lstSpells_DblClick() If Player(MyIndex).Spell(lstSpells.ListIndex + 1) > 0 Then SpellMemorized = lstSpells.ListIndex + 1 Call AddText...

 Forum: Resources   Topic: QuickHeal Button

 Post subject: QuickHeal Button
Posted: Thu Jun 01, 2006 10:17 pm 

Replies: 12
Views: 3469


Author: LSD Difficulty: 1/5 :: CLIENT SIDE :: In frmMirage, find: Sub Form_keyup(keyCode As Integer, Shift As Integer) Replace the entire sub with: Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer) Call CheckInput(0, KeyCode, Shift) End Sub with code Private Sub Form_KeyUp(KeyCode As Int...

 Forum: Resources   Topic: Basic Notes / Log / Diary

 Post subject: Basic Notes / Log / Diary
Posted: Thu Jun 01, 2006 10:14 pm 

Replies: 12
Views: 3479


Author: ? (unknown) Difficulty: 1/5 :: CLIENT SIDE :: On frmMirage, make a pictureBox called picKeepNotes, and a button called KeepNotes. Add: Private Sub KeepNotes_Click() picKeepNotes.Visible = True End Sub Make a txtbox named Notetext on picture, and 2 buttons. Add: Private Sub Save_Click() Dim ...

 Forum: Resources   Topic: Copy Map NPCs in Properties

 Post subject: Copy Map NPCs in Properties
Posted: Thu Jun 01, 2006 10:06 pm 

Replies: 12
Views: 3041


Author: Renegade Difficulty: 1/5 This basically adds a "copy" button for NPCs in the map editor. Instead of going through the list each time to place the same monster, you just click a button and it copies the NPC just above it. :: CLIENT SIDE :: In frmMapProperties, make a command button...
Sort by:  
Page 1 of 2 [ Search found 49 matches ]


All times are UTC


Jump to:  
Powered by phpBB® Forum Software © phpBB Group