Nickpop123

Might I ask what engine did you use for the old maps you want to convert?

Does your old maps use Mask2 or Fringe2 at all? If so: ``` Sub ConvertOldMapsToNew() Dim FileName As String, FileName2 As String Dim M As Long, I As Long, F As Long, X As Long, Y As Long Dim OldMap As OldMapRec Dim NewMap As NewMapRec ReDim NewMap.Tile(0 To MAX_MAPX, 0 To MAX_MAPY) As NewTileRec ReDim OldMap.Tile(0 To MAX_MAPX, 0 To MAX_MAPY) As OldTileRec For I = 1 To MAX_MAPS FileName = App.Path & "\maps\map" & I & ".dat" FileName2 = App.Path & "\new maps\map" & I & ".dat" ' Get the old file. F = FreeFile Open FileName For Binary Access Read As #F Get #F, , OldMap Close #F ' Convert. NewMap.Name = OldMap.Name NewMap.Music = OldMap.Music NewMap.Revision = OldMap.Revision NewMap.Moral = OldMap.Moral NewMap.Up = OldMap.Up NewMap.Down = OldMap.Down NewMap.Left = OldMap.Left NewMap.Right = OldMap.Right NewMap.BootMap = OldMap.BootMap NewMap.BootX = OldMap.BootX NewMap.BootY = OldMap.BootY NewMap.MaxX = MAX_MAPX NewMap.MaxY = MAX_MAPY For Y = 0 To MAX_MAPY For X = 0 To MAX_MAPX NewMap.Tile(X, Y).Layer(MapLayer.Ground).X = (OldMap.Tile(X, Y).Ground \ 7) * PIC_X NewMap.Tile(X, Y).Layer(MapLayer.Ground).Y = (OldMap.Tile(X, Y).Ground \ 7) * PIC_Y NewMap.Tile(X, Y).Layer(MapLayer.Mask1).X = (OldMap.Tile(X, Y).Mask \ 7) * PIC_X NewMap.Tile(X, Y).Layer(MapLayer.Mask1).Y = (OldMap.Tile(X, Y).Mask \ 7) * PIC_Y NewMap.Tile(X, Y).Layer(MapLayer.Mask2).X = (OldMap.Tile(X, Y).Mask2 \ 7) * PIC_X NewMap.Tile(X, Y).Layer(MapLayer.Mask2).Y = (OldMap.Tile(X, Y).Mask2 \ 7) * PIC_Y NewMap.Tile(X, Y).Layer(MapLayer.Fringe1).X = (OldMap.Tile(X, Y).Fringe \ 7) * PIC_X NewMap.Tile(X, Y).Layer(MapLayer.Fringe1).Y = (OldMap.Tile(X, Y).Fringe \ 7) * PIC_Y NewMap.Tile(X, Y).Layer(MapLayer.Fringe2).X = (OldMap.Tile(X, Y).Fringe \ 7) * PIC_X NewMap.Tile(X, Y).Layer(MapLayer.Fringe2).Y = (OldMap.Tile(X, Y).Fringe \ 7) * PIC_Y NewMap.Tile(X, Y).Layer(MapLayer.Ground).Tileset = 1 NewMap.Tile(X, Y).Layer(MapLayer.Mask1).Tileset = 1 NewMap.Tile(X, Y).Layer(MapLayer.Mask2).Tileset = 1 NewMap.Tile(X, Y).Layer(MapLayer.Fringe1).Tileset = 1 NewMap.Tile(X, Y).Layer(MapLayer.Fringe2).Tileset = 1 NewMap.Tile(X, Y).Type = OldMap.Tile(X, Y).Type NewMap.Tile(X, Y).Data1 = OldMap.Tile(X, Y).Data1 NewMap.Tile(X, Y).Data2 = OldMap.Tile(X, Y).Data2 NewMap.Tile(X, Y).Data3 = OldMap.Tile(X, Y).Data3 Next Next For X = 1 To 15 NewMap.Npc(X) = OldMap.Npc(X) Next ' Save the new map F = FreeFile Open FileName2 For Binary Access Write As #F Put #F, , NewMap Close #F Next End Sub ``` I didn't know if you have any NPCs on your old maps either, so I added a convert to that too. Also for your error, what line is it pointing to?

