[MODERATOR NEEDED] READ THIS

I didnt know where to post this as ive never seen one of these games out yet, Soo, I made this source, its 2d, not 3d, a good langiage to mess around with, Language is Lingo, If a mod would nicely make a sub forum, Id willingly mod it, giving guides on how to use it, How to fix errors if there is errors, I'll provide screenshots at this time, as i still need to create a client, I'll provide little snickets of the codes, This game server ive created is for learning purposes, I do not expect people to like it, ive made it in my spare time, Taken a few months, i may not be a complete expert in C# But by god i sure am in Lingo,

Server Includes:
Quest System
You map you're own map's
NPC's
Pvp System
You can add your own items to source
You can add your own tiles to source
You can create / add your own scripts
Capture the Flag event
Lottery Event
Hack protection

Thats what's added so far, as i update i plan to upgrade the stuff inside of newer and fresher codes, the Source is FULLY working, no bugs.

Quote:

Originally Posted by HellCo

This is the Server showing 0 Errors
Shockwave Multiuser Server.

Reading the Multiuser.cfg file.

* RuntimeAttributes xtra has been loaded.

* DatabaseObjects xtra has been loaded.

* LingoVM xtra has been loaded.

-- "treasure loaded..."

FSO
WDM800-09169-37293-20442

# Allocating connections.
........................................
........................................
........................................
........................................
........................................

# Allocated 1000 connections.
# 2009/02/06 02:04:59 Waiting for incoming connections.

I'll now show a short snicket of the quest system

Code:

Global QuestList, NewQuest, FactionPowers

on GiveToPlayer(me, movie, group, user, fullmsg)
  set FileDT = string(fullmsg.content)
  set MyName = user.name
  set the itemdelimiter = ":"
  set WhichSlot = integer(item 2 of FileDT)
  set ItemToAdd = item 3 of FileDT
  set GiveToWho = item 1 of FileDT

  set P2ItemFile = file("C:\FSOServer\DAT\CHAR\" & string(GiveToWho) & "-i.txt").read
  set the itemdelimiter = "|"
  set MyInv = item 2 of P2ItemFile
  set the itemdelimiter = ":"
  set SpotToAddTo = 0
  if item 15 of MyInv = "" then set SpotToAddTo = 15
  if item 14 of MyInv = "" then set SpotToAddTo = 14
  if item 13 of MyInv = "" then set SpotToAddTo = 13
  if item 12 of MyInv = "" then set SpotToAddTo = 12
  if item 11 of MyInv = "" then set SpotToAddTo = 11
  if item 10 of MyInv = "" then set SpotToAddTo = 10
  if item 9 of MyInv = "" then set SpotToAddTo = 9
  if item 8 of MyInv = "" then set SpotToAddTo = 8
  if item 7 of MyInv = "" then set SpotToAddTo = 7
  if item 6 of MyInv = "" then set SpotToAddTo = 6
  if item 5 of MyInv = "" then set SpotToAddTo = 5
  if item 4 of MyInv = "" then set SpotToAddTo = 4
  if item 3 of MyInv = "" then set SpotToAddTo = 3
  if item 2 of MyInv = "" then set SpotToAddTo = 2
  if item 1 of MyInv = "" then set SpotToAddTo = 1
  if item 15 of MyInv = "NOTHING" then set SpotToAddTo = 15
  if item 14 of MyInv = "NOTHING" then set SpotToAddTo = 14
  if item 13 of MyInv = "NOTHING" then set SpotToAddTo = 13
  if item 12 of MyInv = "NOTHING" then set SpotToAddTo = 12
  if item 11 of MyInv = "NOTHING" then set SpotToAddTo = 11
  if item 10 of MyInv = "NOTHING" then set SpotToAddTo = 10
  if item 9 of MyInv = "NOTHING" then set SpotToAddTo = 9
  if item 8 of MyInv = "NOTHING" then set SpotToAddTo = 8
  if item 7 of MyInv = "NOTHING" then set SpotToAddTo = 7
  if item 6 of MyInv = "NOTHING" then set SpotToAddTo = 6
  if item 5 of MyInv = "NOTHING" then set SpotToAddTo = 5
  if item 4 of MyInv = "NOTHING" then set SpotToAddTo = 4
  if item 3 of MyInv = "NOTHING" then set SpotToAddTo = 3
  if item 2 of MyInv = "NOTHING" then set SpotToAddTo = 2
  if item 1 of MyInv = "NOTHING" then set SpotToAddTo = 1

If you would like to take part in this production, id be more than happy for help, I've done EVERYTHING myself, Please don't flame my work, Thank you.