I think this has something to do with the screen DPI (dots per inch). [http://www.dummies.com/how-to/content/change-your-monitors-dots-per-inch-dpi-setting.html](http://www.dummies.com/how-to/content/change-your-monitors-dots-per-inch-dpi-setting.html) Im guessing your screen DPI is a little bit higher than normal size DPI, so change it down a few to test it.

> Hey everyone. I spent some time today editing the source for Eclipse Stable. I fixed the bug where the magic and speed stats got switched, and I made it so the menu music loops. It's available below. Also, I put together another zip with some extra resources I had on hand. Firstly, there are the Eclipse Library Installers. > > I also included: > > 1. A list of the Eclipse Evolution Commands. > 2. A list of several sadscript commands for a quick reference. > 3. A Main.ess file with a bunch of extra scripts that were only available on the old website. > > So here you go: > > > > [Eclipse-Stable.zip](https://dl-web.dropbox.com/get/Eclipse%20Stable/Eclipse-Stable.zip?_subject_uid=274547289&w=AAB_G2uydHypJRZL4q4YQB5WqgQCp1CZ1NvLl_VmAgN7Fw&dl=1) > > [ES Extra.zip](https://dl-web.dropbox.com/get/Eclipse%20Stable/ES%20Extra.zip?_subject_uid=274547289&w=AAAYKO5mWWqPt6DC7jpRoZxs9gjanMkoSmqyThhX6J6iyw&dl=1) > > > > I was wondering if anyone would be interested in seeing some ES tutorials for things like making a skill system and quests. I made both of those already in the past. Please let me know if you are. Thanks again Crest for uploading ES and EE. I wouldn't mind seeing tutorials of ES, but I'm not sure if there are any more ES users :(… But anyway yeah, I wouldn't mind ^_^.

I still use ES to this day x3\. It was also my first eclipse engine too :).

Hey sorry guys! I have been busy with a lot of stuff, but I am free for some coding jobs, as I do need some cash! Reply If you are interested, or leave a PM! If you have a skype, you can also add me and we can talk there!

> Nothing will ever make me tear up like the anime, Clannad After Story did…...Anyways the game looks pretty interesting. i may check it out. Yeah! It is very recommended! > Very awesome game I couldn't agree more!

> Yes, it made me tear too, but they were manly tears The tears of joy and pride.

> That game was awesome. I couldn't agree more! I'm not the kind of person who would tear often over a game or something, but this game… It made me tear!

Hello! I would like to show you this amazing RPG Maker XP game, called "To The Moon." To start, it's genres are: RPG Adventure, Sci-Fi, Tragicomedy, and Psychological. Kan R. Gao with Freebird Games made it. Its about 2 doctors, Dr. Eva Rosalene and Dr. Neil Watts, which work at Sigmund Life of Generation Corps. Their job is to give people another chance to live. Their patients name is Johnny. His wish is to go to the moon, but he doesn't know why. So, the 2 doctors must transverse through Johnny's memories, starting from old age to childhood. As you go through his memories, you learn more and more about Johnny's story and past. The objective is to go to his childhood, and send the motivation signal of him wanting to go to the moon. It's a really sad and beautiful story, as well as the music for the game is beautifully composed! I'd recommend trying this game. You can get it on steam, or get it from the website: [http://www.freebirdgames.com/](http://www.freebirdgames.com/) Here are a few screenshots of the game:   Here is a trailer for the game: [media]http://www.youtube.com/watch?feature=player_embedded&v=sqkJuSV-23U[/media] Feel free to reply of what you think. If you ever played "To The Moon," you can also reply and say what you think of the game!

Uh correct me if I'm wrong, but isn't that ram really low to even handle any server from eclipse?

I'm not sure if anyone remembers this eclipse game, but Super Mario Online (SMO) made by Ne0n, had a pay to play feature. Basically you had like 2 hours of gameplay time, then you'd have to buy for more time through paypal or buy a timebox in game for a amount of coins. Ne0n made like around 30 to 40 bucks off this. Many emailed Nintendo about this, but after the years of SMO being around (like around 4 years), SMO didn't get any cease and decist from Nintendo. I don't see why they didn't do that? I'd figure they would protect Mario more?

Bump again! Also added another photo!

Thank you guys for the support!

Bump!

**~Introduction~** Hello! My name is Nickpop123, but you can call me Nick. Anyway, to start, I have been programming for about 2+ years now. I can help code for Any VB6 engine like, EO or CS:DE. etc! I currently help a game(paused at the moment) called Project MLO. I do many coding work for Project MLO. I also help my friends if they have trouble with some coding to! Anyway lets get started shall we! **~How much do you charge?~** Well, not a lot actually! Depends on the job. I will charge minimun of $3, anything past $15+ are the jobs that may take me a while. The price really varies on how much the difficulty is for me! I will also let you test out the code afterwards, to see if you like it or not. **~Some Examples of your work?~** I'm going to show some of my work through screenshots! Server Select Screen: This feature is for games which have one than more host for the game! The Ip and Port are hard coded into it.  Best Player: This is for players who win a event or has been helping out the game! Their name will be displayed at the main menu!  More than 1 character + Displays Character Sprite: This shows all the characters you have on your account, and displays them in boxes. A red box will appear around the box you click. It also tells your name, class, and level.  Alert Message Box: A form which acts as the Eclipse Alert Messages, which server sends to client.  Names with a backdrop, also custom graphic for staff members: Names have a 3D effect with a shadow backdrop. Also Staff members will have a graphic like "GM or "MODERATOR", etc.  Battle Messages: Battle messages can be displayed anywhere on the form like this:  Global Events: You can broadcast global events like a global radio, or give everyone a link to a website!  PvP Messages or congrats messages: This box scrolls up on the picScreen displaying a message like "Player has defeated Player" or "Player has leveled up!"  Super Speed running: Players can go twice as fast as the run speed, but loose more SP from it (also can have a animation to it!)  RPG Styled Text: Something like Paper Mario or any RPG game where it writes out the dialogue for you, letter by letter!  Packet Revealer: A really nice addition to any server. You can see what packet name is coming in, the amount of bytes the packet is, and the time it arrived!  Npc Edit Box + edit Map: This little box appears when you click a npc on the map. If you click the green number, it opens that number up in the NPC editor! Also if you don't like going in admin panel to open map editor, or using the command, just click on a npc in map and click the "Edit Map."  **~Contact Info!~** I have many ways to contact me!: You can PM me! You can email me at: [email protected] You can add me on skype: nick.hardy21 I will be glad to help anyone! P.S: Keep in mind that I'm not the BEST coder out there, so I can't do EVERYTHING. I can maybe do some big things, but for the most part, probably not.

Use your old code you had, and with your old problem code, replace it with this: ``` If NpcX = GetPlayerX(Attacker) Then If NpcY = GetPlayerY(Attacker) Then If Npc(npcNum).Behaviour NPC_BEHAVIOUR_FRIENDLY And Npc(npcNum).Behaviour NPC_BEHAVIOUR_SHOPKEEPER And Npc(npcNum).Behaviour NPC_BEHAVIOUR_MANAGER Then 'House Editor CanPlayerAttackNpc = True Else 'House Editor If Npc(npcNum).Behaviour = NPC_BEHAVIOUR_MANAGER Then Call SendInitManager(Attacker, CInt(GetVar(App.Path & "\data\accounts\houses.ini", "OPTIONS", "" & Player(Attacker).Name)), Npc(npcNum).HMapNum, Npc(npcNum).HBuy, Npc(npcNum).HSell) End If '/House Editor If Len(Trim$(Npc(npcNum).AttackSay)) > 0 Then PlayerMsg Attacker, Trim$(Npc(npcNum).Name) & ": " & Trim$(Npc(npcNum).AttackSay), White End If End If End If End If ```