*** empty log message ***

39 files changed, 7026 insertions, 0 deletions

diff --git a/src/astar.cpp b/src/astar.cpp
new file mode 100644
index 00000000..5fff9687
--- /dev/null
+++ b/src/astar.cpp
@@ -0,0 +1,326 @@
+#include "astar.h"
+#include "being.h"
+
+const int numberPeople = 1;
+  int onClosedList = 10;
+  const int notfinished = 0;// path-related constants
+
+  //Create needed arrays
+  //char get_path_walk [MAP_WIDTH][MAP_HEIGHT];
+  int openList[MAP_WIDTH*MAP_HEIGHT+2]; //1 dimensional array holding ID# of open list items
+  int whichList[MAP_WIDTH+1][MAP_HEIGHT+1];  //2 dimensional array used to record 
+//     whether a cell is on the open list or on the closed list.
+  int openX[MAP_WIDTH*MAP_HEIGHT+2]; //1d array stores the x location of an item on the open list
+  int openY[MAP_WIDTH*MAP_HEIGHT+2]; //1d array stores the y location of an item on the open list
+  int parentX[MAP_WIDTH+1][MAP_HEIGHT+1]; //2d array to store parent of each cell (x)
+  int parentY[MAP_WIDTH+1][MAP_HEIGHT+1]; //2d array to store parent of each cell (y)
+  int F_cost[MAP_WIDTH*MAP_HEIGHT+2];  //1d array to store F cost of a cell on the open list
+  int G_cost[MAP_WIDTH+1][MAP_HEIGHT+1];   //2d array to store G_cost cost for each cell.
+  int H_cost[MAP_WIDTH*MAP_HEIGHT+2];  //1d array to store H cost of a cell on the open list
+  int pathLength;     //stores length of the FOUND path for critter
+  int pathLocation;   //stores current position along the chosen path for critter    
+  int* path_bank ;
+
+  //Path reading variables
+  int pathStatus;
+  int xPath;
+  int yPath;
+
+/** Initialize pathfinder */
+void pathfinder_init() {
+  path_bank = (int*)malloc(4);
+}
+
+/** Exit pathfinder */
+void pathfinder_exit() {
+  free(path_bank);
+}
+
+/** Find path */
+PATH_NODE *find_path(int pathfinderID, int s_x, int s_y, int e_x, int e_y) {
+  int onOpenList=0, parentXval=0, parentYval=0,
+  a=0, b=0, m=0, u=0, v=0, temp=0, corner=0, numberOfOpenListItems=0,
+  addedGCost=0, tempG = 0, path = 0, x=0, y=0,
+  tempx, pathX, pathY, cellPosition,
+  newOpenListItemID=0;
+
+    // If starting location and target are in the same location...
+  if (s_x==e_x && s_y==e_y && pathLocation>0)return NULL;
+  else if (s_x==e_x && s_y==e_y && pathLocation==0)return NULL;
+
+   // If dest tile is NOT_WALKABLE, return that it's a NOT_FOUND path.
+  if(get_path_walk(e_x, e_y)==NOT_WALKABLE) {
+    xPath = s_x;
+    yPath = s_y;
+    return NULL;
+  }
+
+    // Reset some variables that need to be cleared
+  for(x=0;x<MAP_WIDTH;x++) {
+        for(y=0;y<MAP_HEIGHT;y++)
+      whichList [x][y] = 0;
+  }
+  onClosedList = 2; //changing the values of onOpenList and onClosed list is faster than redimming whichList() array
+  onOpenList = 1;
+  pathLength = NOT_STARTED;
+  pathLocation = NOT_STARTED;
+  G_cost[s_x][s_y] = 0; //reset starting square's G_cost value to 0
+
+    // Add the starting location to the open list of tiles to be checked.
+  numberOfOpenListItems = 1;
+  openList[1] = 1;//assign it as the top (and currently only) item in the open list, which is maintained as a binary heap (explained below)
+  openX[1] = s_x ; openY[1] = s_y;
+
+    // Do the following until a path is FOUND or deemed NOT_FOUND.
+  do   {
+
+        // If the open list is not empty, take the first cell off of the list.
+        // This is the lowest F cost cell on the open list.
+        if (numberOfOpenListItems != 0) {
+
+            // Pop the first item off the open list.
+            parentXval = openX[openList[1]];
+            parentYval = openY[openList[1]]; //record cell coordinates of the item
+            whichList[parentXval][parentYval] = onClosedList;//add the item to the closed list
+
+            // Open List = Binary Heap: Delete this item from the open list, which
+            numberOfOpenListItems = numberOfOpenListItems - 1;//reduce number of open list items by 1  
+
+            // Delete the top item in binary heap and reorder the heap, with the lowest F cost item rising to the top.
+            openList[1] = openList[numberOfOpenListItems+1];//move the last item in the heap up to slot #1
+            v = 1;
+
+            // Repeat the following until the new item in slot #1 sinks to its proper spot in the heap.
+            do {
+                u = v;    
+        if (2*u+1 <= numberOfOpenListItems) { //if both children exist
+                    //Check if the F cost of the parent is greater than each child.
+                    //Select the lowest of the two children.
+                    if(F_cost[openList[u]] >= F_cost[openList[2*u]])v = 2*u;
+                    if(F_cost[openList[v]] >= F_cost[openList[2*u+1]])v = 2*u+1;
+        } else {
+          if (2*u <= numberOfOpenListItems) { //if only child #1 exists
+                        //Check if the F cost of the parent is greater than child #1
+                        if (F_cost[openList[u]] >= F_cost[openList[2*u]])v = 2*u;
+                    }
+                }
+
+                if (u!=v) { // if parent's F is > one of its children, swap them
+                    temp = openList[u];
+                    openList[u] = openList[v];
+                    openList[v] = temp;
+                } else break; //otherwise, exit loop
+            } while (u!=v); //reorder the binary heap
+
+
+//  Check the adjacent squares. (Its "children" -- these path children
+//  are similar, conceptually, to the binary heap children mentioned
+//  above, but don't confuse them. They are different. Path children
+//  are portrayed in Demo 1 with grey pointers pointing toward
+//  their parents.) Add these adjacent child squares to the open list
+//  for later consideration if appropriate (see various if statements
+//  below).
+
+            for(b=parentYval-1;b<=parentYval+1;b++) {
+                for(a=parentXval-1;a<=parentXval+1;a++) {
+                    //  If not off the map (do this first to avoid array out-of-bounds errors)
+                    if(a!=-1 && b!=-1 && a!=MAP_WIDTH && b!=MAP_HEIGHT) {
+                        //  If not already on the closed list (items on the closed list have
+                        //  already been considered and can now be ignored).
+                        if(whichList[a][b]!=onClosedList) { 
+                            //  If not a wall/obstacle square.
+                            if (get_path_walk(a, b)!=NOT_WALKABLE) { 
+                                //  Don't cut across corners
+                                corner = WALKABLE;  
+                                if(a==parentXval-1) {
+                                    if(b==parentYval-1) {
+                                        if(get_path_walk(parentXval-1, parentYval)==NOT_WALKABLE || get_path_walk(parentXval, parentYval-1)==NOT_WALKABLE) // cera slash
+                      corner = NOT_WALKABLE;
+                                    } else if (b==parentYval+1) {
+                                        if(get_path_walk(parentXval, parentYval+1)==NOT_WALKABLE || get_path_walk(parentXval-1, parentYval)==NOT_WALKABLE) 
+                                            corner = NOT_WALKABLE; 
+                                    }
+                                } else if(a==parentXval+1) {
+                                    if(b==parentYval-1) {
+                                        if(get_path_walk(parentXval, parentYval-1)==NOT_WALKABLE || get_path_walk(parentXval+1, parentYval)==NOT_WALKABLE)
+                                            corner = NOT_WALKABLE;
+                                    } else if(b==parentYval+1) {
+                                        if(get_path_walk(parentXval+1, parentYval)==NOT_WALKABLE || get_path_walk(parentXval, parentYval+1)==NOT_WALKABLE)
+                                            corner = NOT_WALKABLE; 
+                                    }
+                                }
+
+                                if(corner==WALKABLE) {
+                                    // If not already on the open list, add it to the open list.      
+                                    if (whichList[a][b]!=onOpenList) {  
+                                        // Create a new open list item in the binary heap.
+                                        newOpenListItemID = newOpenListItemID + 1; //each new item has a unique ID #
+                                        m = numberOfOpenListItems+1;
+                                        openList[m] = newOpenListItemID;//place the new open list item (actually, its ID#) at the bottom of the heap
+                                        openX[newOpenListItemID] = a;
+                                        openY[newOpenListItemID] = b;//record the x and y coordinates of the new item
+
+                                        //Figure out its G_cost cost
+                                        if (abs(a-parentXval) == 1 && abs(b-parentYval) == 1)addedGCost = 14;//cost of going to diagonal squares  
+                                        else addedGCost = 10;//cost of going to non-diagonal squares        
+                                        G_cost[a][b] = G_cost[parentXval][parentYval] + addedGCost;
+
+                                        //Figure out its H and F costs and parent
+                                        H_cost[openList[m]] = 10*(abs(a - e_x) + abs(b - e_y));
+                                        F_cost[openList[m]] = G_cost[a][b] + H_cost[openList[m]];
+                                        parentX[a][b] = parentXval ; parentY[a][b] = parentYval;
+
+                                        //Move the new open list item to the proper place in the binary heap.
+                                        //Starting at the bottom, successively compare to parent items,
+                                        //swapping as needed until the item finds its place in the heap
+                                        //or bubbles all the way to the top (if it has the lowest F cost).
+                    while(m!=1) { // While item hasn't bubbled to the top (m=1)  
+                                            //Check if child's F cost is < parent's F cost. If so, swap them.  
+                                            if(F_cost[openList[m]]<=F_cost[openList[m/2]]) {
+                                                temp = openList[m/2];
+                                                openList[m/2] = openList[m];
+                                                openList[m] = temp;
+                                                m = m/2;
+                      } else break;
+                    }
+
+                                        numberOfOpenListItems = numberOfOpenListItems+1;//add one to the number of items in the heap
+                                        //Change whichList to show that the new item is on the open list.
+                                        whichList[a][b] = onOpenList;
+                  } else { // If whichList(a,b) = onOpenList
+                                    // If adjacent cell is already on the open list, check to see if this 
+                                    // path to that cell from the starting location is a better one. 
+                                    // If so, change the parent of the cell and its G_cost and F costs.  
+                                    //Figure out the G_cost cost of this possible new path
+                                        if(abs(a-parentXval)==1 && abs(b-parentYval)==1)addedGCost = 14;//cost of going to diagonal tiles  
+                                        else addedGCost = 10;//cost of going to non-diagonal tiles        
+
+                                        tempG = G_cost[parentXval][parentYval] + addedGCost;
+
+                                        // If this path is shorter (G_cost cost is lower) then change
+                                        // the parent cell, G_cost cost and F cost.     
+                    if(tempG<G_cost[a][b]) { //if G_cost cost is less,
+                                            parentX[a][b] = parentXval; //change the square's parent
+                                            parentY[a][b] = parentYval;
+                                            G_cost[a][b] = tempG;//change the G_cost cost      
+
+                                            // Because changing the G_cost cost also changes the F cost, if
+                                            // the item is on the open list we need to change the item's
+                                            // recorded F cost and its position on the open list to make
+                                            // sure that we maintain a properly ordered open list.
+
+                      for(int x=1;x<=numberOfOpenListItems;x++) { //look for the item in the heap
+                        if(openX[openList[x]]==a && openY[openList[x]]==b) { //item FOUND
+                                                    F_cost[openList[x]] = G_cost[a][b] + H_cost[openList[x]];//change the F cost
+                                                    //See if changing the F score bubbles the item up from it's current location in the heap
+                                                    m = x;
+                          while(m!=1) { //While item hasn't bubbled to the top (m=1)  
+                                                        //Check if child is < parent. If so, swap them.  
+                            if(F_cost[openList[m]]<F_cost[openList[m/2]]) {
+                                                            temp = openList[m/2];
+                                                            openList[m/2] = openList[m];
+                                                            openList[m] = temp;
+                                                            m = m/2;
+                            } else break;
+                          }
+                                                    break; //exit for x = loop
+                        } // If openX(openList(x)) = a
+                      } // For x = 1 To numberOfOpenListItems
+                    } // If tempG < G_cost(a,b)
+                  } // else If whichList(a,b) = onOpenList  
+                } // If not cutting a corner
+              } // If not a wall/obstacle square.
+            } // If not already on the closed list 
+          } // If not off the map
+                } // for (a = parentXval-1; a <= parentXval+1; a++){
+            } // for (b = parentYval-1; b <= parentYval+1; b++){
+    } else {// if (numberOfOpenListItems != 0)
+            // If open list is empty then there is no path.  
+            path = NOT_FOUND;
+      break;
+    }
+        //If target is added to open list then path has been FOUND.
+        if (whichList[e_x][e_y]==onOpenList) {
+            path = FOUND;
+      break;
+        }
+
+    } while (path!=FOUND && path!=NOT_FOUND);//Do until path is FOUND or deemed NOT_FOUND
+
+    // Save the path if it exists.
+  if (path == FOUND) {
+
+        // Working backwards from the target to the starting location by checking
+        // each cell's parent, figure out the length of the path.
+        pathX = e_x; pathY = e_y;
+        do {
+            //Look up the parent of the current cell.  
+            tempx = parentX[pathX][pathY];    
+            pathY = parentY[pathX][pathY];
+            pathX = tempx;
+
+            //Figure out the path length
+            pathLength = pathLength + 1;
+        } while (pathX != s_x || pathY != s_y);
+
+        // Resize the data bank to the right size in bytes
+        path_bank = (int*) realloc (path_bank, pathLength*8);
+
+        // Now copy the path information over to the databank. Since we are
+    // working backwards from the target to the start location, we copy
+        // the information to the data bank in reverse order. The result is
+        // a properly ordered set of path data, from the first step to the last.
+        pathX = e_x ; pathY = e_y;
+        cellPosition = pathLength*2;//start at the end  
+        do {
+            cellPosition = cellPosition - 2;//work backwards 2 integers
+            path_bank [cellPosition] = pathX;
+            path_bank [cellPosition+1] = pathY;
+            // Look up the parent of the current cell.  
+            tempx = parentX[pathX][pathY];    
+            pathY = parentY[pathX][pathY];
+            pathX = tempx;
+            // If we have reached the starting square, exit the loop.  
+        } while(pathX!=s_x || pathY!=s_y);
+
+		char stringa[80];
+		sprintf(stringa,"%i %i",s_x,s_y);
+
+    PATH_NODE *ret = NULL, *temp = NULL;
+    pathLocation = 1;
+		ret = create_path_node(s_x,s_y);
+		temp = ret;
+		//alert(stringa,"","","","",0,0);
+    while(pathLocation<pathLength) {
+			sprintf(stringa,"%i %i",path_bank[pathLocation*2-2], path_bank[pathLocation*2-1]);
+			//alert(stringa,"","","","",0,0);
+			temp->next = create_path_node(path_bank[pathLocation*2-2], path_bank[pathLocation*2-1]);
+			if(temp->next==NULL)ok("Error", "Unable to create path node");
+      temp = temp->next;
+      pathLocation++;
+    }
+		if(temp!=NULL)temp->next = create_path_node(e_x, e_y);
+		else ok("Error", "Null reference");
+    return ret;
+
+    }
+  return NULL; // Path not found
+}
+
+
+
+/** Read the path data */
+void ReadPath(int pathfinderID) {
+  //If a path exists, read the path data
+  //  from the pathbank.
+  pathLocation = 1; //set pathLocation to 1st step
+  while (pathLocation<pathLength) {
+        int a = path_bank [pathLocation*2-2];
+        int b = path_bank [pathLocation*2-1];
+    pathLocation = pathLocation + 1;
+    whichList[a][b] = 3;//draw dotted path
+  } 
+}
+
+
+
diff --git a/src/astar.h b/src/astar.h
new file mode 100644
index 00000000..4a9fa045
--- /dev/null
+++ b/src/astar.h
@@ -0,0 +1,25 @@
+#ifdef WIN32
+  #pragma warning (disable:4312)
+#endif
+
+#include <allegro.h>
+
+#include "map.h"
+#include "being.h"
+
+#define NOT_STARTED 0
+#define FOUND 1
+#define NOT_FOUND 2
+
+extern char walkability [MAP_WIDTH][MAP_HEIGHT];
+extern int whichList[MAP_WIDTH+1][MAP_HEIGHT+1];
+extern int G_cost[MAP_WIDTH+1][MAP_HEIGHT+1];
+
+void ReadPath(int pathfinderID,int currentX,int currentY, int pixelsPerFrame);
+int ReadPathX(int pathfinderID,int pathLocation);
+int ReadPathY(int pathfinderID,int pathLocation);
+void RenderScreen (bool stepByStep=false);
+PATH_NODE *find_path(int pathfinderID,int startingX, int startingY, int targetX, int targetY);
+void ReadPath(int pathfinderID);
+
+
diff --git a/src/being.cpp b/src/being.cpp
new file mode 100644
index 00000000..ca527882
--- /dev/null
+++ b/src/being.cpp
@@ -0,0 +1,210 @@
+/**
+
+  The Mana World
+  Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#include <stdio.h>
+#include <memory.h>
+#ifndef MACOSX
+  #include <malloc.h>
+#endif
+
+#ifdef LINUXPPC
+  #include <malloc.h>
+#endif
+
+#include "astar.h"
+#include "being.h"
+
+NODE *player_node = NULL;
+NODE *head = NULL; // First node of the list
+unsigned int count = 0; // Number of beings in the list
+
+/** Create a path node */
+PATH_NODE *create_path_node(unsigned short x, unsigned short y) {
+  PATH_NODE *ret = (PATH_NODE *)malloc(sizeof(PATH_NODE));
+  ret->x = x;
+  ret->y = y;
+  ret->next = NULL;
+  return ret;
+}
+
+/** Return a* path */
+PATH_NODE *calculate_path(unsigned short src_x, unsigned short src_y, unsigned short dest_x, unsigned short dest_y) {
+    return find_path(1, src_x, src_y, dest_x, dest_y);
+}
+
+/** Returns the first node of the list */
+NODE *get_head() {
+  return head;
+}
+
+/** Creates a empty node */
+NODE *create_node() {
+  NODE *node = (NODE *)malloc(sizeof(NODE));
+  node->id = 0;
+  node->job = 0;
+  memset(node->coordinates, 0, 3);
+  node->next = NULL;
+  node->action = 0;
+  node->frame = 0;
+  node->path = NULL;
+  node->speech = NULL;
+  node->speech_time = 0;
+	node->speech_color = makecol(255,255,255);
+	node->tick_time = 0;
+	node->speed = 150;
+	node->emotion = 0;
+	node->emotion_time = 0;
+	node->text_x = node->text_y = 0;
+  return node;
+}
+
+/** Returns number of beings in the list */
+unsigned int get_count() {
+  return count;
+}
+
+/** Removes all beings from the list */
+void empty() {
+  NODE *node = head;
+  NODE *next;
+  while(node) {
+    next = node->next;
+    free(node);
+    node = next;
+  }
+  count = 0;
+  head = NULL;
+}
+
+/** Add a node to the list */
+void add_node(NODE *node) {
+  NODE *temp = head;
+  if(temp) {
+    while(temp->next)
+      temp = temp->next;
+    temp->next = node;
+  } else head = node;
+  count++;
+}
+
+/** Remove a node */
+void remove_node(unsigned int id) {
+  unsigned int temp;
+  NODE *node_old, *node_new;
+  node_old = head;
+  node_new = NULL;
+    while(node_old) {
+    temp = get_id(node_old);
+        if(temp==id) {
+      if(node_new==NULL) {
+        head = node_old->next;
+        free(node_old);
+        count--;
+        return;
+      } else {
+                node_new->next = node_old->next;
+        free(node_old);
+        count--;
+        return;
+      }
+        } else {
+      node_new = node_old;
+      node_old = node_old->next;
+    }
+  }
+}
+
+/** Returns the id of a being in the list */
+unsigned int get_id(NODE *node) {
+  return node->id;
+}
+
+/** Find a NPC id based on its coordinates */
+unsigned int find_npc(unsigned short x, unsigned short y) {
+  NODE *node = head;
+  while(node) {
+    if((node->job>=46)&&(node->job<=125)) { // Check if is a NPC (only low job ids)
+      if((get_x(node->coordinates)==x)&&(get_y(node->coordinates)==y))
+        return node->id;
+      else node = node->next;
+    } else node = node->next;
+  }
+  return 0;
+}
+
+/** Find a MONSTER id based on its coordinates */
+unsigned int find_monster(unsigned short x, unsigned short y) {
+  NODE *node = head;
+  while(node) {
+    //if((node->job>=46)&&(node->job<=125)) { // Check if is a NPC (only low job ids)
+      if((get_x(node->coordinates)==x)&&(get_y(node->coordinates)==y))
+        return node->id;
+      else node = node->next;
+    //} else node = node->next;
+  }
+  return 0;
+}
+
+/** Return a specific id node */
+NODE *find_node(unsigned int id) {
+  NODE *node = head;
+  while(node)
+    if(node->id==id)
+      return node;
+    else node = node->next;
+  return NULL;
+}
+
+/** Sort beings in vertical order using bubble sort */
+void sort() {
+  NODE *p, *q, *r, *s, *temp;
+  s = NULL;
+
+  while(s!=head->next) {
+    r = p = head;
+    q = p->next;
+
+    while(p!=s) {
+      if(get_y(p->coordinates)>get_y(q->coordinates)) {
+        if(p==head) {
+          temp = q->next;
+          q->next = p;
+          p->next = temp;
+          head = q;
+          r = q;
+        } else {
+          temp = q->next;
+          q->next = p;
+          p->next = temp;
+          r->next = q;
+          r = q;
+        }
+      } else {
+        r = p;
+        p = p->next;
+      }
+      q = p->next;
+      if(q==s)s = p;
+    }
+  }
+}
diff --git a/src/being.h b/src/being.h
new file mode 100644
index 00000000..d1dcdb31
--- /dev/null
+++ b/src/being.h
@@ -0,0 +1,80 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#ifndef _BEING_H
+#define _BEING_H
+
+#include "./Net/protocol.h"
+
+#define ACTION_NODE  0
+#define PLAYER_NODE  1
+#define NPC_NODE     2
+#define MONSTER_NODE 3
+
+struct PATH_NODE {
+	unsigned short x, y;
+	PATH_NODE *next;
+};
+
+struct NODE {
+	unsigned int id;
+	short job;
+	char coordinates[3];
+	NODE *next;
+	unsigned char type;
+	unsigned char action;
+	unsigned char frame;
+	PATH_NODE *path;
+	char *speech;
+	unsigned char speech_time;
+	int speech_color;
+	short tick_time;
+	short speed;
+	unsigned char emotion;
+	unsigned char emotion_time;
+	int text_x, text_y; // temp solution to fix speech position
+};
+
+void empty();
+NODE *get_head();
+NODE *create_node();
+PATH_NODE *create_path_node(unsigned short x, unsigned short y);
+void add_node(NODE *node);
+NODE *find_node(unsigned int id);
+void remove_node(unsigned int id);
+unsigned int get_count();
+bool remove_being(char *data);
+void remove_being(unsigned int id);
+int get_beings_size();
+bool is_being(int id);
+void popup_being(unsigned char type, char *data);
+void move_being(char *data);
+PATH_NODE *calculate_path(unsigned short src_x, unsigned short src_y, unsigned short dest_x, unsigned short dest_y);
+unsigned int get_id(NODE *node);
+unsigned int find_npc(unsigned short x, unsigned short y);
+unsigned int find_monster(unsigned short x, unsigned short y);
+void sort();
+
+extern NODE *player_node;
+
+#endif
diff --git a/src/game.cpp b/src/game.cpp
new file mode 100644
index 00000000..ac90b56b
--- /dev/null
+++ b/src/game.cpp
@@ -0,0 +1,663 @@
+/**
+
+  The Mana World
+  Copyright 2004 The Mana World Development Team
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#include "main.h"
+#include "map.h"
+#include "being.h"
+#include "log.h"
+#include "./Gui/chat.h"
+#include "./Gui/gui.h"
+#include "./Gui/inventory.h"
+#include "./Graphic/SuperEagle.h"
+#include "./Graphic/graphic.h"
+#include "./Sound/sound.h"
+
+char map_path[480];
+
+extern TmwSound sound;
+
+unsigned short dest_x, dest_y, src_x, src_y;
+unsigned int player_x, player_y;
+bool refresh_beings = false;
+unsigned char keyb_state;
+volatile int tick_time;
+volatile bool refresh = false, action_time = false;
+
+#define MAX_TIME 10000
+
+/** Finite states machine to keep track
+		of player walking status (2 steps linear
+		prediction)
+		0 = Standing
+		1 = Walking without confirm packet
+		2 = Walking with confirm */
+char walk_status = 0;
+
+
+
+void refresh_time(void) {
+	tick_time++;
+	if(tick_time==MAX_TIME)tick_time = 0;
+}
+END_OF_FUNCTION(refresh_frame);
+
+void refresh_screen(void) {
+	refresh = true;
+}
+END_OF_FUNCTION(refresh_screen);
+
+int fps = 0, frame = 0;
+/** lets u only trigger an action every other second 
+			tmp. counts fps*/
+void second(void) {
+	action_time = true;
+	fps = (fps + frame)/2;
+	frame = 0;
+}
+END_OF_FUNCTION(second);
+
+/** Return elapsed time (Warning: very unsafe
+    function. It supposes the delay is always < 10s) */
+short get_elapsed_time(short start_time) {
+	if(start_time<=tick_time)
+		return tick_time-start_time;
+	else
+		return tick_time+(MAX_TIME-start_time);
+}
+
+/** Main game loop */
+void game() {
+  status("INIT");
+  do_init();
+	init_graphic();
+  while(state!=EXIT) {
+    status("INPUT");
+    do_input();
+    status("LOGIC");
+    do_logic();
+    if(refresh) {
+      status("GRAPHIC");
+      do_graphic();
+			refresh = false;
+    }		
+    status("PARSE");
+    do_parse();
+    status("FLUSH");
+    flush();
+  }
+
+  exit_graphic();
+  close_session();
+}
+
+/** Initialize game engine */
+void do_init() {
+
+  if(!load_map(map_path))error("Could not find map file");
+    
+  sound.StartMOD("Sound/Mods/somemp.xm",-1);
+
+	// Initialize timers
+  tick_time = 0;  
+	refresh = false;
+  LOCK_VARIABLE(tick_time);
+	LOCK_VARIABLE(refresh);
+  install_int_ex(refresh_time, MSEC_TO_TIMER(1));
+	install_int_ex(refresh_screen, /*MSEC_TO_TIMER(2000)*/BPS_TO_TIMER(75)); // Set max refresh rate to 75 fps
+	install_int_ex(second, BPS_TO_TIMER(1));  
+
+  // Interrupt drawing while in background
+  #ifdef WIN32
+    set_display_switch_mode(SWITCH_AMNESIA);
+  #else
+    set_display_switch_mode(SWITCH_PAUSE);
+  #endif	
+
+  // Initialize beings
+  empty();
+  player_node = create_node();
+	player_node->id = account_ID;
+  player_node->type = ACTION_NODE;
+  set_coordinates(player_node->coordinates, x, y, 0);
+	player_node->speed = 150;
+  add_node(player_node);
+  keyb_state = IDLE;
+
+	remove("packet.list");
+}
+
+/** Clean the engine */
+void do_exit() {
+}
+
+/** Check user input */
+void do_input() {
+
+  if(walk_status==0) {
+		int x = get_x(player_node->coordinates);
+		int y = get_y(player_node->coordinates);
+
+    if(key[KEY_UP]) {
+      if(get_walk(x, y-1)!=0) {
+        walk(x, y-1, NORTH);
+				walk_status = 1;
+        src_x = x;
+        src_y = y;
+        player_node->action = WALK;
+        player_node->tick_time = tick_time;
+        set_coordinates(player_node->coordinates, x, y-1, NORTH);
+      } else set_coordinates(player_node->coordinates, x, y, NORTH); 
+    } else if(key[KEY_DOWN]) {
+      if(get_walk(x, y+1)!=0) {
+        walk(x, y+1, SOUTH);
+				walk_status = 1;
+        src_x = x;
+        src_y = y;
+        player_node->action = WALK;
+        player_node->tick_time = tick_time;
+        set_coordinates(player_node->coordinates, x, y+1, SOUTH);
+      } else set_coordinates(player_node->coordinates, x, y, SOUTH); 
+    } else if(key[KEY_LEFT]) {
+      if(get_walk(x-1, y)!=0) {
+        walk(x-1, y, WEST);
+				walk_status = 1;
+        src_x = x;
+        src_y = y;
+        player_node->action = WALK;
+				player_node->tick_time = tick_time;
+        set_coordinates(player_node->coordinates, x-1, y, WEST);
+      } else set_coordinates(player_node->coordinates, x, y, WEST); 
+    } else if(key[KEY_RIGHT]) {
+      if(get_walk(x+1, y)!=0) {
+        walk(x+1, y, EAST);
+				walk_status = 1;
+        src_x = x;
+        src_y = y;
+        player_node->action = WALK;
+				player_node->tick_time = tick_time;
+        set_coordinates(player_node->coordinates, x+1, y, EAST);
+      } else set_coordinates(player_node->coordinates, x, y, EAST); 
+    }  
+	}
+
+  if(player_node->action==STAND)
+		if(key[KEY_LCONTROL]) {
+			player_node->action = ATTACK;
+			attack(x, y, get_direction(player_node->coordinates));
+			player_node->tick_time = tick_time;
+		}
+	
+  if(key[KEY_F1]) {
+    save_bitmap("./Graphic/screenshot.bmp",double_buffer,NULL);
+  } else if(key[KEY_F12]){
+    sound.SetAdjVol( 1, 1, 1);
+  } else if(key[KEY_F11]){
+    sound.SetAdjVol(-1,-1,-1);
+  }
+	if(key[KEY_F5] && action_time==true) {
+		if(player_node->action==STAND)
+      action(2, 0);
+		else if(player_node->action==SIT)
+			action(3, 0);
+		action_time = false;
+	}
+	if(key[KEY_F6] && action_time==true) {
+		inventory.toggle();
+		action_time = false;
+	}
+
+  if(key[KEY_ENTER]) {    
+    if(strcmp(speech, "")!=0) {
+       chatlog.chat_send(char_info[0].name, speech);
+       strcpy(speech,"");
+    }
+  } 
+
+  if(mouse_b&2) {
+    if(!show_npc_dialog) {
+      int npc_x = mouse_x/32+map_x/32;
+      int npc_y = mouse_y/32+map_y/32;
+      int id = find_npc(npc_x+1, npc_y+1);
+      if(id!=0) {
+        WFIFOW(0) = net_w_value(0x0090);
+        WFIFOL(2) = net_l_value(id);
+        WFIFOB(6) = 0;
+        WFIFOSET(7);
+      }
+    }
+  }
+
+  // Emotions, Skill dialog
+	if(key_shifts & KB_ALT_FLAG && action_time == true) {
+		if(player_node->emotion==0) {
+      unsigned char emotion = 0;
+      if(key[KEY_1])
+        emotion = 1;
+      else if(key[KEY_2])
+        emotion = 2;
+			else if(key[KEY_3])
+        emotion = 3;
+			else if(key[KEY_4])
+        emotion = 4;
+			else if(key[KEY_5])
+        emotion = 5;
+			else if(key[KEY_6])
+        emotion = 6;
+			else if(key[KEY_7])
+        emotion = 7;
+			else if(key[KEY_8])
+        emotion = 8;
+			else if(key[KEY_9])
+        emotion = 9;
+			else if(key[KEY_0])
+        emotion = 10;
+			if(emotion!=0) {
+        WFIFOW(0) = net_w_value(0x00bf);
+        WFIFOB(2) = emotion;
+        WFIFOSET(3);
+        action_time = false;
+			}
+		}
+
+		if(key[KEY_S]) {
+			show_skill_dialog = !show_skill_dialog;
+			action_time = false;
+		}
+	}
+	
+  if(key[KEY_ESC])state = EXIT;
+
+}
+
+
+
+/** Update game logic */
+void do_logic() {
+}
+
+/** Calculate packet length */
+int get_packet_length(short id) {
+    int len = get_length(id);
+  if(len==-1)len = RFIFOW(2);
+  return len;
+}
+
+/** Parse data received from map server into input buffer */
+void do_parse() {
+  unsigned short id;
+  char *temp;
+  char direction;
+  NODE *node = NULL;
+  int len;
+
+
+  // We need at least 2 bytes to identify a packet
+  if(in_size>=2) {
+    // Check if the received packet is complete
+    while(in_size>=(len = get_packet_length(id = RFIFOW(0)))) {
+      // Add infos to log file and dump the latest received packet
+      char pkt_nfo[60];
+      sprintf(pkt_nfo,"In-buffer size: %i Packet id: %x Packet length: %i",in_size,RFIFOW(0),len);
+      /*log_hex("Packet", "Packet_ID", RFIFOW(0));
+      log_int("Packet", "Packet_length", get_length(RFIFOW(0)));
+      log_int("Packet", "Packet_in_size", RFIFOW(2));
+      log_int("Packet", "In_size", in_size);
+      FILE *file = fopen("packet.dump", "wb");
+      for(int i=0;i<len;i++) {
+        fprintf(file, "%x|%i|%c ", RFIFOB(i), RFIFOB(i), RFIFOB(i));
+        if((i+1)%10==0)fprintf(file, "\n");
+      }
+      fclose(file);
+			file = fopen("packet.list", "ab");
+			fprintf(file, "%x\n", RFIFOW(0));
+			fclose(file);*/
+
+      // Parse packet based on their id                  
+      switch(id) {
+        // Received speech
+        case 0x008d:
+          temp = (char *)malloc(RFIFOW(2)-8);
+          memset(temp, '\0', RFIFOW(2)-8);
+          memcpy(temp, RFIFOP(8), RFIFOW(2)-8);
+          node = find_node(RFIFOL(4));
+          if(node!=NULL) {
+            if(node->speech!=NULL) {
+              free(node->speech);
+              node->speech = NULL;
+							node->speech_time = 0;
+            }
+            node->speech = temp;
+            node->speech_time = SPEECH_TIME;
+						node->speech_color = makecol(255, 255, 255);
+            chatlog.chat_log(node->speech, BY_OTHER, gui_font);
+          }
+          break;
+        case 0x008e:
+        case 0x009a:
+          temp = (char *)malloc(RFIFOW(2)-4);
+          memset(temp, '\0', RFIFOW(2)-4);
+          memcpy(temp, RFIFOP(4), RFIFOW(2)-4);
+          if(player_node->speech!=NULL) {
+            free(player_node->speech);
+            player_node->speech = NULL;
+            node->speech_time = 0;
+          }
+          player_node->speech = temp;
+          player_node->speech_time = SPEECH_TIME;
+					player_node->speech_color = makecol(255, 255, 255);
+          if(id==0x008e)
+            chatlog.chat_log(player_node->speech, BY_PLAYER, gui_font);
+          else
+            chatlog.chat_log(player_node->speech, BY_GM, gui_font);
+          break;
+        // Success to walk request
+        case 0x0087:
+					/*if(walk_status==1) {
+            if(get_dest_x(RFIFOP(6))==get_x(player_node->coordinates) && get_dest_y(RFIFOP(6))==get_y(player_node->coordinates))*/
+					if(walk_status==1)
+              walk_status = 2;
+            /*else {
+              walk_status = 0;
+              set_coordinates(player_node->coordinates, src_x, src_y, get_direction(player_node->coordinates));
+              player_node->action = STAND;
+						}
+					}*/
+          break;
+        // Add new being
+        case 0x0078:
+					if(find_node(RFIFOL(2))==NULL) {
+            node = create_node();
+            node->id = RFIFOL(2);
+						node->speed = RFIFOW(6);
+						if(node->speed==0)node->speed = 150; // Else division by 0 when calculating frame
+            node->job = RFIFOW(14);
+            memcpy(node->coordinates, RFIFOP(46), 3);
+            add_node(node);
+					}
+          break;
+        // Remove a being
+        case 0x0080:
+					node = find_node(RFIFOL(2));
+					if(node!=NULL) {
+						if(RFIFOB(6)==1) { // Death
+              if(node->job>110) {
+                node->action = MONSTER_DEAD;
+                node->frame = 0;
+                node->tick_time = tick_time;
+              } else remove_node(RFIFOL(2));
+						} else remove_node(RFIFOL(2));
+					}
+          break;
+        // Player moving
+        case 0x01d8:
+        case 0x01d9:
+          node = find_node(RFIFOL(2));
+          if(node==NULL) {
+            node = create_node();
+            node->id = RFIFOL(2);
+            node->job = RFIFOW(16);
+            memcpy(node->coordinates, RFIFOP(46), 3);
+            add_node(node);
+						node->tick_time = tick_time;
+						node->speed = RFIFOW(6);
+          }
+          break;
+        // Monster moving
+        case 0x007b:          
+          node = find_node(RFIFOL(2));
+					if(node==NULL) {
+						node = create_node();
+						node->action = STAND;
+						set_coordinates(node->coordinates, get_src_x(RFIFOP(50)), get_src_y(RFIFOP(50)), 0);
+						node->id = RFIFOL(2);
+						node->speed = RFIFOW(6);
+						node->job = RFIFOW(14);
+						add_node(node);
+					}
+          node->path = calculate_path(get_src_x(RFIFOP(50)),get_src_y(RFIFOP(50)),get_dest_x(RFIFOP(50)),get_dest_y(RFIFOP(50)));
+          if(node->path!=NULL) {
+            set_coordinates(node->coordinates, node->path->x, node->path->y, 0);
+            node->action = WALK;
+            node->tick_time = tick_time;
+          }
+          break;
+        // Being moving
+        case 0x01da:
+          node = find_node(RFIFOL(2));
+          if(node==NULL) {
+            node = create_node();
+            node->id = RFIFOL(2);
+            node->job = RFIFOW(14);
+            set_coordinates(node->coordinates, get_src_x(RFIFOP(50)), get_src_y(RFIFOP(50)), 0);
+            add_node(node);
+          }
+          if(node->action!=WALK) {
+          direction = get_direction(node->coordinates);
+          node->action = WALK;
+          if(get_dest_x(RFIFOP(50))>get_x(node->coordinates))direction = EAST;
+          else if(get_dest_x(RFIFOP(50))<get_x(node->coordinates))direction = WEST;
+          else if(get_dest_y(RFIFOP(50))>get_y(node->coordinates))direction = SOUTH;
+          else if(get_dest_y(RFIFOP(50))<get_y(node->coordinates))direction = NORTH;
+          else node->action = STAND;
+					if(node->action==WALK)node->tick_time = tick_time;
+          set_coordinates(node->coordinates, get_dest_x(RFIFOP(50)), get_dest_y(RFIFOP(50)), direction);          
+          }
+          break;
+        // NPC dialog
+        case 0x00b4:
+          if(!strstr(npc_text, RFIFOP(8))) {
+            strcat(npc_text, RFIFOP(8));
+            strcat(npc_text, "\n");
+            show_npc_dialog = 1;
+          }
+          break;
+        // Warp
+        case 0x0091:
+          memset(map_path, '\0', 480);
+          append_filename(map_path, "./data/map/", RFIFOP(2), 480);
+          if(load_map(map_path)) {
+            empty();
+            player_node = create_node();
+						player_node->job = 0;
+						player_node->action = STAND;
+						player_node->frame = 0;
+            player_node->type = ACTION_NODE;
+						player_node->speed = 150;
+						player_node->id = account_ID;
+            x = RFIFOW(18);
+            y = RFIFOW(20);
+            set_coordinates(player_node->coordinates, x, y, 0);
+            add_node(player_node);
+						walk_status = 0;
+            // Send "map loaded"
+            WFIFOW(0) = net_w_value(0x007d);
+            WFIFOSET(2);
+            while(out_size>0)flush();
+          } else error("Could not find map file");
+          break;
+				// Skill ...
+				case 0x011a:
+					break;
+				case 0x01a4:
+					break;
+				// Action failed (ex. sit because you have not reached the right level)
+				case 0x0110:
+					CHATSKILL action;
+
+					action.skill   = RFIFOW(2);
+					action.bskill  = RFIFOW(4);
+					action.unused  = RFIFOW(6);
+					action.success = RFIFOB(8);
+					action.reason  = RFIFOB(9);
+      		
+					if(action.success != SKILL_FAILED &&
+						action.bskill == BSKILL_EMOTE ) {
+						printf("Action: %d/%d", action.bskill, action.success);
+					}
+					chatlog.chat_log(action, gui_font);
+					break;
+				// Update stat values
+				case 0x00b0:
+					switch(RFIFOW(2)) {
+            case 5:
+              char_info->hp = RFIFOW(4);
+							break;
+						case 6:
+							char_info->max_hp = RFIFOW(4);
+							break;
+						case 7:
+							char_info->sp = RFIFOW(4);
+							break;
+						case 8:
+							char_info->max_sp = RFIFOW(4);
+							break;
+						case 11:
+							char_info->lv = RFIFOW(4);
+							break;
+					}
+					if(char_info->hp==0) {
+						ok("Message", "You're now dead, press ok to restart");
+						WFIFOW(0) = net_w_value(0x00b2);
+						WFIFOB(2) = 0;
+						WFIFOSET(3);
+					}
+					break;
+				// Stop walking
+				/*case 0x0088:  // Disabled because giving some problems
+					if(node = find_node(RFIFOL(2))) {
+						if(node->id!=player_node->id) {
+              node->action = STAND;
+              node->frame = 0;
+              set_coordinates(node->coordinates, RFIFOW(6), RFIFOW(8), get_direction(node->coordinates));
+						}
+					}
+          break;*/
+				// Damage, sit, stand up
+				case 0x008a:
+					switch(RFIFOB(26)) {
+            case 0: // Damage
+							node = find_node(RFIFOL(6));
+							if(node!=NULL) {
+                if(node->speech!=NULL) {
+                  free(node->speech);
+                  node->speech = NULL;
+                  node->speech_time = SPEECH_TIME;
+                }
+                node->speech = (char *)malloc(5);
+                memset(node->speech, '\0', 5);
+								if(RFIFOW(22)==0) {
+									sprintf(node->speech, "miss");
+									node->speech_color = makecol(255, 255, 0);
+								} else {
+                  sprintf(node->speech, "%i", RFIFOW(22));
+									if(node->id!=player_node->id)node->speech_color = makecol(0, 0, 255);
+									else node->speech_color = makecol(255, 0, 0);
+								}
+                node->speech_time = SPEECH_TIME;
+								if(RFIFOL(2)!=player_node->id) {
+                  node = find_node(RFIFOL(2));
+									if(node!=NULL) {
+										if(node->job<10)
+                      node->action = ATTACK;
+										else node->action = MONSTER_ATTACK;
+										node->frame = 0;
+									}
+								}
+							}
+              break;
+            case 2: // Sit
+            case 3: // Stand up
+              node = find_node(RFIFOL(2));
+							if(node!=NULL) {
+                if(RFIFOB(26)==2)
+                  node->action = SIT;
+                else if(RFIFOB(26)==3)
+                  node->action = STAND;
+							}
+              break;
+					}
+					break;
+				// Status change
+				case 0x00b1:
+					switch(RFIFOW(2)) {
+            case 1:
+							char_info->xp = RFIFOL(4);
+							break;
+						case 2:
+							char_info->job_xp = RFIFOL(4);
+							break;
+						case 14:
+							char_info->zeny = RFIFOL(4);
+							break;
+						// case 16 and 17 missing
+					}
+					break;
+				// Level up
+				case 0x019b:
+					if(RFIFOW(2)==0) {
+						ok("Info", "Level up!");
+					} else if(RFIFOW(2)==1) {
+						ok("Info", "Job level up!");
+					}
+					break;
+				// Emotion
+				case 0x00c0:
+					node = find_node(RFIFOL(2));
+					if(node) {
+						node->emotion = RFIFOB(6);
+						node->emotion_time = EMOTION_TIME;
+					}
+					break;
+				// Update skill values
+				case 0x0141:
+					switch(RFIFOL(2)) {
+            case 0x000d:
+							char_info->STR = RFIFOL(6) + RFIFOL(10); // Base + Bonus
+							break;
+            case 0x000e:
+							char_info->AGI = RFIFOL(6) + RFIFOL(10);
+							break;
+            case 0x000f:
+							char_info->VIT = RFIFOL(6) + RFIFOL(10);
+							break;
+            case 0x0010:
+							char_info->INT = RFIFOL(6) + RFIFOL(10);
+							break;
+            case 0x0011:
+							char_info->DEX = RFIFOL(6) + RFIFOL(10);
+							break;
+            case 0x0012:
+							char_info->LUK = RFIFOL(6) + RFIFOL(10);
+							break;
+					}
+					break;
+        // Manage non implemented packets
+        default:
+          //alert(pkt_nfo,"","","","",0,0);                  
+          break;
+      }
+      //alert(pkt_nfo,"","","","",0,0);                  
+            
+      RFIFOSKIP(len);
+    }
+  }
+}
diff --git a/src/game.h b/src/game.h
new file mode 100644
index 00000000..8a48d046
--- /dev/null
+++ b/src/game.h
@@ -0,0 +1,92 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#ifdef WIN32
+  #pragma warning (disable:4312)
+#endif
+
+#ifndef _GAME_H
+#define _GAME_H
+
+#include <allegro.h>
+#include <stdio.h>
+
+#include "main.h"
+#include "./Gui/gui.h"
+#include "./Gui/skill.h"
+#include "./Graphic/SuperEagle.h"
+
+#define SPEECH_TIME 40
+#define EMOTION_TIME 40
+#define SPEECH_MAX_TIME 100
+
+#define MAKECOL_WHITE makecol(255,255,255)
+#define MAKECOL_BLACK makecol(0,0,0)
+
+#define GET_WALKING_SPEECH_XCOORDS ((get_x(node->coordinates)-map_x+13)*16-25-(alfont_text_length(gui_font, node->speech)/2)-player_x-coeff_x*(16-4*node->frame))
+#define GET_WALKING_SPEECH_YCOORDS ((get_y(node->coordinates)-map_y+6)*16-55-player_y-coeff_y*(16-4*node->frame))
+
+#define GET_STANDING_SPEECH_XCOODRS ((get_x(node->coordinates)-map_x+13)*16-25-(alfont_text_length(gui_font, node->speech)/2)-player_x)
+#define GET_STANDING_SPEECH_YCOORDS ((get_y(node->coordinates)-map_y+6)*16-55-player_y)
+
+#define PLAYERSETS 4
+#define SIT   17
+#define STAND 0
+#define WALK 1
+#define MONSTER_ATTACK 5
+#define MONSTER_DEAD 9
+#define ATTACK 7
+#define LOCK 254
+#define IDLE 255
+
+#define SOUTH 0
+#define SW    1
+#define WEST  2
+#define NW    3
+#define NORTH 4
+#define NE    5
+#define EAST  6
+#define SE    7
+
+extern char map_path[480];
+extern DIALOG skill_dialog[];
+extern int fps, frame;
+extern char walk_status;
+extern unsigned short src_x, src_y, x, y;
+extern volatile int tick_time;
+
+void game();
+void do_init();
+void do_input();
+void do_parse();
+void do_graphic();
+void do_logic();
+void do_exit();
+int  get_packet_length(short);
+
+char get_x_offset(char, char);
+char get_y_offset(char, char);
+
+short get_elapsed_time(short start_time);
+
+#endif
diff --git a/src/graphic/graphic.cpp b/src/graphic/graphic.cpp
new file mode 100644
index 00000000..3a6e71a3
--- /dev/null
+++ b/src/graphic/graphic.cpp
@@ -0,0 +1,256 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+		By ElvenProgrammer aka Eugenio Favalli (umperio@users.sourceforge.net)
+
+*/
+
+#include "graphic.h"
+
+#define TILESET_W 480
+#define TILESET_H 320
+
+#ifdef WIN32
+#pragma warning (disable:4312)
+#endif
+
+#include <allegro.h>
+#include "../game.h"
+#include "../map.h"
+#include "../being.h"
+#include "../Gui/chat.h"
+#include "../Gui/inventory.h"
+#include "../data/graphic/gfx_data.h"
+
+BITMAP *buffer, *double_buffer, *chat_background;
+DATAFILE *tileset;
+char page_num;
+int map_x, map_y;
+DIALOG_PLAYER *chat_player, *npc_player, *skill_player;
+char speech[255] = "";
+char npc_text[1000] = "";
+TmwInventory inventory;
+Chat chatlog("chatlog.txt", 20);
+int show_npc_dialog = 0;
+bool show_skill_dialog = false;
+
+DIALOG npc_dialog[] = {
+   /* (dialog proc)     (x)   (y)   (w)   (h)   (fg)  (bg)  (key) (flags)  (d1)                    (d2)  (dp)              (dp2) (dp3) */
+   { tmw_dialog_proc,     300,  200,  260,  150,  0,    0,    0,    0,       0,                0,    (char *)"NPC",             NULL, NULL  },
+   { tmw_button_proc,     508,  326,  50,   20,   255,  0,    'c',  D_EXIT,  0,                0,    (char *)"&Close",         NULL, NULL  },
+   { tmw_textbox_proc,    304,  224,  252,  100,  0,    0,    0,    0,       0,                0,    npc_text,         NULL, NULL  },
+   { NULL,                0,    0,    0,    0,    0,    0,    0,    0,       0,                0,    NULL,             NULL, NULL  }
+};
+
+DIALOG chat_dialog[] = {
+   /* (dialog proc)         (x)   (y)   (w)  (h) (fg) (bg)  (key) (flags)   (d1)               (d2)           (dp)         (dp2) (dp3) */
+   { tmw_edit_proc,          0,  574,  592,  25,  0,    0,    'c',  0,       90,               0,           speech,        NULL, NULL  },
+   { NULL,                   0,    0,    0,   0,  0,    0,    0,    0,       0,                0,             NULL,        NULL, NULL  }
+};
+
+int get_x_offset(NODE *node) {
+	int offset = 0;
+	char direction = get_direction(node->coordinates);
+	if(node->action==WALK) {
+		if(direction==WEST || direction==EAST) {
+      offset = node->frame + 1;
+      if(offset==5)offset = 0;
+      offset *= 4;
+			if(direction==WEST) {
+				offset = -offset;
+				offset += 16;
+			} else offset -= 16;
+		}
+	}
+	return offset;
+}
+
+int get_y_offset(NODE *node) {
+	int offset = 0;
+	char direction = get_direction(node->coordinates);
+	if(node->action==WALK) {
+		if(direction==SOUTH || direction==NORTH) {
+      offset = node->frame + 1;
+      if(offset==5)offset = 0;
+      offset *= 4;
+			if(direction==NORTH) {
+				offset = -offset;
+				offset += 16;
+			} else offset -= 16;
+		}
+	}
+	return offset;
+}
+
+void init_graphic() {
+	tileset = load_datafile("./data/graphic/village.dat");
+	//if(!(gfx_capabilities & GFX_HW_VRAM_BLIT))allegro_message("Not supporting HW accelerated blit");
+	buffer = create_bitmap(SCREEN_W/2, SCREEN_H/2);
+	double_buffer = create_bitmap(SCREEN_W, SCREEN_H);
+
+  alfont_set_font_size(gui_font, 16);
+	clear_bitmap(screen);
+  chat_background = create_bitmap(592, 100);
+  clear_to_color(chat_background, makecol(0,0,0));
+
+	// Initialize gui
+  chat_player = init_dialog(chat_dialog, -1);
+  npc_player = init_dialog(npc_dialog, -1);
+	position_dialog(npc_dialog, 300, 200);
+	skill_player = init_dialog(skill_dialog, -1);
+  gui_bitmap = double_buffer;
+	alfont_text_mode(-1);
+	inventory.create(0, 0);
+}
+
+void do_graphic(void) {
+
+	map_x = (get_x(player_node->coordinates)-13)*16+get_x_offset(player_node);
+	map_y = (get_y(player_node->coordinates)-9)*16+get_y_offset(player_node);
+
+  int camera_x = map_x >> 4;
+	int camera_y = map_y >> 4;
+
+  int offset_x = map_x & 15;
+	int offset_y = map_y & 15;
+
+	sort();
+
+	for(int j=0;j<20;j++)
+		for(int i=0;i<26;i++) {
+			draw_rle_sprite(buffer, (RLE_SPRITE *)tileset[get_tile(i+camera_x, j+camera_y, 0)].dat, i*16-offset_x, j*16-offset_y);
+			if(get_tile(i+camera_x, j+camera_y, 1)!=0)draw_rle_sprite(buffer, (RLE_SPRITE *)tileset[get_tile(i+camera_x, j+camera_y, 1)].dat, i*16-offset_x, j*16-offset_y);
+		}
+
+  NODE *node = get_head();
+	NODE *old_node = NULL;
+	while(node) {
+    if((node->job>=100)&&(node->job<=110)) { // Draw a NPC
+			masked_blit((BITMAP *)graphic[NPCSET_BMP].dat, buffer, (get_direction(node->coordinates)/2+4*(node->job-100))*25, 0, (get_x(node->coordinates)-camera_x)*16-4-offset_x, (get_y(node->coordinates)-camera_y)*16-24-offset_y, 25, 40);  
+		} else if(node->job<10) { // Draw a player
+
+			node->text_x = (get_x(node->coordinates)-camera_x)*16-34+get_x_offset(node)-offset_x;
+			node->text_y = (get_y(node->coordinates)-camera_y)*16-36+get_y_offset(node)-offset_y;
+			masked_blit((BITMAP *)graphic[PLAYERSET_BMP].dat, buffer, 80*(get_direction(node->coordinates)/2), 60*(node->frame+node->action), node->text_x, node->text_y, 80, 60);
+
+			if(node->emotion!=0) {
+        draw_sprite(buffer, (BITMAP *)emotions[node->emotion-1].dat, (get_x(node->coordinates)-camera_x)*16-5+get_x_offset(node)-offset_x, (get_y(node->coordinates)-camera_y)*16-45+get_y_offset(node)-offset_y);
+        node->emotion_time--;
+        if(node->emotion_time==0)
+          node->emotion = 0;
+			}
+
+			if(node->action!=STAND && node->action!=SIT) {
+				node->frame = (get_elapsed_time(node->tick_time)*4)/(node->speed);
+	      if(node->frame>=4) {
+          node->frame = 0;
+					node->action = STAND;
+					node->tick_time;
+					if(node->id==player_node->id)
+            walk_status = 0;          
+				}
+			}
+
+		} else if(node->job==45) { // Draw a warp
+      //rectfill(buffer, (get_x(node->coordinates)-map_x)*16-player_x-get_x_offset(node->frame, get_direction(node->coordinates)), (get_y(node->coordinates)-map_y)*16-player_y-get_y_offset(node->frame, get_direction(node->coordinates)), (get_x(node->coordinates)-map_x)*16-player_x-get_x_offset(node->frame, get_direction(node->coordinates))+16, (get_y(node->coordinates)-map_y)*16-player_y-get_y_offset(node->frame, get_direction(node->coordinates))+16, makecol(0,0,255));
+    } else { // Draw a monster
+      
+			node->text_x = (get_x(node->coordinates)-camera_x)*16-20+get_x_offset(node)-offset_x;
+			node->text_y = (get_y(node->coordinates)-camera_y)*16-25+get_y_offset(node)-offset_y;
+
+      if(node->action==MONSTER_DEAD)node->frame = 0;
+			masked_blit((BITMAP *)graphic[MOBSET_BMP].dat, buffer, (get_direction(node->coordinates)/2)*60, 60*(node->frame+node->action), node->text_x, node->text_y, 60, 60);
+      if(node->action!=STAND) {
+        node->frame = (get_elapsed_time(node->tick_time)*4)/(node->speed);
+        if(node->frame>=4) {
+          if(node->action!=MONSTER_DEAD) {
+            if(node->path  && node->action!=MONSTER_DEAD) {
+              PATH_NODE *old = node->path;
+              set_coordinates(node->coordinates, node->path->x, node->path->y, 0);
+              node->path = node->path->next;
+              if(old!=NULL)
+                free(old);
+            } else node->action = STAND;
+            if(node->action!=MONSTER_DEAD)node->frame = 0;
+            node->tick_time = tick_time;
+					}
+        }
+      }
+    }
+		old_node = node;
+    node = node->next;
+		if(old_node->action==MONSTER_DEAD && old_node->frame>=4)
+			remove_node(old_node->id);
+	}
+
+	for(int j=0;j<20;j++)
+		for(int i=0;i<26;i++) {
+			if(get_tile(i+camera_x, j+camera_y, 2)!=0)draw_rle_sprite(buffer, (RLE_SPRITE *)tileset[get_tile(i+camera_x, j+camera_y, 2)].dat, i*16-offset_x, j*16-offset_y);
+		}
+
+	stretch_blit(buffer, double_buffer, 0, 0, 400, 300, 0, 0, 800, 600);
+
+	// Draw player speech
+  node = get_head();
+  while(node) {
+    if(node->speech!=NULL) {
+      alfont_textprintf_aa(double_buffer, gui_font, node->text_x+260-alfont_text_length(gui_font, node->speech)/2, node->text_y+100, node->speech_color, "%s", node->speech);
+      
+      node->speech_time--;
+      if(node->speech_time==0) {
+        free(node->speech);
+        node->speech = NULL;
+      }
+    }
+    node = node->next;
+  }
+
+	inventory.draw(double_buffer);
+
+	set_trans_blender(0, 0, 0, 110);
+  draw_trans_sprite(double_buffer, chat_background, 0, SCREEN_H-125);
+  
+  chatlog.chat_draw(double_buffer, 8, gui_font);
+  gui_update(chat_player);
+
+  if(show_npc_dialog) {
+    dialog_message(npc_dialog,MSG_DRAW,0,0);
+    if(!(show_npc_dialog = gui_update(npc_player)))strcpy(npc_text, "");
+  }
+
+	if(show_skill_dialog) {
+		update_skill_dialog();
+    if(gui_update(skill_player)==0)show_skill_dialog = false;
+	}
+  
+
+	alfont_textprintf_aa(double_buffer, gui_font, 0, 0, MAKECOL_WHITE, "FPS:%i", fps);
+
+	blit(double_buffer, screen, 0, 0, 0, 0, 800, 600);
+
+	frame++;
+}
+
+void exit_graphic() {
+	shutdown_dialog(npc_player);
+  shutdown_dialog(chat_player);
+	shutdown_dialog(skill_player);
+}
diff --git a/src/graphic/graphic.h b/src/graphic/graphic.h
new file mode 100644
index 00000000..c50def22
--- /dev/null
+++ b/src/graphic/graphic.h
@@ -0,0 +1,50 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+		By ElvenProgrammer aka Eugenio Favalli (umperio@users.sourceforge.net)
+
+*/
+
+#ifndef _GRAPHIC_H
+#define _GRAPHIC_H
+
+#ifdef WIN32
+#pragma warning (disable:4312)
+#endif
+
+#include <allegro.h>
+#include "../Gui/chat.h"
+#include "../Gui/inventory.h"
+
+extern BITMAP *buffer, *double_buffer;
+extern char speech[255];
+extern char npc_text[1000];
+extern Chat chatlog;
+extern bool show_skill_dialog;
+extern int show_npc_dialog;
+extern TmwInventory inventory;
+extern int map_x, map_y;
+
+void do_graphic(void);
+void init_graphic(void);
+void exit_graphic(void);
+
+#endif
diff --git a/src/graphic/super_eagle.cpp b/src/graphic/super_eagle.cpp
new file mode 100644
index 00000000..78bb6fea
--- /dev/null
+++ b/src/graphic/super_eagle.cpp
@@ -0,0 +1,450 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#include "SuperEagle.h"
+
+static uint32 colorMask = 0xF7DEF7DE;
+static uint32 lowPixelMask = 0x08210821;
+static uint32 qcolorMask = 0xE79CE79C;
+static uint32 qlowpixelMask = 0x18631863;
+static uint32 redblueMask = 0xF81F;
+static uint32 greenMask = 0x7E0;
+static int PixelsPerMask = 2;
+static int xsai_depth = 0;
+
+int Init_SuperEagle(int d) {
+	int minr = 0, ming = 0, minb = 0;
+	int i;
+	
+	if (d != 15 && d != 16 && d != 24 && d != 32)
+		return -1;
+
+	/* Get lowest color bit */	
+	for (i = 0; i < 255; i++) {
+		if (!minr)
+			minr = makecol(i, 0, 0);
+		if (!ming)
+			ming = makecol(0, i, 0);
+		if (!minb)
+			minb = makecol(0, 0, i);
+	}
+
+	colorMask = (makecol_depth(d, 255, 0, 0) - minr) | (makecol_depth(d, 0, 255, 0) - ming) | (makecol_depth(d, 0, 0, 255) - minb);
+	lowPixelMask = minr | ming | minb;
+	qcolorMask = (makecol_depth(d, 255, 0, 0) - 3 * minr) | (makecol_depth(d, 0, 255, 0) - 3 * ming) | (makecol_depth(d, 0, 0, 255) - 3 * minb);
+	qlowpixelMask = (minr * 3) | (ming * 3) | (minb * 3);
+	redblueMask = makecol_depth(d, 255, 0, 255);
+	greenMask = makecol_depth(d, 0, 255, 0);
+
+	PixelsPerMask = (d <= 16) ? 2 : 1;
+	
+	if (PixelsPerMask == 2) {
+		colorMask |= (colorMask << 16);
+		qcolorMask |= (qcolorMask << 16);
+		lowPixelMask |= (lowPixelMask << 16);
+		qlowpixelMask |= (qlowpixelMask << 16);
+	}
+
+	TRACE("Color Mask:       0x%lX\n", colorMask);
+	TRACE("Low Pixel Mask:   0x%lX\n", lowPixelMask);
+	TRACE("QColor Mask:      0x%lX\n", qcolorMask);
+	TRACE("QLow Pixel Mask:  0x%lX\n", qlowpixelMask);
+	
+	xsai_depth = d;
+
+	return 0;
+}
+
+/** unused /- kth5
+static int GetResult1(uint32 A, uint32 B, uint32 C, uint32 D) {
+	int x = 0;
+	int y = 0;
+	int r = 0;
+	if (A == C)
+		x += 1;
+	else if (B == C)
+		y += 1;
+	if (A == D)
+		x += 1;
+	else if (B == D)
+		y += 1;
+	if (x <= 1)
+		r += 1;
+	if (y <= 1)
+		r -= 1;
+	return r;
+}
+
+static int GetResult2(uint32 A, uint32 B, uint32 C, uint32 D, uint32 E) {
+	int x = 0;
+	int y = 0;
+	int r = 0;
+	if (A == C)
+		x += 1;
+	else if (B == C)
+		y += 1;
+	if (A == D)
+		x += 1;
+	else if (B == D)
+		y += 1;
+	if (x <= 1)
+		r -= 1;
+	if (y <= 1)
+		r += 1;
+	return r;
+}*/
+
+
+#define GET_RESULT(A, B, C, D) ((A != C || A != D) - (B != C || B != D))
+
+#define INTERPOLATE(A, B) (((A & colorMask) >> 1) + ((B & colorMask) >> 1) + (A & B & lowPixelMask))
+
+#define Q_INTERPOLATE(A, B, C, D) ((A & qcolorMask) >> 2) + ((B & qcolorMask) >> 2) + ((C & qcolorMask) >> 2) + ((D & qcolorMask) >> 2) \
+	+ ((((A & qlowpixelMask) + (B & qlowpixelMask) + (C & qlowpixelMask) + (D & qlowpixelMask)) >> 2) & qlowpixelMask)
+
+
+/* Clipping Macro, stolen from Allegro, modified to work with 2xSaI */
+#define BLIT_CLIP2(src, dest, s_x, s_y, d_x, d_y, w, h, xscale, yscale)      \
+   /* check for ridiculous cases */                                          \
+   if ((s_x >= src->cr) || (s_y >= src->cb) ||                               \
+       (d_x >= dest->cr) || (d_y >= dest->cb))                               \
+      return;                                                                \
+                                                                             \
+   if ((s_x + w < src->cl) || (s_y + h < src->ct) ||                         \
+       (d_x + w * xscale < dest->cl) || (d_y + h * yscale < dest->ct))       \
+      return;                                                                \
+                                                                             \
+   if (xscale < 1 || yscale < 1)                                             \
+      return;                                                                \
+                                                                             \
+   /* clip src left */                                                       \
+   if (s_x < src->cl) {                                                      \
+      w += s_x;                                                              \
+      d_x -= s_x * xscale;                                                   \
+      s_x = src->cl;                                                         \
+   }                                                                         \
+                                                                             \
+   /* clip src top */                                                        \
+   if (s_y < src->ct) {                                                      \
+      h += s_y;                                                              \
+      d_y -= s_y * yscale;                                                   \
+      s_y = src->ct;                                                         \
+   }                                                                         \
+                                                                             \
+   /* clip src right */                                                      \
+   if (s_x + w > src->cr)                                                    \
+      w = src->cr - s_x;                                                     \
+                                                                             \
+   /* clip src bottom */                                                     \
+   if (s_y + h > src->cb)                                                    \
+      h = src->cb - s_y;                                                     \
+                                                                             \
+   /* clip dest left */                                                      \
+   if (d_x < dest->cl) {                                                     \
+      d_x -= dest->cl;                                                       \
+      w += d_x / xscale;                                                     \
+      s_x -= d_x / xscale;                                                   \
+      d_x = dest->cl;                                                        \
+   }                                                                         \
+                                                                             \
+   /* clip dest top */                                                       \
+   if (d_y < dest->ct) {                                                     \
+      d_y -= dest->ct;                                                       \
+      h += d_y / yscale;                                                     \
+      s_y -= d_y / yscale;                                                   \
+      d_y = dest->ct;                                                        \
+   }                                                                         \
+                                                                             \
+   /* clip dest right */                                                     \
+   if (d_x + w * xscale > dest->cr)                                          \
+      w = (dest->cr - d_x) / xscale;                                         \
+                                                                             \
+   /* clip dest bottom */                                                    \
+   if (d_y + h * yscale > dest->cb)                                          \
+      h = (dest->cb - d_y) / yscale;                                         \
+                                                                             \
+   /* bottle out if zero size */                                             \
+   if ((w <= 0) || (h <= 0))                                                 \
+      return;
+
+
+static unsigned char *src_line[4];
+static unsigned char *dst_line[2];
+
+
+
+void SuperEagle(BITMAP * src, BITMAP * dest, int s_x, int s_y, int d_x, int d_y, int w, int h) {
+	int sbpp, dbpp;
+
+	BITMAP *dst2 = NULL;
+
+	if (!src || !dest)
+		return;
+
+	sbpp = bitmap_color_depth(src);
+	dbpp = bitmap_color_depth(dest);
+
+	if ((sbpp != xsai_depth) || (sbpp != dbpp))	/* Must be same color depth */
+		return;
+
+	BLIT_CLIP2(src, dest, s_x, s_y, d_x, d_y, w, h, 2, 2);	
+		
+	if (w < 4 || h < 4) {  /* Image is too small to be 2xSaI'ed. */
+		stretch_blit(src, dest, s_x, s_y, w, h, d_x, d_y, w * 2, h * 2);
+		return;
+	}	
+	
+	sbpp = BYTES_PER_PIXEL(sbpp);
+	if (d_x || d_y)
+		dst2 = create_sub_bitmap(dest, d_x, d_y, w * 2, h * 2);
+	
+	SuperEagle_ex(src->line[s_y] + s_x * sbpp, (unsigned int)(src->line[1] - src->line[0]), NULL, dst2 ? dst2 : dest, w, h);
+	
+	if (dst2)
+		destroy_bitmap(dst2);
+	
+	return;
+}
+
+void SuperEagle_ex(uint8 *src, uint32 src_pitch, uint8 *unused, BITMAP *dest, uint32 width, uint32 height) {
+
+	int j, v;
+	unsigned int x, y;
+	int sbpp = BYTES_PER_PIXEL(bitmap_color_depth(dest));
+	unsigned long color[12];
+
+	/* Point to the first 3 lines. */
+	src_line[0] = src;
+	src_line[1] = src;
+	src_line[2] = src + src_pitch;
+	src_line[3] = src + src_pitch * 2;
+	
+	/* Can we write the results directly? */
+	if (is_video_bitmap(dest) || is_planar_bitmap(dest)) {
+		dst_line[0] = (unsigned char *)malloc(sizeof(char) * sbpp * width);
+		dst_line[1] = (unsigned char *)malloc(sizeof(char) * sbpp * width);
+		v = 1;
+	}
+	else {
+		dst_line[0] = dest->line[0];
+		dst_line[1] = dest->line[1];
+		v = 0;
+	}
+	
+	/* Set destination */
+	bmp_select(dest);
+
+	x = 0, y = 0;
+	
+	if (PixelsPerMask == 2) {
+		unsigned short *sbp;
+		sbp = (unsigned short*)src_line[0];
+		color[0] = *sbp;       color[1] = color[0];   color[2] = color[0];    color[3] = color[0];
+		color[4] = *(sbp + 1); color[5] = *(sbp + 2);
+		sbp = (unsigned short*)src_line[2];
+		color[6] = *sbp;     color[7] = color[6];     color[8] = *(sbp + 1); color[9] = *(sbp + 2);
+		sbp = (unsigned short*)src_line[3];
+		color[10] = *sbp;    color[11] = *(sbp + 1); 
+	}
+	else {
+		unsigned long *lbp;
+		lbp = (unsigned long*)src_line[0];
+		color[0] = *lbp;       color[1] = color[0];   color[2] = color[0];    color[3] = color[0];
+		color[4] = *(lbp + 1); color[5] = *(lbp + 2);
+		lbp = (unsigned long*)src_line[2];
+		color[6] = *lbp;     color[7] = color[6];     color[8] = *(lbp + 1); color[9] = *(lbp + 2);
+		lbp = (unsigned long*)src_line[3];
+		color[10] = *lbp;    color[11] = *(lbp + 1);
+	}
+
+	for (y = 0; y < height; y++) {
+	
+		/* Todo: x = width - 2, x = width - 1 */
+		
+		for (x = 0; x < width; x++) {
+			unsigned long product1a, product1b, product2a, product2b;
+
+//---------------------------------------     B1 B2           0  1
+//                                         4  5  6  S2 ->  2  3  4  5
+//                                         1  2  3  S1     6  7  8  9
+//                                            A1 A2          10 11
+
+			if (color[7] == color[4] && color[3] != color[8]) {
+				product1b = product2a = color[7];
+
+				if ((color[6] == color[7]) || (color[4] == color[1]))
+					product1a = INTERPOLATE(color[7], INTERPOLATE(color[7], color[3]));
+				else
+					product1a = INTERPOLATE(color[3], color[4]);
+
+				if ((color[4] == color[5]) || (color[7] == color[10]))
+					product2b = INTERPOLATE(color[7], INTERPOLATE(color[7], color[8]));
+				else
+					product2b = INTERPOLATE(color[7], color[8]);
+			}
+			else if (color[3] == color[8] && color[7] != color[4]) {
+				product2b = product1a = color[3];
+
+				if ((color[0] == color[3]) || (color[5] == color[9]))
+					product1b = INTERPOLATE(color[3], INTERPOLATE(color[3], color[4]));
+				else
+					product1b = INTERPOLATE(color[3], color[1]);
+
+				if ((color[8] == color[11]) || (color[2] == color[3]))
+					product2a = INTERPOLATE(color[3], INTERPOLATE(color[3], color[2]));
+				else
+					product2a = INTERPOLATE(color[7], color[8]);
+
+			}
+			else if (color[3] == color[8] && color[7] == color[4]) {
+				register int r = 0;
+
+				r += GET_RESULT(color[4], color[3], color[6], color[10]);
+				r += GET_RESULT(color[4], color[3], color[2], color[0]);
+				r += GET_RESULT(color[4], color[3], color[11], color[9]);
+				r += GET_RESULT(color[4], color[3], color[1], color[5]);
+
+				if (r > 0) {
+					product1b = product2a = color[7];
+					product1a = product2b = INTERPOLATE(color[3], color[4]);
+				}
+				else if (r < 0) {
+					product2b = product1a = color[3];
+					product1b = product2a = INTERPOLATE(color[3], color[4]);
+				}
+				else {
+					product2b = product1a = color[3];
+					product1b = product2a = color[7];
+				}
+			}
+			else {
+				product2b = product1a = INTERPOLATE(color[7], color[4]);
+				product2b = Q_INTERPOLATE(color[8], color[8], color[8], product2b);
+				product1a = Q_INTERPOLATE(color[3], color[3], color[3], product1a);
+
+				product2a = product1b = INTERPOLATE(color[3], color[8]);
+				product2a = Q_INTERPOLATE(color[7], color[7], color[7], product2a);
+				product1b = Q_INTERPOLATE(color[4], color[4], color[4], product1b);
+			}
+
+			if (PixelsPerMask == 2) {
+				*((unsigned long *) (&dst_line[0][x * 4])) = product1a | (product1b << 16);
+				*((unsigned long *) (&dst_line[1][x * 4])) = product2a | (product2b << 16);
+			}
+			else {
+				*((unsigned long *) (&dst_line[0][x * 8])) = product1a;
+				*((unsigned long *) (&dst_line[0][x * 8 + 4])) = product1b;
+				*((unsigned long *) (&dst_line[1][x * 8])) = product2a;
+				*((unsigned long *) (&dst_line[1][x * 8 + 4])) = product2b;
+			}
+			
+			/* Move color matrix forward */
+			color[0] = color[1]; 
+			color[2] = color[3]; color[3] = color[4]; color[4] = color[5];
+			color[6] = color[7]; color[7] = color[8]; color[8] = color[9]; 
+			color[10] = color[11];
+			
+			if (x < width - 2) {
+				x += 2;
+				if (PixelsPerMask == 2) {
+					color[1] = *(((unsigned short*)src_line[0]) + x);
+					if (x < width) {
+						color[5] = *(((unsigned short*)src_line[1]) + x + 1);
+						color[9] = *(((unsigned short*)src_line[2]) + x + 1);
+					}
+					color[11] = *(((unsigned short*)src_line[3]) + x);
+				}
+				else {
+					color[1] = *(((unsigned long*)src_line[0]) + x);
+					if (x < width) {
+						color[5] = *(((unsigned long*)src_line[1]) + x + 1);
+						color[9] = *(((unsigned long*)src_line[2]) + x + 1);
+					}
+					color[11] = *(((unsigned long*)src_line[3]) + x);
+				}
+				x -= 2;
+			}
+		}
+
+		/* We're done with one line, so we shift the source lines up */
+		src_line[0] = src_line[1];
+		src_line[1] = src_line[2];
+		src_line[2] = src_line[3];		
+
+		/* Read next line */
+		if (y + 3 >= height)
+			src_line[3] = src_line[2];
+		else
+			src_line[3] = src_line[2] + src_pitch;
+			
+		/* Then shift the color matrix up */
+		if (PixelsPerMask == 2) {
+			unsigned short *sbp;
+			sbp = (unsigned short*)src_line[0];
+			color[0] = *sbp;     color[1] = *(sbp + 1);
+			sbp = (unsigned short*)src_line[1];
+			color[2] = *sbp;     color[3] = color[2];    color[4] = *(sbp + 1);  color[5] = *(sbp + 2);
+			sbp = (unsigned short*)src_line[2];
+			color[6] = *sbp;     color[7] = color[6];    color[8] = *(sbp + 1);  color[9] = *(sbp + 2);
+			sbp = (unsigned short*)src_line[3];
+			color[10] = *sbp;    color[11] = *(sbp + 1);
+		}
+		else {
+			unsigned long *lbp;
+			lbp = (unsigned long*)src_line[0];
+			color[0] = *lbp;     color[1] = *(lbp + 1);
+			lbp = (unsigned long*)src_line[1];
+			color[2] = *lbp;     color[3] = color[2];    color[4] = *(lbp + 1);  color[5] = *(lbp + 2);
+			lbp = (unsigned long*)src_line[2];
+			color[6] = *lbp;     color[7] = color[6];    color[8] = *(lbp + 1);  color[9] = *(lbp + 2);
+			lbp = (unsigned long*)src_line[3];
+			color[10] = *lbp;    color[11] = *(lbp + 1);
+		}
+
+
+		/* Write the 2 lines, if not already done so */
+		if (v) {
+			unsigned long dst_addr;
+		
+			dst_addr = bmp_write_line(dest, y * 2);
+			for (j = 0; j < dest->w * sbpp; j += sizeof(long))
+				bmp_write32(dst_addr + j, *((unsigned long *) (dst_line[0] + j)));
+				
+			dst_addr = bmp_write_line(dest, y * 2 + 1);
+			for (j = 0; j < dest->w * sbpp; j += sizeof(long))
+				bmp_write32(dst_addr + j, *((unsigned long *) (dst_line[1] + j)));
+		}
+		else {
+			if (y < height - 1) {
+				dst_line[0] = dest->line[y * 2 + 2];
+				dst_line[1] = dest->line[y * 2 + 3];
+			}
+		}
+	}
+	bmp_unwrite_line(dest);
+	
+	if (v) {
+		free(dst_line[0]);
+		free(dst_line[1]);
+	}
+}
diff --git a/src/graphic/super_eagle.h b/src/graphic/super_eagle.h
new file mode 100644
index 00000000..64c763db
--- /dev/null
+++ b/src/graphic/super_eagle.h
@@ -0,0 +1,44 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#ifdef WIN32
+  #pragma warning (disable:4312)
+#endif
+
+#ifndef _SUPER_EAGLE_H
+#define _SUPER_EAGLE_H
+
+#include <string.h>
+#include <allegro.h>
+#include <allegro/internal/aintern.h>
+
+#define uint32 unsigned long
+#define uint16 unsigned short
+#define uint8 unsigned char
+
+void SuperEagle(BITMAP * src, BITMAP * dest, int s_x, int s_y, int d_x, int d_y, int w, int h);
+void SuperEagle_ex(uint8 *src, uint32 src_pitch, uint8 *unused, BITMAP *dest, uint32 width, uint32 height);
+
+int Init_SuperEagle(int d);
+
+#endif
diff --git a/src/gui/char_select.cpp b/src/gui/char_select.cpp
new file mode 100644
index 00000000..e58a8d73
--- /dev/null
+++ b/src/gui/char_select.cpp
@@ -0,0 +1,221 @@
+/**
+
+        The Mana World
+        Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#include "char_select.h"
+#include "../Graphic/graphic.h"
+
+char button_state[3];
+char address[41];
+char name[25];
+
+DIALOG char_select_dialog[] = {
+   /* (dialog proc)     (x)   (y)   (w)   (h)   (fg)  (bg)  (key) (flags)     (d1)                    (d2)  (dp)                          (dp2) (dp3) */
+   { tmw_dialog_proc,   300,  240,  200,  208,    0,  -1,    0,    0,          0,                 0,   (char*)"Char select",                      NULL, NULL  },
+   { tmw_text_proc,     308,  268,  192,   10,    0,   0,    0,    0,          0,                 0,                   NULL,                      NULL, NULL  },
+   { tmw_bitmap_proc,   304,  282,  192,   70,    0,   0,    0,    0,          80,                60,             playerset,                      NULL, NULL  },
+   { tmw_button_proc,   398,  426,   44,   18,    0,  -1,    'o',  D_EXIT,    -1,                 0,           (char*)"&Ok",                      NULL, NULL  },
+   { tmw_button_proc,   446,  426,   44,   18,    0,  -1,    'c',  D_EXIT,    -1,                 0,       (char*)"&Cancel",                      NULL, NULL  },
+   { tmw_button_proc,   304,  426,   44,   18,    0,   0,    0,    D_EXIT,     0,                 0,           button_state,                      NULL, NULL  }, 
+/* { gui_button_proc,   304,  356,   20,   20,    0,   0,    0,    0,          0,                 0,                    "<",                      NULL, NULL  },  
+   { gui_button_proc,   328,  356,   20,   20,    0,   0,    0,    0,          0,                 0,                    ">",                      NULL, NULL  },  */
+   { NULL,                0,    0,   0,     0,    0,   0,    0,    0,          0,                 0,                   NULL,                      NULL, NULL  },
+};
+
+DIALOG char_create_dialog[] = {
+   /* (dialog proc)     (x)   (y)   (w)   (h)   (fg)  (bg)  (key) (flags)     (d1)                    (d2)  (dp)                          (dp2) (dp3) */
+   { tmw_dialog_proc,   276,  240,  248,  116,    0,  -1,    0,    0,          0,                 0,   (char*)"Char create",                      NULL, NULL  },
+   { tmw_text_proc,     280,  268,  192,   20,    0,   0,    0,    0,          0,                 0,       (char *)"Name: ",                      NULL, NULL  },
+   { tmw_edit_proc,     336,  268,  162,   20,    0,   0,    0,    0,         24,                 0,                   name,                      NULL, NULL  },
+   { tmw_button_proc,   398,  334,   44,   18,    0,  -1,    'o',  D_EXIT,    -1,                 0,           (char*)"&Ok",                      NULL, NULL  },
+   { tmw_button_proc,   446,  334,   44,   18,    0,  -1,    'c',  D_EXIT,    -1,                 0,       (char*)"&Cancel",                      NULL, NULL  },
+   { NULL,                0,    0,   0,     0,    0,   0,    0,    0,          0,                 0,                   NULL,                      NULL, NULL  },
+};
+
+void char_select() {
+  state = LOGIN;
+  if(n_character>0) {
+    char_select_dialog[1].dp = char_info->name;
+		char_select_dialog[1].x = 400-alfont_text_length(gui_font, char_info->name)/2;
+		char_select_dialog[2].dp = playerset;
+		if(playerset==NULL)ok("Error", "Playerset not loaded");
+		strcpy(button_state, "Del");
+		char_select_dialog[3].flags &= D_CLOSE;
+	} else {
+		char *temp = (char *)malloc(3);
+		strcpy(temp, "");
+		char_select_dialog[1].dp = temp;
+		char_select_dialog[3].flags |= D_DISABLED;
+		char_select_dialog[2].dp = NULL;
+		strcpy(button_state, "New");
+	}
+	//centre_dialog(char_select_dialog);
+	DIALOG_PLAYER *player = init_dialog(char_select_dialog, -1);
+	int gui_exit = 1;
+	while ((!key[KEY_ESC])&&(gui_exit)&&(!key[KEY_ENTER])) {
+		clear_bitmap(buffer);
+		if(stretch_mode!=0)blit((BITMAP *)graphic[LOGIN_BMP].dat, buffer, 0, 0, 80, 60, 640, 480);
+		else blit((BITMAP *)graphic[LOGIN_BMP].dat, buffer, 0, 0, -120, -90, 640, 480);
+		gui_exit = gui_update(player);
+		blit(buffer, screen, 0, 0, 0, 0, 800, 600);
+	}
+	gui_exit = shutdown_dialog(player);
+	if((gui_exit==3)||(key[KEY_ENTER]))server_char_select();
+	else if(gui_exit==4)close_session();
+	else if(gui_exit==5)server_char_delete();
+	if(state==LOGIN)close_session();
+}
+
+void server_char_select() {
+  // Request character selection
+  WFIFOW(0) = net_w_value(0x0066);
+  WFIFOB(2) = net_b_value(0);
+  WFIFOSET(3);
+
+  while((in_size<3)||(out_size>0))flush();
+  log_hex("Char_Select_Packet", "Packet_ID", RFIFOW(0));
+  log_int("Char_Select_Packet", "Packet_length", get_length(RFIFOW(0)));
+  log_int("Char_Select_Packet", "Packet_in_size", RFIFOW(2));
+  log_int("Char_Select_Packet", "In_size", in_size);
+
+  if(RFIFOW(0)==0x0071) {         
+    while(in_size<28)flush();
+    char_ID = RFIFOL(2);
+    memset(map_path, '\0', 480);
+    append_filename(map_path, "./data/map/", RFIFOP(6), 480);
+    map_address = RFIFOL(22);
+    map_port = RFIFOW(26);
+    state = GAME;
+
+    log("Player", "map", map_name);
+    log("Char_Select_packet", "server_address", iptostring(map_address));
+    log_int("Char_Select_packet", "server_port", map_port);
+    RFIFOSKIP(28);
+    close_session();
+  } else if(RFIFOW(0)==0x006c) {
+    switch(RFIFOB(2)) {
+      case 0:
+        ok("Error", "Access denied");
+        break;
+      case 1:
+        ok("Error", "Cannot use this ID");
+        break;
+    }
+    state = CHAR_SELECT;
+    RFIFOSKIP(3);
+  }
+  // Todo: add other packets
+}
+
+void server_char_delete() {
+  state = CHAR_SELECT;
+  // Delete a character
+  if(!strcmp(button_state, "Del")) {
+    if(yes_no("Confirm", "Are you sure?")==0) {
+      // Request character deletion
+      WFIFOW(0) = net_w_value(0x0068);
+      WFIFOL(2) = net_l_value(char_info[0].id);
+      WFIFOSET(46);
+
+      while((in_size<2)||(out_size>0))flush();
+      if(RFIFOW(0)==0x006f) {           
+        RFIFOSKIP(2);
+        ok("Info", "Player deleted");
+        free(char_info);
+        n_character = 0;
+      } else if(RFIFOW(0)==0x006c) {
+        switch(RFIFOB(2)) {
+          case 0:
+            ok("Error", "Access denied");
+            break;
+          case 1:
+            ok("Error", "Cannot use this ID");
+            break;
+        }
+        RFIFOSKIP(3);
+      } else ok("Error", "Unknown error");
+    }
+  // Create a new character
+  } else {
+    centre_dialog(char_create_dialog);
+    DIALOG_PLAYER *player = init_dialog(char_create_dialog, -1);
+    int gui_exit = 1;
+    while ((!key[KEY_ESC])&&(gui_exit)) {
+      clear_bitmap(buffer);
+      if(stretch_mode!=0)blit((BITMAP *)graphic[LOGIN_BMP].dat, buffer, 0, 0, 80, 60, 640, 480);
+      else blit((BITMAP *)graphic[LOGIN_BMP].dat, buffer, 0, 0, -120, -90, 640, 480);
+      gui_exit = gui_update(player);
+      blit(buffer, screen, 0, 0, 0, 0, 800, 600);
+    }
+    gui_exit = shutdown_dialog(player);
+    if(gui_exit==3) {
+      WFIFOW(0) = net_w_value(0x0067);
+      strcpy(WFIFOP(2), name);
+      WFIFOB(26) = net_b_value(5);
+      WFIFOB(27) = net_b_value(5);
+      WFIFOB(28) = net_b_value(5);
+      WFIFOB(29) = net_b_value(5);
+      WFIFOB(30) = net_b_value(5);
+      WFIFOB(31) = net_b_value(5);
+      WFIFOB(32) = net_b_value(0);
+      WFIFOW(33) = net_w_value(1);
+      WFIFOW(35) = net_w_value(1);
+      WFIFOSET(37);
+
+      while((in_size<3)||(out_size>0))flush();
+      if(RFIFOW(0)==0x006d) {
+        while(in_size<108)flush();
+        char_info = (CHAR_SEL_INFO *)malloc(sizeof(CHAR_SEL_INFO));
+        char_info->id = account_ID;
+        memset(char_info->name, '\0', 24);
+        strcpy(char_info[0].name, RFIFOP(2+74));
+        char_info->hp = RFIFOW(2+42);
+        char_info->max_hp = RFIFOW(2+44);
+        char_info->sp = RFIFOW(2+46);
+				char_info->max_sp = RFIFOW(2+48);
+				char_info->job_lv = RFIFOL(2+16);
+        char_info->job_xp = RFIFOL(2+12);
+				char_info->lv = RFIFOW(2+58);
+				char_info->xp = RFIFOL(2+4);
+				char_info->zeny = RFIFOL(2+8);
+				char_info->STR = RFIFOB(2+98);
+				char_info->AGI = RFIFOB(2+99);
+				char_info->VIT = RFIFOB(2+100);
+				char_info->INT = RFIFOB(2+101);
+				char_info->DEX = RFIFOB(2+102);
+				char_info->LUK = RFIFOB(2+103);
+				RFIFOSKIP(108);         
+				n_character++;
+			} else if(RFIFOW(0)==0x006c) {
+				switch(RFIFOB(2)) {
+          case 0:
+            ok("Error", "Access denied");
+            break;
+          case 1:
+            ok("Error", "Cannot use this ID");
+            break;
+        }
+        RFIFOSKIP(3);
+      } else ok("Error", "Unknown error");
+    }
+  }
+}
diff --git a/src/gui/char_select.h b/src/gui/char_select.h
new file mode 100644
index 00000000..94a8e820
--- /dev/null
+++ b/src/gui/char_select.h
@@ -0,0 +1,41 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#ifdef WIN32
+  #pragma warning (disable:4312)
+#endif
+
+#ifndef _CHAR_SELECT_H
+#define _CHAR_SELECT_H
+
+#include <allegro.h>
+
+#include "../main.h"
+#include "../Net/network.h"
+#include "gui.h"
+
+void char_select();
+void server_char_select();
+void server_char_delete();
+
+#endif
diff --git a/src/gui/char_server.cpp b/src/gui/char_server.cpp
new file mode 100644
index 00000000..36ef5d53
--- /dev/null
+++ b/src/gui/char_server.cpp
@@ -0,0 +1,141 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#include "char_server.h"
+#include "../Graphic/graphic.h"
+
+char server[30];
+
+DIALOG char_server_dialog[] = {
+   /* (dialog proc)     (x)   (y)   (w)   (h)   (fg)  (bg)  (key) (flags)     (d1)                    (d2)  (dp)                          (dp2) (dp3) */
+   { tmw_dialog_proc,   300,  240,  200,  104,    0,  -1,    0,    0,          0,                 0, (char*)"Server select",                     NULL, NULL  },
+   { tmw_list_proc,     304,  262,  192,   55,    0,   0,    0,    0,          0,                 0,     (char*)server_list,                     NULL, NULL  },
+   { tmw_button_proc,   398,  322,  44,    18,    0,  -1,    'o',  D_EXIT,    -1,                 0,           (char*)"&Ok",                     NULL, NULL  },
+   { tmw_button_proc,   446,  322,  44,    18,    0,  -1,    'c',  D_EXIT,    -1,                 0,       (char*)"&Cancel",                     NULL, NULL  },
+   { NULL,                0,    0,   0,     0,    0,   0,    0,    0,          0,                 0,                   NULL,                     NULL, NULL  },
+};
+
+/** Helper function to create server list */
+char *server_list(int index, int *size) {
+	static char buffer[30];
+    if (index < 0) {
+        *size = n_server;
+        return NULL;
+	}
+	sprintf(buffer, "%s (%i)", server_info[index].name, server_info[index].online_users);
+	return buffer;
+}
+
+void char_server() {
+	state = LOGIN;
+	centre_dialog(char_server_dialog);
+	DIALOG_PLAYER *player = init_dialog(char_server_dialog, -1);
+	if(!player)ok("Error", "Unable to initialize login dialog");
+	int gui_exit = 1;
+	if(n_server==0)char_server_dialog[2].flags |= D_DISABLED;
+	while ((!key[KEY_ESC])&&(gui_exit)&&(!key[KEY_ENTER])) {
+		clear_bitmap(buffer);
+		if(stretch_mode!=0)blit((BITMAP *)graphic[LOGIN_BMP].dat, buffer, 0, 0, 80, 60, 640, 480);
+		else blit((BITMAP *)graphic[LOGIN_BMP].dat, buffer, 0, 0, -120, -90, 640, 480);
+		gui_exit = gui_update(player);
+		blit(buffer, screen, 0, 0, 0, 0, 800, 600);
+	}
+	gui_exit = shutdown_dialog(player);
+	if((gui_exit==2)||(key[KEY_ENTER])) {
+		server_char_server();
+	}
+}
+
+void server_char_server() {
+	int ret;
+	state = LOGIN;
+
+    // Connect to char server
+	ret = open_session(iptostring(server_info[char_server_dialog[1].d1].address), server_info[char_server_dialog[1].d1].port);
+	if(ret==SOCKET_ERROR) {
+		ok("Error", "Unable to connect to char server");
+		return;
+	}	
+	
+	// Send login infos
+	WFIFOW(0) = net_w_value(0x0065);
+	WFIFOL(2) = net_l_value(account_ID);
+	WFIFOL(6) = net_l_value(session_ID1);
+	WFIFOL(10) = net_l_value(session_ID2);
+	WFIFOW(14) = 0;
+	WFIFOB(16) = net_b_value(sex);
+	WFIFOSET(17);
+
+	while((in_size<4)||(out_size>0))flush();
+	RFIFOSKIP(4);
+
+    while(in_size<3)flush();
+	
+	if(RFIFOW(0)==0x006b) {
+		while(in_size<RFIFOW(2))flush();
+		n_character = (RFIFOW(2)-24)/106;
+		char_info = (CHAR_SEL_INFO *)malloc(sizeof(CHAR_SEL_INFO)*n_character);
+		for(int i=0;i<n_character;i++) {
+			char_info[i].id = RFIFOL(24+106*i);
+			strcpy(char_info[i].name, RFIFOP(24+106*i+74));
+			char_info[i].hp = RFIFOW(24+106*i+42);
+			char_info[i].max_hp = RFIFOW(24+106*i+44);
+			char_info[i].xp = RFIFOL(24+106*i+4);
+			char_info[i].zeny = RFIFOL(24+106*i+8);
+			char_info[i].job_xp = RFIFOL(24+106*i+16);
+			char_info[i].job_lv = RFIFOL(24+106*i+24);
+			char_info[i].sp = RFIFOW(24+106*i+46);
+			char_info[i].max_sp = RFIFOW(24+106*i+48);
+			char_info[i].lv = RFIFOW(24+106*i+58);
+			char_info[i].STR = RFIFOB(24+106*i+98);
+			char_info[i].AGI = RFIFOB(24+106*i+99);
+			char_info[i].VIT = RFIFOB(24+106*i+100);
+			char_info[i].INT = RFIFOB(24+106*i+101);
+			char_info[i].DEX = RFIFOB(24+106*i+102);
+			char_info[i].LUK = RFIFOB(24+106*i+103);
+		}
+		state = CHAR_SELECT;
+
+		log("Player", "name", char_info->name);		
+		log_hex("Char_Server_Packet", "Packet_ID", RFIFOW(0));
+    log_int("Char_Server_Packet", "Packet_length", RFIFOW(2));
+ 
+
+		RFIFOSKIP(RFIFOW(2));		
+	} else if(RFIFOW(0)==0x006c) {
+		switch(RFIFOB(2)) {
+			case 0:
+				ok("Error", "Access denied");
+				break;
+			case 1:
+				ok("Error", "Cannot use this ID");
+                break;
+			default:
+				ok("Error", "Rejected from server");
+				break;
+		}
+		RFIFOSKIP(3);
+		close_session();
+	} else ok("Error", "Unknown error");
+	// Todo: add other packets
+}
diff --git a/src/gui/char_server.h b/src/gui/char_server.h
new file mode 100644
index 00000000..866f5070
--- /dev/null
+++ b/src/gui/char_server.h
@@ -0,0 +1,41 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#ifdef WIN32
+  #pragma warning (disable:4312)
+#endif
+
+#ifndef _CHAR_SEL_SERVER_H
+#define _CHAR_SEL_SERVER_H
+
+#include <allegro.h>
+
+#include "../main.h"
+#include "../Net/network.h"
+#include "gui.h"
+
+void char_server();
+void server_char_server();
+char *server_list(int index, int *size);
+
+#endif
diff --git a/src/gui/chat.cpp b/src/gui/chat.cpp
new file mode 100644
index 00000000..2f0385c9
--- /dev/null
+++ b/src/gui/chat.cpp
@@ -0,0 +1,303 @@
+/**
+
+  The Mana World
+  Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+/**
+	Simple ChatLog Object v0.5 (i'd say...)
+
+	Bestviewd w/ Bitstream Vera Sans Mono @ 9pt and a tab-width of 2 spaces
+
+	Author: kth5 aka Alexander Baldeck
+		pipe your questions, suggestions and flames to: kth5@gawab.com
+*/
+
+#include "../main.h"
+#include "chat.h"
+#include <list>
+#include <string>
+#include <fstream>
+
+using namespace std;
+
+
+Chat::Chat(const char * logfile, int item_num) {
+	chatlog_file.open(logfile, ios::out | ios::app);
+	items = 0;
+	items_keep = item_num;
+}
+
+Chat::~Chat() {
+	chatlog_file.flush();
+	chatlog_file.close();
+}
+
+void Chat::chat_dlgrsize(int) {
+}
+
+/** adds a line of text to our message list
+
+		string line					-> message text
+		int own							-> type of message (usually the owner-type)
+		ALFONT_FONT * font	-> font that'll be used to draw the text later
+   
+		NOTE:
+			to all of you who wonder why the font needs to be passed, simple.
+			i already store the width in pixel in the list rather than
+			calculating it again and again on every draw event. ;-)
+*/
+void Chat::chat_log(string line, int own, ALFONT_FONT * font) {
+	int pos;
+	CHATLOG tmp;
+
+	if(items<=items_keep)
+		items++;     // delete overhead from the end of the list
+	else
+		chatlog.pop_back();
+
+	pos = 0;
+	pos = (int)line.find(" : ", 0);
+	if(pos > 0) {
+			tmp.nick = line.substr(0,pos);
+			switch(own) {
+				case ACT_IS :
+						tmp.nick += CAT_IS;
+					break;
+				case ACT_WHISPER :
+					tmp.nick += CAT_WHISPER;
+					break;
+				default :
+						tmp.nick += CAT_NORMAL;
+			}
+			tmp.width = TEXT_GETWIDTH(tmp.nick.c_str())+2;
+			line.erase(0,pos+3);
+	}else {
+			tmp.nick = "";
+			tmp.width = 1;
+    }    
+	tmp.own  = own;	
+	tmp.text = line;	
+
+	chatlog_file << tmp.nick << tmp.text << "\n";
+	chatlog_file.flush();
+	
+	chatlog.push_front(tmp);
+}
+
+void Chat::chat_log(CHATSKILL action, ALFONT_FONT * font) {
+	chat_log(const_msg(action), BY_SERVER, font);
+}
+
+
+/** draw first n lines of the list onto a Allegro type bitmap buffer
+		using Alfont
+
+		BITMAP * bmp				-> Allegro type bitmap buffer to draw onto
+		int n								-> number of lines to be drawn
+		ALFONT_FONT * font	-> font to use
+   
+		NOTE:
+			take great care using this, make sure the buffer passed is
+			empty! ;-) anyway, line wrapping is not supported yet.
+*/
+void Chat::chat_draw(BITMAP * bmp, int n, ALFONT_FONT * font) {
+	int y = 600-35, i = 0;
+	CHATLOG line;
+	n -= 1;
+	
+    for(iter = chatlog.begin(); iter != chatlog.end(); iter++) {
+		line = *iter;
+		y -=11;
+ 
+		switch(line.own) {
+			case BY_GM :
+				alfont_textprintf_aa(bmp, font, 1, y, COLOR_BLUE, "Global announcement: ");
+				alfont_textprintf_aa(bmp, font, TEXT_GETWIDTH("Global announcement: "), y, COLOR_GREEN, line.text.c_str());
+				break;
+			case BY_PLAYER :
+				alfont_textprintf_aa(bmp, font, 1, y, COLOR_YELLOW, line.nick.c_str());
+				alfont_textprintf_aa(bmp, font, line.width, y, COLOR_WHITE, line.text.c_str());
+				break;
+			case BY_OTHER :
+				alfont_textprintf_aa(bmp, font, 1, y, COLOR_GREEN, line.nick.c_str());
+				alfont_textprintf_aa(bmp, font, line.width, y, COLOR_WHITE, line.text.c_str());
+				break;
+			default :
+				alfont_textprintf_aa(bmp, font, 1, y, COLOR_LIGHTBLUE, line.text.c_str());
+		}
+    
+		if(i>=n)
+			return;
+		i++;
+	}
+}
+
+/** determines wether to send a command or an ordinary message, then
+		contructs packets & sends them
+
+		string nick -> the character's name to display infront
+		string msg  -> the message's text which is to be send.
+   
+		NOTE:
+			the nickname is required by the server, if not specified
+			the message may not be sent unless a command was intended
+			which requires another packet to be constructed! you can
+			achieve this by putting a slash ("/") infront of the
+			message followed by the command name and the message.
+			of course all slash-commands need implemented handler-
+			routines. ;-)
+			remember, a line starting w/ "@" is not a command that needs
+			to be parsed rather is sent using the normal chat-packet.
+
+		EXAMPLE:
+			// for an global announcement   /- command
+			chatlog.chat_send("", "/announce Hello to all logged in users!");
+			// for simple message by a user /- message
+			chatlog.chat_send("Zaeiru", "Hello to all users on the screen!");
+*/
+char * Chat::chat_send(string nick, string msg) {
+	short len = 0, packid;
+	char *temp = NULL;
+
+	// prepare command
+	if(msg.substr(0,1)=="/") {
+		// global announcement
+		if(msg.substr(0,IS_ANNOUNCE_LENGTH) == IS_ANNOUNCE) {
+			msg.erase(0,IS_ANNOUNCE_LENGTH);
+			packid = 0x0099;
+		} else {
+			packid = 0x008c;
+			len = (short)msg.length()+4;
+		}
+		len = (short)msg.length()+4;
+	// prepare ordinary message
+	} else {
+		// temporary hack to make messed-up-keyboard-ppl able to send GM commands
+		if(msg.substr(0,1)=="#")
+			msg.replace(0,1,"@");
+		// end temp. hack XD
+		nick += " : ";
+		nick += msg;
+		msg = nick;
+		packid = 0x008c;
+		len = (short)(nick.length()+msg.length()+3);     
+	}    
+
+	// send processed message
+	temp = new char[len];
+	memcpy(temp, msg.c_str(), len);
+	WFIFOW(0) = net_w_value(packid);
+	WFIFOW(2) = net_w_value(len+4);
+	memcpy(WFIFOP(4), temp, len);
+	WFIFOSET(len+4);
+	delete temp;
+	nick = msg = "";
+	return "";
+}    
+
+/** PRIVATE : 
+	NOTE:
+		these usually will be left undocumented coz u can't call them
+		directly anyway. ;-)
+*/ 
+
+/** constructs failed messages for actions */
+string Chat::const_msg(CHATSKILL action) {
+	string msg;
+	if(action.success == SKILL_FAILED && action.skill == SKILL_BASIC) {
+		switch(action.bskill) {
+			case BSKILL_TRADE :
+				msg = "Trade failed!";
+				break;
+			case BSKILL_EMOTE :
+				msg = "Emote failed!";
+				break;
+			case BSKILL_SIT :
+				msg = "Sit failed!";
+				break;
+			case BSKILL_CREATECHAT :
+				msg = "Chat creating failed!";
+				break;
+			case BSKILL_JOINPARTY :
+				msg = "Could not join party!";
+				break;
+			case BSKILL_SHOUT :
+				msg = "Cannot shout!";
+				break;
+		}
+		
+		switch(action.reason) {
+			case RFAIL_SKILLDEP :
+				msg += " You have not yet reached a high enough lvl!";
+				break;
+			case RFAIL_INSUFHP :
+				msg += " Insufficient HP!";
+				break;
+			case RFAIL_INSUFSP :
+				msg += " Insufficient SP!";
+				break;
+			case RFAIL_NOMEMO :
+				msg += " You have no memos!";
+				break;
+			case RFAIL_SKILLDELAY :
+				msg += " You cannot do that right now!";
+				break;
+			case RFAIL_ZENY :
+				msg += " Seems you need more Zeny... ;-)";
+				break;
+			case RFAIL_WEAPON :
+				msg += " You cannot use this skill with that kind of weapon!";
+				break;
+			case RFAIL_REDGEM :
+				msg += " You need another red gem!";
+				break;
+			case RFAIL_BLUEGEM :
+				msg += " You need another blue gem!";
+				break;
+			case RFAIL_OVERWEIGHT :
+				msg += " You're carrying to much to do this!";
+				break;
+			default :
+				msg += " Huh? What's that?";
+				break;
+		}
+	}else{
+		switch(action.skill) {
+			case SKILL_WARP :
+				msg = "Warp failed...";
+				break;
+			case SKILL_STEAL :
+				msg = "Could not steal anything...";
+				break;
+			case SKILL_ENVENOM :
+				msg = "Poison had no effect...";
+				break;
+		}
+	}
+	
+	return msg;
+}
+
+string const_msg(int own) {
+  string msg;
+	return msg;
+}
+
diff --git a/src/gui/chat.h b/src/gui/chat.h
new file mode 100644
index 00000000..cfe16beb
--- /dev/null
+++ b/src/gui/chat.h
@@ -0,0 +1,150 @@
+/**
+
+  The Mana World
+  Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#ifndef _CHAT_H
+#define _CHAT_H
+
+#include "../main.h"
+#include <list>
+#include <string>
+#include <fstream>
+#include <string>
+
+using namespace std;
+
+/**
+	Simple ChatLog Object v0.5 (i'd say...)
+
+	Bestviewd w/ Bitstream Vera Sans Mono @ 9pt and a tab-width of 2 spaces
+
+	Author: kth5 aka Alexander Baldeck
+		pipe your questions, suggestions and flames to: kth5@gawab.com
+
+	NOTE:
+		i documented all functions in their implementation. ;-)
+*/
+
+
+#define BY_GM					0		// those should be self-explanatory =)
+#define BY_PLAYER			1
+#define BY_OTHER			2
+#define BY_SERVER			3
+
+#define ACT_WHISPER		4		// getting whispered at
+#define ACT_IS				5		// equivalent to "/me" in irc
+
+#define IS_ANNOUNCE					"/announce "
+#define IS_ANNOUNCE_LENGTH	10
+
+/**
+		gets in between usernick and message text depending on
+		message type                   
+*/
+#define CAT_NORMAL          ": "
+#define CAT_IS              ""
+#define CAT_WHISPER         " says: "
+
+/** some generic color macros      */
+#define COLOR_WHITE				(makecol(255,255,255)) // plain white
+#define COLOR_BLUE				(makecol( 97,156,236)) // cold gm blue :P
+#define COLOR_YELLOW			(makecol(255,246, 98)) // sexy yellow
+#define COLOR_GREEN				(makecol( 39,197, 39)) // cool green
+#define COLOR_RED					(makecol(255,  0,  0)) // ack red XD
+#define COLOR_LIGHTBLUE		(makecol( 83,223,246)) // bright blue
+
+/** calculate text-width in pixel  */
+#define TEXT_GETWIDTH(str)  (alfont_text_length(font, str))
+
+/** job dependend identifiers (?)  */
+#define		SKILL_BASIC			0x0001
+#define		SKILL_WARP			0x001b
+#define		SKILL_STEAL			0x0032
+#define		SKILL_ENVENOM		0x0034
+
+/** basic skills identifiers       */
+#define		BSKILL_TRADE			0x0000
+#define		BSKILL_EMOTE			0x0001
+#define		BSKILL_SIT				0x0002
+#define		BSKILL_CREATECHAT	0x0003
+#define		BSKILL_JOINPARTY	0x0004
+#define		BSKILL_SHOUT			0x0005
+#define		BSKILL_PK					0x0006 // ??
+#define		BSKILL_SETALLIGN	0x0007 // ??
+
+/** reasons why action failed      */
+#define		RFAIL_SKILLDEP		0x00
+#define		RFAIL_INSUFHP			0x01
+#define		RFAIL_INSUFSP			0x02
+#define		RFAIL_NOMEMO			0x03
+#define		RFAIL_SKILLDELAY	0x04
+#define		RFAIL_ZENY				0x05
+#define		RFAIL_WEAPON			0x06
+#define		RFAIL_REDGEM			0x07
+#define		RFAIL_BLUEGEM			0x08
+#define		RFAIL_OVERWEIGHT	0x09
+#define		RFAIL_GENERIC			0x0a
+
+/** should always be zero if failed */
+#define		SKILL_FAILED		0x00
+
+struct CHATSKILL {
+	short skill;
+	short bskill;
+	short unused;
+	char  success;
+	char  reason;
+};
+
+class Chat {
+	public :
+		Chat(const char *, int);
+		void chat_dlgrsize(int);
+
+		void chat_log(string, int, ALFONT_FONT *);
+		void chat_log(CHATSKILL, ALFONT_FONT *);	// function overload -> calls original chat_log()
+																							//   after processing the packet
+
+		void chat_draw(BITMAP *, int, ALFONT_FONT *);
+		char * chat_send(string, string);
+		~Chat();
+	private :
+		ofstream chatlog_file;
+
+		typedef struct CHATLOG {									// list item container object
+			string nick;
+			string text;
+			int own;
+			int width;
+		};
+		
+		list<CHATLOG> chatlog;										// list object ready to accept out CHATLOG struct :)
+		list<CHATLOG>::iterator iter;
+
+		int items;
+		int items_keep;
+		
+		string const_msg(CHATSKILL);							// contructs action-fail messages
+		string const_msg(int);										// constructs normal messages (not implemented yet)
+};
+
+#endif
diff --git a/src/gui/gui.cpp b/src/gui/gui.cpp
new file mode 100644
index 00000000..cb43c47b
--- /dev/null
+++ b/src/gui/gui.cpp
@@ -0,0 +1,1471 @@
+/**
+
+  The Mana World
+  Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#include "gui.h"
+#include "allegro/internal/aintern.h"
+#include <math.h>
+#include <alfont.h>
+#include "../Sound/sound.h"
+
+#ifndef WIN32
+#define __cdecl __attribute__((cdecl))
+#endif
+
+#define GUI_BMP_COUNT 11
+#define GUI_BMP_OFS_BUTTON 0
+#define GUI_BMP_OFS_SLIDER 4
+#define GUI_BMP_OFS_CHECKBOX 5
+#define GUI_BMP_OFS_RADIOBUTTON 6
+#define GUI_BMP_OFS_TEXTBOX 7
+#define GUI_BMP_OFS_LISTBOX 8
+#define GUI_BMP_OFS_DIALOG 9
+
+#define GUI_CALL_BUTTONCALLBACK(d) 
+static BITMAP *gui__repository[GUI_BMP_COUNT];
+
+/* The currently active skin */
+LexSkin gui_skin;
+BITMAP *gui_bitmap;
+ALFONT_FONT *gui_font;
+bool drag;
+DATAFILE *gui_gfx;
+
+extern TmwSound sound;
+
+/* very internal update stuff */
+int (*gui__external_slider_callback)(void *, int);
+int reroute_slider_proc(void *dp3, int d2);
+
+/** Initialize gui system */
+void init_gui(BITMAP *bitmap, const char *skin) {
+  gui_bitmap = bitmap;
+  gui_load_skin(skin);
+  //alfont_init();
+  gui_font = alfont_load_font("./data/skin/arial.ttf");
+  alfont_set_font_size(gui_font, 14);
+  drag = false;
+  show_mouse(NULL);
+}
+
+int gui_update(DIALOG_PLAYER *player) {
+  dialog_message(player->dialog, MSG_DRAW, 0, 0);
+  int ret = update_dialog(player);
+	draw_sprite(gui_bitmap, mouse_sprite, mouse_x, mouse_y);
+  return ret;
+}
+
+
+void loadButtonSkin() {
+    char **tokens;
+    int    tokenCount;
+    int    gridx[4];
+    int    gridy[4];
+    int    a = 0;
+    int    x,y,mode;
+
+		tokens = get_config_argv("button", "gridx", &tokenCount);
+    for (a=0; a < 4; a++) {
+        gridx[a] = atoi(tokens[a]);
+    }
+    tokens = get_config_argv("button", "gridy", &tokenCount);
+    for (a=0; a < 4; a++) {
+        gridy[a] = atoi(tokens[a]);
+    }
+
+    tokens                      = get_config_argv("button", "textcol_norm", &tokenCount);
+    gui_skin.button.textcolor[0] = makecol(atoi(tokens[0]),atoi(tokens[1]),atoi(tokens[2]));
+    tokens                      = get_config_argv("button", "textcol_hilite", &tokenCount);
+    gui_skin.button.textcolor[1] = makecol(atoi(tokens[0]),atoi(tokens[1]),atoi(tokens[2]));
+    tokens                      = get_config_argv("button", "textcol_pressed", &tokenCount);
+    gui_skin.button.textcolor[2] = makecol(atoi(tokens[0]),atoi(tokens[1]),atoi(tokens[2]));
+    tokens                      = get_config_argv("button", "textcol_disabled", &tokenCount);
+    gui_skin.button.textcolor[3] = makecol(atoi(tokens[0]),atoi(tokens[1]),atoi(tokens[2]));
+
+    gui__repository[GUI_BMP_OFS_BUTTON + 0] = (BITMAP *)gui_gfx[0].dat;
+		gui__repository[GUI_BMP_OFS_BUTTON + 1] = (BITMAP *)gui_gfx[2].dat;
+    gui__repository[GUI_BMP_OFS_BUTTON + 2] = (BITMAP *)gui_gfx[3].dat;
+    gui__repository[GUI_BMP_OFS_BUTTON + 3] = (BITMAP *)gui_gfx[1].dat;
+
+    for (mode=0; mode < 4; mode++) {        
+        a=0;
+        for (y=0; y < 3; y++) {
+            for (x=0; x < 3; x++) {
+                gui_skin.button.background[mode].grid[a] = create_sub_bitmap(
+                                gui__repository[GUI_BMP_OFS_BUTTON + mode],
+                                gridx[x]             , gridy[y], 
+                                gridx[x+1]-gridx[x]+1, gridy[y+1]-gridy[y]+1
+                                );
+                a++;
+            }
+        }
+    }
+}
+
+
+void loadSliderSkin() {
+    int    x, y, w, h,o1,o2;
+    char **tokens;
+    int    tokenCount;
+
+		gui__repository[GUI_BMP_OFS_SLIDER] = (BITMAP *)gui_gfx[8].dat;
+
+    tokens = get_config_argv("slider", "slider_h", &tokenCount);
+    x = atoi(tokens[0]); y = atoi(tokens[1]);
+    w = atoi(tokens[2]); h = atoi(tokens[3]);
+    
+    tokens = get_config_argv("slider", "slider_h_ofs", &tokenCount);
+    o1 = atoi(tokens[0]); o2 = atoi(tokens[1]);
+    
+    gui_skin.slider.hSlider[0] = create_sub_bitmap(gui__repository[GUI_BMP_OFS_SLIDER], x , y, o1-x    , h);
+    gui_skin.slider.hSlider[1] = create_sub_bitmap(gui__repository[GUI_BMP_OFS_SLIDER], o1, y, o2-o1   , h);
+    gui_skin.slider.hSlider[2] = create_sub_bitmap(gui__repository[GUI_BMP_OFS_SLIDER], o2, y, w-(o2-x), h);
+
+    tokens = get_config_argv("slider", "slider_v", &tokenCount);
+    x = atoi(tokens[0]); y = atoi(tokens[1]);
+    w = atoi(tokens[2]); h = atoi(tokens[3]);
+
+    tokens = get_config_argv("slider", "slider_v_ofs", &tokenCount);
+    o1 = atoi(tokens[0]); o2 = atoi(tokens[1]);
+    
+    gui_skin.slider.vSlider[0] = create_sub_bitmap(gui__repository[GUI_BMP_OFS_SLIDER], x,  y, w, o1 -     y);
+    gui_skin.slider.vSlider[1] = create_sub_bitmap(gui__repository[GUI_BMP_OFS_SLIDER], x, o1, w, o2 -     o1);
+    gui_skin.slider.vSlider[2] = create_sub_bitmap(gui__repository[GUI_BMP_OFS_SLIDER], x, o2, w,  h - (o2-y));
+
+    tokens = get_config_argv("slider", "handle_v", &tokenCount);
+    x = atoi(tokens[0]); y = atoi(tokens[1]);
+    w = atoi(tokens[2]); h = atoi(tokens[3]);
+    gui_skin.slider.vGrip   = create_sub_bitmap(gui__repository[GUI_BMP_OFS_SLIDER], x, y, w, h);
+
+    tokens = get_config_argv("slider", "handle_h", &tokenCount);
+    x = atoi(tokens[0]); y = atoi(tokens[1]);
+    w = atoi(tokens[2]); h = atoi(tokens[3]);
+    gui_skin.slider.hGrip   = create_sub_bitmap(gui__repository[GUI_BMP_OFS_SLIDER], x, y, w, h);
+}
+
+void loadCheckboxSkin()  {
+    int    x, y, w,h;
+    char **tokens;
+    int    tokenCount;
+
+		gui__repository[GUI_BMP_OFS_CHECKBOX] = (BITMAP *)gui_gfx[4].dat;
+
+    
+    tokens = get_config_argv("checkbox", "normal", &tokenCount);
+    x = atoi(tokens[0]); y = atoi(tokens[1]);
+    w = atoi(tokens[2]); h = atoi(tokens[3]);
+    gui_skin.checkbox.normal = create_sub_bitmap(gui__repository[GUI_BMP_OFS_CHECKBOX], x , y, w, h);
+    
+    tokens = get_config_argv("checkbox", "checked", &tokenCount);
+    x = atoi(tokens[0]); y = atoi(tokens[1]);
+    w = atoi(tokens[2]); h = atoi(tokens[3]);
+    gui_skin.checkbox.checked = create_sub_bitmap(gui__repository[GUI_BMP_OFS_CHECKBOX], x , y, w, h);
+    
+    tokens = get_config_argv("checkbox", "disabled", &tokenCount);
+    x = atoi(tokens[0]); y = atoi(tokens[1]);
+    w = atoi(tokens[2]); h = atoi(tokens[3]);
+    gui_skin.checkbox.disabled = create_sub_bitmap(gui__repository[GUI_BMP_OFS_CHECKBOX], x , y, w, h);
+    
+    tokens = get_config_argv("checkbox", "disabled_check", &tokenCount);
+    x = atoi(tokens[0]); y = atoi(tokens[1]);
+    w = atoi(tokens[2]); h = atoi(tokens[3]);
+    gui_skin.checkbox.disabled_checked = create_sub_bitmap(gui__repository[GUI_BMP_OFS_CHECKBOX], x , y, w, h);   
+
+    tokens                        = get_config_argv("button", "textcol_norm", &tokenCount);
+    gui_skin.checkbox.textcolor[0] = makecol(atoi(tokens[0]),atoi(tokens[1]),atoi(tokens[2]));
+    tokens                        = get_config_argv("button", "textcol_disabled", &tokenCount);
+    gui_skin.checkbox.textcolor[1] = makecol(atoi(tokens[0]),atoi(tokens[1]),atoi(tokens[2]));
+}
+
+void loadTextboxSkin() {
+    char **tokens;
+    int    tokenCount;
+    int    gridx[4];
+    int    gridy[4];
+    int    a = 0;
+    int    x,y;
+    
+    tokens = get_config_argv("textbox", "gridx", &tokenCount);
+    for (a=0; a < 4; a++) {
+        gridx[a] = atoi(tokens[a]);
+    }
+    tokens = get_config_argv("textbox", "gridy", &tokenCount);
+    for (a=0; a < 4; a++) {
+        gridy[a] = atoi(tokens[a]);
+    }
+
+    tokens                       = get_config_argv("textbox", "textcol_norm", &tokenCount);
+    gui_skin.textbox.textcolor[0] = makecol(atoi(tokens[0]),atoi(tokens[1]),atoi(tokens[2]));
+    tokens                       = get_config_argv("textbox", "textcol_disabled", &tokenCount);
+    gui_skin.textbox.textcolor[1] = makecol(atoi(tokens[0]),atoi(tokens[1]),atoi(tokens[2]));
+
+		gui__repository[GUI_BMP_OFS_TEXTBOX] = (BITMAP *)gui_gfx[9].dat;
+
+    
+
+    a=0;
+    for (y=0; y < 3; y++) {
+        for (x=0; x < 3; x++) {
+            gui_skin.textbox.bg.grid[a] = create_sub_bitmap(
+                            gui__repository[GUI_BMP_OFS_TEXTBOX],
+                            gridx[x]             , gridy[y], 
+                            gridx[x+1]-gridx[x]+1, gridy[y+1]-gridy[y]+1
+                            );
+            a++;
+        }
+    }
+}
+
+void loadListboxSkin() {
+    char **tokens;
+    int    tokenCount;
+    int    gridx[4];
+    int    gridy[4];
+    int    a = 0;
+    int    x,y;
+    
+    tokens = get_config_argv("listbox", "gridx", &tokenCount);
+    for (a=0; a < 4; a++) {
+        gridx[a] = atoi(tokens[a]);
+    }
+    tokens = get_config_argv("listbox", "gridy", &tokenCount);
+    for (a=0; a < 4; a++) {
+        gridy[a] = atoi(tokens[a]);
+    }
+
+    tokens                       = get_config_argv("listbox", "textcol_norm", &tokenCount);
+    gui_skin.listbox.textcolor[0] = makecol(atoi(tokens[0]),atoi(tokens[1]),atoi(tokens[2]));
+    tokens                       = get_config_argv("listbox", "textcol_selected", &tokenCount);
+    gui_skin.listbox.textcolor[1] = makecol(atoi(tokens[0]),atoi(tokens[1]),atoi(tokens[2]));
+    tokens                       = get_config_argv("listbox", "textbg_selected", &tokenCount);
+    gui_skin.listbox.textcolor[2] = makecol(atoi(tokens[0]),atoi(tokens[1]),atoi(tokens[2]));
+    tokens                       = get_config_argv("listbox", "textcol_disabled", &tokenCount);
+    gui_skin.listbox.textcolor[3] = makecol(atoi(tokens[0]),atoi(tokens[1]),atoi(tokens[2]));
+
+		gui__repository[GUI_BMP_OFS_LISTBOX+0] = (BITMAP *)gui_gfx[6].dat;
+		gui__repository[GUI_BMP_OFS_LISTBOX+1] = (BITMAP *)gui_gfx[10].dat;
+
+    a=0;
+    for (y=0; y < 3; y++) {
+        for (x=0; x < 3; x++) {
+            gui_skin.listbox.bg.grid[a] = create_sub_bitmap(
+                            gui__repository[GUI_BMP_OFS_LISTBOX],
+                            gridx[x]             , gridy[y], 
+                            gridx[x+1]-gridx[x]+1, gridy[y+1]-gridy[y]+1
+                            );
+            a++;
+        }
+    }
+
+    tokens = get_config_argv("listbox", "vscroll_gridx", &tokenCount);
+    for (a=0; a < 4; a++) {
+        gridx[a] = atoi(tokens[a]);
+    }
+    tokens = get_config_argv("listbox", "vscroll_gridy", &tokenCount);
+    for (a=0; a < 4; a++) {
+        gridy[a] = atoi(tokens[a]);
+    }
+    a=0;
+    for (y=0; y < 3; y++) {
+        for (x=0; x < 3; x++) {
+            gui_skin.listbox.vscroll.grid[a] = create_sub_bitmap(
+                            gui__repository[GUI_BMP_OFS_LISTBOX+1],
+                            gridx[x]             , gridy[y], 
+                            gridx[x+1]-gridx[x]+1, gridy[y+1]-gridy[y]+1
+                            );
+            a++;
+        }
+    }
+
+}
+
+void loadDialogSkin() {
+    char **tokens;
+    int    tokenCount;
+    int    gridx[4];
+    int    gridy[4];
+    int    a = 0;
+    int    x,y;
+    
+    tokens = get_config_argv("dialog", "gridx", &tokenCount);
+    for (a=0; a < 4; a++) {
+        gridx[a] = atoi(tokens[a]);
+    }
+    tokens = get_config_argv("dialog", "gridy", &tokenCount);
+    for (a=0; a < 4; a++) {
+        gridy[a] = atoi(tokens[a]);
+    }
+
+		gui__repository[GUI_BMP_OFS_DIALOG] = (BITMAP *)gui_gfx[5].dat;
+
+    a=0;
+    for (y=0; y < 3; y++) {
+        for (x=0; x < 3; x++) {
+            gui_skin.dialog.bg.grid[a] = create_sub_bitmap(
+                            gui__repository[GUI_BMP_OFS_DIALOG],
+                            gridx[x]             , gridy[y], 
+                            gridx[x+1]-gridx[x]+1, gridy[y+1]-gridy[y]+1
+                            );
+            a++;
+        }
+    }
+}
+
+void drawSkinnedRect(BITMAP*dst, LexSkinnedRect *skin, int x, int y,int w, int h) {
+    
+    BITMAP **grid = skin->grid;    
+
+    int w0 = grid[0]->w;
+    int w1 = w - grid[0]->w -grid[2]->w;
+    int w2 = grid[2]->w;
+    int h0 = grid[0]->h;
+    int h1 = h - grid[0]->h - grid[6]->h;
+    int h2 = grid[6]->h;
+
+    int cx,cy;
+
+    cx = x; cy = y;
+    masked_blit(grid[0], dst, 0, 0, cx, cy,grid[0]->w,grid[0]->h);
+    cy += h0;
+    masked_stretch_blit(grid[3], dst, 0, 0, grid[3]->w,grid[3]->h,cx, cy,w0,h1);
+    cy += h1;
+    masked_blit(grid[6], dst, 0, 0, cx, cy,grid[6]->w,grid[6]->h);
+
+    cx += w0;
+    cy  = y;
+    masked_stretch_blit(grid[1], dst, 0, 0, grid[1]->w,grid[1]->h,cx, cy,w1,h0);
+    cy += h0;
+    masked_stretch_blit(grid[4], dst, 0, 0, grid[4]->w,grid[4]->h,cx, cy,w1,h1);
+    cy += h1;
+    masked_stretch_blit(grid[7], dst, 0, 0, grid[7]->w,grid[7]->h,cx, cy,w1,h2);
+
+    cx += w1;
+    cy  = y;
+    masked_blit(grid[2], dst, 0, 0, cx, cy,grid[2]->w,grid[2]->h);    
+    cy += h0;
+    masked_stretch_blit(grid[5], dst, 0, 0, grid[5]->w,grid[5]->h,cx, cy,w2,h1);
+    cy += h1;
+    masked_blit(grid[8], dst, 0, 0, cx, cy,grid[8]->w,grid[7]->h);        
+}
+
+
+int gui_load_skin(const char* skinname) {
+	gui__external_slider_callback = NULL; 
+  push_config_state();
+  set_config_file(skinname);
+	gui_gfx = load_datafile(get_config_string("skin", "gfx", 0));
+  loadButtonSkin();
+  loadSliderSkin();
+  loadCheckboxSkin();
+  loadTextboxSkin();
+  loadListboxSkin();
+  loadDialogSkin();
+  pop_config_state();
+  set_mouse_sprite((BITMAP *)gui_gfx[7].dat);
+
+  return TRUE;
+}
+
+void gui_exit() {
+  //alfont_destroy_font(gui_font);
+  gui_shutdown();  
+  //alfont_exit();
+}
+
+void gui_shutdown(void) {
+    int a, b;
+
+    /* Button */
+    for (a=0; a < 3; a++) {
+        for (b=0; b < 9 ; b++) {
+            destroy_bitmap(gui_skin.button.background[a].grid[b]);
+        }
+        
+    }
+    /* Slider */
+    for (a=0; a < 3; a++) {
+        destroy_bitmap(gui_skin.slider.hSlider[a]);
+        destroy_bitmap(gui_skin.slider.vSlider[a]);
+    }
+    destroy_bitmap(gui_skin.slider.hGrip);
+    destroy_bitmap(gui_skin.slider.vGrip);
+
+    /* Checkbox */
+    destroy_bitmap(gui_skin.checkbox.normal);
+    destroy_bitmap(gui_skin.checkbox.checked);
+    destroy_bitmap(gui_skin.checkbox.disabled);
+    destroy_bitmap(gui_skin.checkbox.disabled_checked);
+
+    /* Radiobutton */
+    destroy_bitmap(gui_skin.radiobutton.normal);
+    destroy_bitmap(gui_skin.radiobutton.checked);
+    destroy_bitmap(gui_skin.radiobutton.disabled);
+    destroy_bitmap(gui_skin.radiobutton.disabled_checked);
+
+    for (a=0; a < GUI_BMP_COUNT; a++) {
+        destroy_bitmap(gui__repository[a]);
+    }
+}
+
+/** Draw text for gui widgets */
+int gui_text(BITMAP *bmp, AL_CONST char *s, int x, int y, int color, int centre) {
+    char tmp[1024];
+    int hline_pos = -1;
+    int len = 0;
+    int in_pos = 0;
+    int out_pos = 0;
+    int pix_len, c;
+
+    while (((c = ugetc(s+in_pos)) != 0) && (out_pos<(int)(sizeof(tmp)-ucwidth(0)))) {
+        if (c == '&') {
+            in_pos += uwidth(s+in_pos);
+            c = ugetc(s+in_pos);
+            if (c == '&') {
+                out_pos += usetc(tmp+out_pos, '&');
+                in_pos += uwidth(s+in_pos);
+                len++;
+            } else hline_pos = len;
+        } else {
+            out_pos += usetc(tmp+out_pos, c);
+            in_pos += uwidth(s+in_pos);
+            len++;
+        }
+    }
+    usetc(tmp+out_pos, 0);
+    pix_len = alfont_text_length(gui_font, tmp);
+
+    if (centre)x -= pix_len / 2;
+    if (bmp) {
+        alfont_textout_aa(bmp, gui_font, tmp, x, y, color);
+        if (hline_pos >= 0) {
+            c = ugetat(tmp, hline_pos);
+            usetat(tmp, hline_pos, 0);
+            hline_pos = alfont_text_length(gui_font, tmp);
+            c = usetc(tmp, c);
+            usetc(tmp+c, 0);
+            c = alfont_text_length(gui_font, tmp);
+            hline(bmp, x+hline_pos, y+alfont_text_height(gui_font)-gui_font_baseline, x+hline_pos+c-1, color);
+        }
+    }
+    return pix_len;
+}
+
+int tmw_text_proc(int msg, DIALOG *d, int c) {
+    if (msg==MSG_DRAW) {
+        int rtm;
+        rtm = alfont_text_mode(-1);
+        gui_text(gui_bitmap, (char *)d->dp, d->x, d->y, d->fg, FALSE);
+        alfont_text_mode(rtm);
+    }
+    return D_O_K;
+}
+
+
+int tmw_button_proc(int msg, DIALOG *d, int c) {
+
+    int rtm = 0;
+    int col = 0;
+    int ofs = 0;
+    int ret = D_O_K;
+
+    if (msg == MSG_DRAW) {
+        rectfill(gui_bitmap, d->x, d->y, d->x + d->w, d->y+d->h, makecol(255,255,255));
+
+        if (d->flags & D_DISABLED) {
+            drawSkinnedRect(gui_bitmap, &gui_skin.button.background[3], d->x, d->y, d->w, d->h);
+            col = gui_skin.button.textcolor[3];
+        } else if (d->flags & D_SELECTED) {
+            drawSkinnedRect(gui_bitmap, &gui_skin.button.background[2], d->x, d->y, d->w, d->h);
+            col = gui_skin.button.textcolor[2];
+            ofs = 1;
+        } else if (d->flags & D_GOTMOUSE) {
+            drawSkinnedRect(gui_bitmap, &gui_skin.button.background[1], d->x, d->y, d->w, d->h);
+            col = gui_skin.button.textcolor[1];
+        } else {
+            drawSkinnedRect(gui_bitmap, &gui_skin.button.background[0], d->x, d->y, d->w, d->h);
+            col = gui_skin.button.textcolor[0];
+        }
+        rtm = alfont_text_mode(-1);
+      gui_text(gui_bitmap, (const char *)d->dp, d->x+d->w/2+ofs, d->y+d->h/2-alfont_text_height(gui_font)/2+ofs, col, TRUE);
+      alfont_text_mode(rtm);
+    ret = D_O_K;
+  } else {
+        ret =  d_button_proc(msg,d,c);        
+    }
+    return ret;
+}
+
+int tmw_slider_proc(int msg, DIALOG *d, int c) {    
+    int w   = 0;
+    int h   = 0;
+    int x,y;
+
+    int ret = D_O_K;
+
+  static int watchdog = 0;
+    
+  watchdog++;
+  if (watchdog == 1) {
+    gui__external_slider_callback = (int(__cdecl *)(void *, int))d->dp2;
+    d->dp2 = (void*)reroute_slider_proc;
+  }
+    
+    if (msg == MSG_DRAW) {
+        if (d->w >= d->h) {
+            rectfill(gui_bitmap, d->x, d->y, d->x + d->w, d->y+d->h, d->bg);
+            /* horiz */
+            x = d->x;
+            y = d->y + (d->h- gui_skin.slider.hSlider[0]->h)/2;
+            masked_blit(gui_skin.slider.hSlider[0], gui_bitmap, 0, 0,  x, y, gui_skin.slider.hSlider[0]->w, gui_skin.slider.hSlider[0]->h);
+            w   = d->w -gui_skin.slider.hSlider[0]->w - gui_skin.slider.hSlider[2]->w;
+            x+= gui_skin.slider.hSlider[0]->w;
+            
+            masked_stretch_blit(
+                    gui_skin.slider.hSlider[1], gui_bitmap, 
+                    0, 0,  gui_skin.slider.hSlider[1]->w, gui_skin.slider.hSlider[1]->h, 
+                    x, y, w, gui_skin.slider.hSlider[1]->h);
+            
+            x+=w;
+            masked_blit(gui_skin.slider.hSlider[2], gui_bitmap, 0, 0,  x, y, gui_skin.slider.hSlider[2]->w, gui_skin.slider.hSlider[2]->h);
+
+            x  = d->x + ((d->w-gui_skin.slider.hGrip->w) * d->d2)/d->d1;
+            y = d->y + (d->h - gui_skin.slider.hGrip->h)/2;
+            masked_blit(gui_skin.slider.hGrip, gui_bitmap, 0, 0,  x, y, gui_skin.slider.hGrip->w, gui_skin.slider.hGrip->h);
+        } else {
+            rectfill(gui_bitmap, d->x, d->y, d->x + d->w, d->y+d->h, d->bg);
+            /* vertic */
+            x = d->x+ (d->w- gui_skin.slider.vSlider[0]->w)/2;
+            y = d->y; 
+            masked_blit(gui_skin.slider.vSlider[0], gui_bitmap, 0, 0,  x, y, gui_skin.slider.vSlider[0]->w, gui_skin.slider.vSlider[0]->h);
+            h   = d->h - gui_skin.slider.vSlider[0]->h - gui_skin.slider.vSlider[2]->h;
+            y  += gui_skin.slider.vSlider[0]->h;
+            
+            masked_stretch_blit(
+                    gui_skin.slider.vSlider[1], gui_bitmap, 
+                    0, 0,  gui_skin.slider.vSlider[1]->w, gui_skin.slider.vSlider[1]->h, 
+                    x, y,  gui_skin.slider.vSlider[1]->w, h);
+            
+            y+=h;
+            masked_blit(gui_skin.slider.vSlider[2], gui_bitmap, 0, 0,  x, y, gui_skin.slider.vSlider[2]->w, gui_skin.slider.vSlider[2]->h);
+
+            y = d->y + d->h - (((d->h-gui_skin.slider.vGrip->h) * d->d2)/d->d1)-gui_skin.slider.vGrip->h;
+            x = d->x + (d->w - gui_skin.slider.vGrip->w)/2;
+            if (gui_skin.slider.vGrip->w % 2 !=0) {
+                x++;
+            }
+            masked_blit(gui_skin.slider.vGrip, gui_bitmap, 0, 0,  x, y, gui_skin.slider.vGrip->w, gui_skin.slider.vGrip->h);
+        }
+        //textprintf(gui_bitmap, gui_font,10, 10, makecol(255,255,255), "%i", d->d2);
+    } else {
+        ret = d_slider_proc(msg,d,c);
+    }     
+  if (watchdog == 1) {
+    d->dp2 = (void*)gui__external_slider_callback;    
+  }
+  watchdog--;
+    return ret;
+}
+
+int tmw_check_proc(int msg, DIALOG *d, int c) {    
+    BITMAP *box = NULL;
+    int     x, y;
+    int     tx, ty, l;
+    int     rtm = 0;
+    int     col = 0;
+    if (msg == MSG_DRAW) {
+//        rectfill(gui_bitmap, d->x, d->y, d->x + d->w, d->y+d->h, d->bg);
+        if (d->flags & D_SELECTED) {
+            if (d->flags & D_DISABLED) {
+                box = gui_skin.checkbox.disabled_checked;
+            } else {
+                box = gui_skin.checkbox.checked;
+            }
+        } else if (d->flags & D_DISABLED) {
+            box = gui_skin.checkbox.disabled;
+        } else {
+            box = gui_skin.checkbox.normal;
+        }
+
+        if (d->flags & D_DISABLED) {
+            col = gui_skin.checkbox.textcolor[1];
+        } else {
+            col = gui_skin.checkbox.textcolor[0];
+        }
+
+        if (d->dp != NULL) {
+            l = gui_strlen((const char *)d->dp);
+        } else {
+            l = 0;
+        }
+
+        if (d->d1 != 0) {
+            x  = d->x;
+            tx = x + box->w + box->w/2;
+        } else {            
+            x  = d->x + d->w - box->w;
+            tx = x - box->w/2 - l;
+        }
+        y  = d->y + (d->h - box->h)/ 2;
+        ty = d->y + (d->h - alfont_text_height(gui_font)) / 2;
+
+        masked_blit(box, gui_bitmap, 0, 0, x, y, box->w, box->h);
+        if (d->dp != NULL) {
+            rtm = alfont_text_mode(-1);
+            gui_text(gui_bitmap, (const char *)d->dp, tx, ty, col, 0);
+            alfont_text_mode(rtm);
+        }
+        
+
+    } else {
+        return d_check_proc(msg, d, c);
+    }
+    return D_O_K;
+}
+
+int tmw_radio_proc(int msg, DIALOG *d, int c) {    
+    BITMAP *box = NULL;
+    int     x, y;
+    int     tx, ty, l;
+    int     rtm = 0;
+    int     col = 0;
+    
+
+    if (msg == MSG_DRAW) {
+        rectfill(gui_bitmap, d->x, d->y, d->x + d->w, d->y+d->h, d->bg);
+        if (d->flags & D_SELECTED) {
+            if (d->flags & D_DISABLED) {
+                box = gui_skin.radiobutton.disabled_checked;
+            } else {
+                box = gui_skin.radiobutton.checked;
+            }
+        } else if (d->flags & D_DISABLED) {
+            box = gui_skin.radiobutton.disabled;
+        } else {
+            box = gui_skin.radiobutton.normal;
+        }
+
+        if (d->flags & D_DISABLED) {
+            col = gui_skin.radiobutton.textcolor[1];
+        } else {
+            col = gui_skin.radiobutton.textcolor[0];
+        }
+
+        if (d->dp != NULL) {
+            l = gui_strlen((const char *)d->dp);
+        } else {
+            l = 0;
+        }
+
+        if (d->d2 != 0) {
+            x  = d->x;
+            tx = x + box->w + box->w/2;
+        } else {            
+            x  = d->x + d->w - box->w;
+            tx = x - box->w/2 - l;
+        }
+        y  = d->y + (d->h - box->h)/ 2;
+        ty = d->y + (d->h - alfont_text_height(gui_font)) / 2;
+
+        masked_blit(box, gui_bitmap, 0, 0, x, y, box->w, box->h);
+        if (d->dp != NULL) {
+            rtm = alfont_text_mode(-1);
+            gui_text(gui_bitmap, (const char *)d->dp, tx, ty, col, 0);
+            alfont_text_mode(rtm);
+        }
+        
+
+    } else {
+        return d_radio_proc(msg, d, c);        
+    }
+    return D_O_K;
+}
+
+int tmw_edit_proc(int msg, DIALOG *d, int c) {    
+//    BITMAP *box = NULL;
+    int     x;
+    int     tx, ty, l;
+    int     rtm = 0;
+    int     col = 0;
+    char*   start;
+    char*   text;
+    char    hack;
+    int     cl, cr, cb, ct;
+    int     lb, rb;
+    
+
+    if (msg == MSG_DRAW) {
+        rectfill(gui_bitmap, d->x, d->y, d->x + d->w, d->y+d->h, d->bg);        
+        drawSkinnedRect(gui_bitmap, &gui_skin.textbox.bg, d->x, d->y, d->w, d->h);
+
+        if (d->flags & D_DISABLED) {
+            col = gui_skin.textbox.textcolor[1];
+        } else {
+            col = gui_skin.textbox.textcolor[0];
+        }
+
+        lb = gui_skin.textbox.bg.grid[0]->w;
+        rb = gui_skin.textbox.bg.grid[2]->w;
+        tx = d->x + lb;
+        ty = d->y + (d->h - alfont_text_height(gui_font))/2;
+
+
+        text  = (char *)d->dp;
+        start = text;
+                
+        rtm = alfont_text_mode(-1);
+        
+        if (gui_bitmap->clip) {
+            cl = gui_bitmap->cl;
+            ct = gui_bitmap->ct;
+            cr = gui_bitmap->cr;
+            cb = gui_bitmap->cb;
+        } else {
+            cl=ct=0;
+            cr=gui_bitmap->w;
+            cb=gui_bitmap->h;
+        }
+        set_clip_rect(gui_bitmap, tx, ty, d->x+d->w-rb, ty + alfont_text_height(gui_font)); // set_clip() is deprecated use set_clip_rect() instead
+        hack        = text[d->d2];
+        text[d->d2] = '\0';
+        l = alfont_text_length(gui_font, text);
+        text[d->d2] = hack;
+        
+        if (l > d->w-lb-rb) {
+            tx += ((d->w-lb-rb) - l);
+        }
+        gui_text(gui_bitmap, start, tx, ty, col, 0);
+        
+
+        if (d->flags & D_GOTFOCUS) {
+            hack        = text[d->d2];
+            text[d->d2] = '\0';
+            x = tx + alfont_text_length(gui_font, text);
+            vline(gui_bitmap, x, ty, ty + alfont_text_height(gui_font), col);
+            text[d->d2] = hack;
+        }
+        alfont_text_mode(rtm);
+        set_clip_rect(gui_bitmap, cl, ct, cr, cb);
+    } else {
+        return d_edit_proc(msg, d, c);        
+    }
+    return D_O_K;
+}
+
+int tmw_password_proc(int msg, DIALOG *d, int c) {    
+//    BITMAP *box = NULL;
+    int     x;
+    int     tx, ty, l;
+    int     rtm = 0;
+    int     col = 0;
+    char*   start;
+    char*   text;
+    char    hack;
+    int     cl, cr, cb, ct;
+    int     lb, rb;
+    
+
+    if (msg == MSG_DRAW) {
+        rectfill(gui_bitmap, d->x, d->y, d->x + d->w, d->y+d->h, d->bg);        
+        drawSkinnedRect(gui_bitmap, &gui_skin.textbox.bg, d->x, d->y, d->w, d->h);
+
+        if (d->flags & D_DISABLED) {
+            col = gui_skin.textbox.textcolor[1];
+        } else {
+            col = gui_skin.textbox.textcolor[0];
+        }
+
+        lb = gui_skin.textbox.bg.grid[0]->w;
+        rb = gui_skin.textbox.bg.grid[2]->w;
+        tx = d->x + lb;
+        ty = d->y + (d->h - alfont_text_height(gui_font))/2;
+
+
+        text  = (char *)malloc(strlen((char *)d->dp)+1);
+    // Sull: new ansi standard
+    unsigned int i;
+    for(i=0;i<strlen((char *)d->dp);i++)text[i] = '*';
+    text[i] = '\0';
+        start = text;
+                
+        rtm = alfont_text_mode(-1);
+        
+        if (gui_bitmap->clip) {
+            cl = gui_bitmap->cl;
+            ct = gui_bitmap->ct;
+            cr = gui_bitmap->cr;
+            cb = gui_bitmap->cb;
+        } else {
+            cl=ct=0;
+            cr=gui_bitmap->w;
+            cb=gui_bitmap->h;
+        }
+        set_clip_rect(gui_bitmap, tx, ty, d->x+d->w-rb, ty + alfont_text_height(gui_font));
+
+        hack        = text[d->d2];
+        text[d->d2] = '\0';
+        l = alfont_text_length(gui_font, text);
+        text[d->d2] = hack;
+        
+        if (l > d->w-lb-rb) {
+            tx += ((d->w-lb-rb) - l);
+        }
+        gui_text(gui_bitmap, start, tx, ty, col, 0);
+        
+
+        if (d->flags & D_GOTFOCUS) {
+            hack        = text[d->d2];
+            text[d->d2] = '\0';
+            x = tx + alfont_text_length(gui_font, text);
+            vline(gui_bitmap, x, ty, ty + alfont_text_height(gui_font), col);
+            text[d->d2] = hack;
+        }
+        alfont_text_mode(rtm);
+        set_clip_rect(gui_bitmap, cl, ct, cr, cb);
+    } else {
+        return d_edit_proc(msg, d, c);        
+    }
+    return D_O_K;
+}
+
+int tmw_list_proc(int msg, DIALOG *d, int c) {    
+//    BITMAP *box = NULL;    
+
+    static int ignoreRedraw = FALSE;
+
+    int itemCount     = 0;
+    int firstItem     = d->d2;
+    int lastItem      = 0;
+    int selectedItem  = d->d1;
+    int x,y,delta;
+    int a, col;
+    int w, h          = 0;
+    int rtm           = 0;
+    int cl, cr, cb, ct;
+    int th            = alfont_text_height(gui_font);
+
+    int vscroll = 0;
+    int sliderh = 10;
+    int slidery = 0;
+
+    (*(getfuncptr)d->dp)(-1, &itemCount);
+
+    w = d->w - gui_skin.listbox.bg.grid[0]->w - gui_skin.listbox.bg.grid[2]->w;
+    h = d->h - gui_skin.listbox.bg.grid[1]->h - gui_skin.listbox.bg.grid[7]->h;
+    lastItem = MIN(itemCount-1, firstItem + h / alfont_text_height(gui_font));
+
+    
+
+    if (msg == MSG_DRAW) {
+        if (ignoreRedraw) {
+            return D_O_K;
+        }
+        rectfill(gui_bitmap, d->x, d->y, d->x + d->w, d->y+d->h, d->bg);        
+        drawSkinnedRect(gui_bitmap, &gui_skin.listbox.bg, d->x, d->y, d->w, d->h);
+
+        (*(getfuncptr)d->dp)(-1, &itemCount);
+        vscroll = (h/th) < (itemCount-1);
+        if (vscroll) {
+            w = d->w - 17 - gui_skin.listbox.bg.grid[0]->w;
+            drawSkinnedRect(gui_bitmap, &gui_skin.listbox.bg, d->x+d->w-15, d->y+1, 14, d->h-2);
+            sliderh = MAX(((d->h-2)* (h / th)) / itemCount, gui_skin.listbox.bg.grid[0]->h*2);
+            slidery = ((d->h-2-sliderh) * firstItem) / (itemCount);
+            slidery+= d->y+1;
+            drawSkinnedRect(gui_bitmap, &gui_skin.listbox.vscroll, d->x+d->w-13, slidery, 11, sliderh);
+        }
+
+        rtm = alfont_text_mode(-1);        
+        if (gui_bitmap->clip) {
+            cl = gui_bitmap->cl;
+            ct = gui_bitmap->ct;
+            cr = gui_bitmap->cr;
+            cb = gui_bitmap->cb;
+        } else {
+            cl=ct=0;
+            cr=gui_bitmap->w;
+            cb=gui_bitmap->h;
+        }
+        x = d->x + gui_skin.listbox.bg.grid[0]->w;
+        y = d->y + gui_skin.listbox.bg.grid[0]->h;        
+        set_clip_rect(gui_bitmap, x,y, x+w, y+h);
+
+
+        if (d->flags & D_DISABLED) {
+            col = gui_skin.listbox.textcolor[3];
+            for (a=firstItem; a < lastItem; a++) {
+                alfont_textout_aa(gui_bitmap, gui_font, (*(getfuncptr)d->dp)(a, 0), x, y, col);
+                y += alfont_text_height(gui_font);
+            }
+        } else {
+            for (a=firstItem; a <= lastItem; a++) {
+                if (a==d->d1) {
+                    col = gui_skin.listbox.textcolor[1];
+                    rectfill(gui_bitmap, x, y, x+w, y+alfont_text_height(gui_font)-1, gui_skin.listbox.textcolor[2]);
+                } else {
+                    col = gui_skin.listbox.textcolor[0];
+                }
+                alfont_textout_aa(gui_bitmap, gui_font, (*(getfuncptr)d->dp)(a, 0), x, y, col);
+                y += alfont_text_height(gui_font);
+            }
+        }
+
+        alfont_text_mode(rtm);
+        set_clip_rect(gui_bitmap, cl, ct, cr, cb);
+        
+    } else if (msg == MSG_CLICK) {        
+
+        x = d->x + gui_skin.listbox.bg.grid[0]->w;
+        y = d->y + gui_skin.listbox.bg.grid[0]->h;        
+
+        sliderh = MAX(((d->h-2)* (h / th)) / itemCount, gui_skin.listbox.bg.grid[0]->h*2);
+        //sliderh = ((d->h-2)* (h / th)) / itemCount;
+        slidery = ((d->h-2-sliderh) * firstItem) / (itemCount);
+        slidery+= d->y+1;
+
+        if (mouse_x > (d->x + d->w - 14) && mouse_x < (d->x+d->w-1)) {
+            // Ok, scroll bar
+            if (mouse_y >= slidery && mouse_y < slidery + sliderh) {
+                delta= mouse_y - slidery;
+                while (mouse_b) {
+                    a  = mouse_y - delta - d->y -1;
+                    a *= itemCount;
+                    a /= (d->h-2);
+                    a  = MID(0, a, itemCount- h/th);
+            
+                    if (a != d->d2) {
+                        d->d2 = a;
+                        scare_mouse();
+                        object_message(d, MSG_DRAW, 0);
+                        unscare_mouse();
+                    }
+
+                    slidery = ((d->h-2) * firstItem) / (itemCount);
+                    slidery+= d->y+1;
+                }
+            } else if (mouse_y < slidery) {
+                a = d->d2 - (h/th)+1;
+                a = MID(0, a, itemCount- h/th);
+
+
+                d->d2 = a;
+                scare_mouse();
+                object_message(d, MSG_DRAW, 0);
+                unscare_mouse();
+
+                while (mouse_b) {
+                }
+            } else if (mouse_y > slidery + sliderh) {
+                a = d->d2 + (h/th)-1;
+                a = MID(0, a, itemCount- h/th);
+                d->d2 = a;
+
+                scare_mouse();
+                object_message(d, MSG_DRAW, 0);
+                unscare_mouse();
+
+                while (mouse_b) {
+                }
+            }
+        } else if (mouse_x >= x && mouse_x < x+w && mouse_y >= y && mouse_y < y+h) {
+
+            while (mouse_b) {
+                a = firstItem + (mouse_y-y) / alfont_text_height(gui_font);
+                
+                if (a <= lastItem && a != selectedItem) {
+                    d->d1 = selectedItem = a;
+                    scare_mouse();
+                    object_message(d, MSG_DRAW, 0);
+                    unscare_mouse();
+                }       
+            }
+        }
+    } else {        
+        ignoreRedraw = (msg == MSG_GOTFOCUS || msg == MSG_LOSTFOCUS);
+        a =  d_list_proc(msg, d, c);
+
+        if (a == D_USED_CHAR) {
+            if (d->d1 < d->d2) {
+                if (d->d1 > 0) {
+                    d->d1 = d->d2;
+                }
+            } else if (d->d1 > d->d2 + h/th -1) {
+                d->d2 = d->d1 - h/th + 1;
+            }
+        }
+
+        return a;
+    }
+    return D_O_K;
+}
+
+int tmw_dialog_proc(int msg, DIALOG *d, int c) {    
+    int rtm;
+  int x, y;
+
+  if (msg == MSG_CLICK) {
+    if(mouse_y < d->y + gui_skin.dialog.bg.grid[1]->h) {
+            //drag = true;
+            d->d1 = mouse_x - d->x;
+            d->d2 = mouse_y - d->y;
+    }
+    } else if (msg == MSG_DRAW) {
+    if((mouse_b & 1)&&(d->d1>=0)&&(d->d2>=0)) {//(drag==true)) {
+      x = mouse_x-d->d1;
+      y = mouse_y-d->d2;
+      if(x<15) {
+        x=0;
+        position_mouse(d->d1, mouse_y);
+      }
+      if(y<15) {
+        y=0;
+        position_mouse(mouse_x, d->d2);
+      }
+      if(x+d->w>=785) {
+        x=800-d->w;
+        position_mouse(x+d->d1, mouse_y);
+      }
+      if(y+d->h>=585) {
+        y=600-d->h;
+        position_mouse(mouse_x, y+d->d2);
+      }
+          position_dialog(active_dialog, x, y);
+    } else {
+      //drag = false;
+      d->d1 = -1;
+      d->d2 = -1;
+    }
+        drawSkinnedRect(gui_bitmap, &gui_skin.dialog.bg, d->x, d->y, d->w, d->h);
+        rtm = alfont_text_mode(-1); 
+        alfont_textprintf_centre_aa(gui_bitmap, gui_font, 
+                          d->x + d->w/2, 
+                          d->y + (gui_skin.dialog.bg.grid[1]->h - alfont_text_height(gui_font))/2, d->fg, "%s", d->dp);
+        alfont_text_mode(rtm);
+    }
+    return D_O_K;
+}
+
+int reroute_slider_proc(void *dp3, int d2) {
+    int ret = 0;
+    
+    if (gui__external_slider_callback != NULL) {
+        ret = gui__external_slider_callback(dp3, d2);
+    }        
+    return ret;
+}
+
+// Helper function to draw a scrollable bar
+void _gui_draw_scrollable_frame(DIALOG *d, int listsize, int offset, int height, int fg_color, int bg) {
+    int i, len;
+    int xx, yy;
+
+    /* create and draw the scrollbar */
+    i = ((d->h-5) * height + listsize/2) / listsize;
+    xx = d->x+d->w-10;
+    yy = d->y;
+
+  if (offset > 0) {
+        len = (((d->h-5) * offset) + listsize/2) / listsize;
+    } else len = 0;
+    if (yy+i < d->y+d->h-3) {
+    drawSkinnedRect(gui_bitmap, &gui_skin.listbox.vscroll, xx, yy+len, 10, i);
+  } else {
+        drawSkinnedRect(gui_bitmap, &gui_skin.listbox.vscroll, xx, yy, 10, d->h-3);
+  }
+}
+
+/* _gui_draw_textbox:
+ *  Helper function to draw a textbox object.
+ */
+void _gui_draw_textbox(char *thetext, int *listsize, int draw, int offset,
+       int wword, int tabsize, int x, int y, int w, int h,
+       int disabled, int fore, int deselect, int disable)
+{
+   int fg = fore;
+   int y1 = y+4;
+   int x1;
+   int len;
+   int ww = w-6;
+   char s[16];
+   char text[16];
+   char space[16];
+   char *printed = text;
+   char *scanned = text;
+   char *oldscan = text;
+   char *ignore = NULL;
+   char *tmp, *ptmp;
+   int width;
+   int line = 0;
+   int i = 0;
+   int noignore;
+   int rtm;
+
+   usetc(s+usetc(s, '.'), 0);
+   usetc(text+usetc(text, ' '), 0);
+   usetc(space+usetc(space, ' '), 0);
+
+   /* find the correct text */
+   if (thetext != NULL) {
+      printed = thetext;
+      scanned = thetext;
+   }
+
+   /* choose the text color */
+   if (disabled) 
+      fg = disable;
+
+   rtm = alfont_text_mode(-1);
+
+   /* loop over the entire string */
+   while (1) {
+      width = 0;
+
+      /* find the next break */
+      while (ugetc(scanned)) {
+   /* check for a forced break */
+   if (ugetc(scanned) == '\n') {
+      scanned += uwidth(scanned);
+
+      /* we are done parsing the line end */
+      break;
+   }
+
+   /* the next character length */
+   usetc(s+usetc(s, ugetc(scanned)), 0);
+   len = alfont_text_length(gui_font, s);
+
+   /* modify length if its a tab */
+   if (ugetc(s) == '\t') 
+      len = tabsize * alfont_text_length(gui_font, space);
+
+   /* check for the end of a line by excess width of next char */
+   if (width+len >= ww) {
+      /* we have reached end of line do we go back to find start */
+      if (wword) {
+         /* remember where we were */
+         oldscan = scanned;
+         noignore = FALSE;
+
+         /* go backwards looking for start of word */
+         while (!uisspace(ugetc(scanned))) {
+      /* don't wrap too far */
+      if (scanned == printed) {
+         /* the whole line is filled, so stop here */
+         tmp = ptmp = scanned;
+         while (ptmp != oldscan) {
+      ptmp = tmp;
+      tmp += uwidth(tmp);
+         }
+         scanned = ptmp;
+         noignore = TRUE;
+         break;
+      }
+      /* look further backwards to wrap */
+      tmp = ptmp = printed;
+      while (tmp < scanned) {
+         ptmp = tmp;
+         tmp += uwidth(tmp);
+      }
+      scanned = ptmp;
+         }
+         /* put the space at the end of the line */
+         if (!noignore) {
+      ignore = scanned;
+      scanned += uwidth(scanned);
+         }
+         else
+      ignore = NULL;
+
+         /* check for endline at the convenient place */
+         if (ugetc(scanned) == '\n') 
+      scanned += uwidth(scanned);
+      }
+      /* we are done parsing the line end */
+      break;
+   }
+
+   /* the character can be added */
+   scanned += uwidth(scanned);
+   width += len;
+      }
+
+      /* check if we are to print it */
+      if ((draw) && (line >= offset) && (y1+text_height(font) < (y+h-3))) {
+   x1 = x+4;
+
+   /* the initial blank bit */
+   //rectfill(gui_bitmap, x+2, y1, x1-1, y1+text_height(font), deselect);
+
+   /* print up to the marked character */
+   while (printed != scanned) {
+      /* do special stuff for each charater */
+      switch (ugetc(printed)) {
+
+         case '\r':
+         case '\n':
+      /* don't print endlines in the text */
+      break;
+
+         /* possibly expand the tabs */
+         case '\t':
+      for (i=0; i<tabsize; i++) {
+         usetc(s+usetc(s, ' '), 0);
+         alfont_textout_aa(gui_bitmap, gui_font, s, x1, y1, fg);
+         x1 += alfont_text_length(gui_font, s);
+      }
+      break;
+
+         /* print a normal character */
+         default:
+      if (printed != ignore) {
+         usetc(s+usetc(s, ugetc(printed)), 0);
+         alfont_textout_aa(gui_bitmap, gui_font, s, x1, y1, fg);
+         x1 += alfont_text_length(gui_font, s);
+      }
+      }
+
+      /* goto the next character */
+      printed += uwidth(printed);
+   }
+   /* the last blank bit */
+   /*if (x1 <= x+w-3) 
+      rectfill(gui_bitmap, x1, y1, x+w-3, y1+alfont_text_height(gui_font)-1, deselect);*/
+
+   /* print the line end */
+   y1 += alfont_text_height(gui_font);
+      }
+      printed = scanned;
+
+      /* we have done a line */
+      line++;
+
+      /* check if we are at the end of the string */
+      if (!ugetc(printed)) {
+   /* the under blank bit */
+   /*if (draw) 
+      rectfill(gui_bitmap, x+1, y1, x+w-3, y+h-1, deselect);*/
+
+   /* tell how many lines we found */
+   *listsize = line;
+   alfont_text_mode(rtm);
+   return;
+      }
+   }
+
+   alfont_text_mode(rtm);
+}
+
+int tmw_textbox_proc(int msg, DIALOG *d, int c) {
+   int height, bar, ret = D_O_K;
+   int start, top, bottom, l;
+   int used, delta;
+   int fg_color = (d->flags & D_DISABLED) ? gui_mg_color : d->fg;
+
+   /* calculate the actual height */
+   height = (d->h-8) / alfont_text_height(gui_font);
+
+   switch (msg) {
+
+      case MSG_START:
+   /* measure how many lines of text we contain */
+   _gui_draw_textbox((char *)d->dp, &d->d1, 
+           0, /* DONT DRAW anything */
+           d->d2, !(d->flags & D_SELECTED), 8,
+           d->x, d->y, d->w, d->h,
+           (d->flags & D_DISABLED),
+           0, 0, 0);
+   break;
+
+      case MSG_DRAW:
+   /* tell the object to sort of draw, but only calculate the listsize */
+   _gui_draw_textbox((char *)d->dp, &d->d1, 
+           0, /* DONT DRAW anything */
+           d->d2, !(d->flags & D_SELECTED), 8,
+           d->x, d->y, d->w, d->h,
+           (d->flags & D_DISABLED),
+           0, 0, 0);
+
+   if (d->d1 > height) {
+      bar = 12;
+   }
+   else {
+      bar = 0;
+      d->d2 = 0;
+   }
+
+   /* now do the actual drawing */
+   _gui_draw_textbox((char *)d->dp, &d->d1, 1, d->d2,
+           !(d->flags & D_SELECTED), 8,
+           d->x, d->y, d->w-bar, d->h,
+           (d->flags & D_DISABLED),
+           fg_color, d->bg, gui_mg_color);
+
+   /* draw the frame around */
+   _gui_draw_scrollable_frame(d, d->d1, d->d2, height, fg_color, d->bg);
+   
+   break;
+
+      case MSG_CLICK:
+         /* figure out if it's on the text or the scrollbar */
+   bar = (d->d1 > height);
+
+   if ((!bar) || (gui_mouse_x() < d->x+d->w-13)) {
+      /* clicked on the text area */
+      ret = D_O_K;
+   }
+   else {
+      /* clicked on the scroll area */
+      _handle_scrollable_scroll_click(d, d->d1, &d->d2, height);
+   }
+   break;
+
+      case MSG_CHAR:
+   start = d->d2;
+   used = D_USED_CHAR;
+
+   if (d->d1 > 0) {
+      if (d->d2 > 0) 
+         top = d->d2+1;
+      else 
+         top = 0;
+
+      l = (d->h-8)/alfont_text_height(gui_font);
+
+      bottom = d->d2 + l - 1;
+      if (bottom >= d->d1-1) 
+         bottom = d->d1-1;
+      else 
+         bottom--;
+
+      if ((c>>8) == KEY_UP) 
+         d->d2--;
+      else if ((c>>8) == KEY_DOWN) 
+         d->d2++;
+      else if ((c>>8) == KEY_HOME) 
+         d->d2 = 0;
+      else if ((c>>8) == KEY_END) 
+         d->d2 = d->d1-l;
+      else if ((c>>8) == KEY_PGUP) 
+         d->d2 -= (bottom-top) ? bottom-top : 1;
+      else if ((c>>8) == KEY_PGDN) 
+         d->d2 += (bottom-top) ? bottom-top : 1;
+      else 
+         used = D_O_K;
+
+      /* make sure that the list stays in bounds */
+      if (d->d2 > d->d1-l) 
+         d->d2 = d->d1-l;
+      if (d->d2 < 0) 
+         d->d2 = 0;
+   }
+   else 
+      used = D_O_K;
+
+   /* if we changed something, better redraw... */
+   if (d->d2 != start)
+      d->flags |= D_DIRTY;
+
+   ret = used;
+   break;
+      
+      case MSG_WHEEL:
+   l = (d->h-8)/alfont_text_height(gui_font);
+   delta = (l > 3) ? 3 : 1;
+
+   /* scroll, making sure that the list stays in bounds */
+   start = d->d2;
+   d->d2 = (c > 0) ? MAX(0, d->d2-delta) : MIN(d->d1-l, d->d2+delta);
+
+   /* if we changed something, better redraw... */
+   if (d->d2 != start)
+      d->flags |= D_DIRTY;
+
+   ret = D_O_K;
+   break;
+
+      case MSG_WANTFOCUS:
+   /* if we don't have a scrollbar we can't do anything with the focus */
+   if (d->d1 > height) 
+      ret = D_WANTFOCUS;
+   break;
+
+      default:
+   ret = D_O_K;
+   }
+
+   return ret;
+}
+
+int tmw_bitmap_proc(int msg, DIALOG *d, int c) {
+  if(msg==MSG_DRAW) {
+    drawSkinnedRect(gui_bitmap, &gui_skin.textbox.bg, d->x, d->y, d->w, d->h);
+    if(d->dp!=NULL)
+            masked_blit(((BITMAP *)d->dp), gui_bitmap, 0, 0, d->x+(d->w-d->d1)/2, d->y+2, d->d1, d->d2);
+  }
+  return D_O_K;
+}
+
+void ok(const char *title, const char *message) {
+DIALOG alert_dialog[] = {
+   /* (dialog proc)     (x)   (y)   (w)   (h)   (fg)  (bg)  (key) (flags)     (d1)                    (d2)  (dp)              (dp2) (dp3) */
+   { tmw_dialog_proc,     0,    0,  0,     60,    0,  -1,    0,    0,          0,                      0,    (void *)title,    NULL, NULL  },
+   { tmw_text_proc,       2,   22,  0,      0,    0,   0,    0,    0,          0,                      0,    (void *)message,  NULL, NULL  },
+   { tmw_button_proc,     0,   40,  44,    18,    0,  -1,    'o',  D_EXIT,    -1,                      0,    (char *)"&Ok",    NULL, NULL  },
+   { NULL,                0,    0,   0,     0,    0,   0,    0,    0,          0,                      0,    NULL,             NULL, NULL  }};
+
+   BITMAP *temp = gui_bitmap;
+   gui_bitmap = screen;
+   show_mouse(screen);
+   alert_dialog[0].w = alfont_text_length(gui_font, message)+4;
+   alert_dialog[1].w = alfont_text_length(gui_font, message);
+   alert_dialog[1].h = alfont_text_height(gui_font);
+   alert_dialog[2].x = alfont_text_length(gui_font, message)/2-22;
+   position_dialog(alert_dialog, 400-alert_dialog[0].w/2, 270);
+   do_dialog(alert_dialog, 2);
+   show_mouse(NULL);
+   gui_bitmap = temp;
+}
+
+unsigned int yes_no(const char *title, const char *message) {
+  unsigned int ret;
+  DIALOG alert_dialog[] = {
+   /* (dialog proc)     (x)   (y)   (w)   (h)   (fg)  (bg)  (key) (flags)     (d1)                    (d2)  (dp)              (dp2) (dp3) */
+   { tmw_dialog_proc,     0,    0,  0,     60,    0,  -1,    0,    0,          0,                      0,    (void *)title,    NULL, NULL  },
+   { tmw_text_proc,       2,   22,  0,      0,    0,   0,    0,    0,          0,                      0,    (void *)message,  NULL, NULL  },
+   { tmw_button_proc,     0,   40,  44,    18,    0,  -1,    'o',  D_EXIT,    -1,                      0,    (char *)"&Yes",   NULL, NULL  },
+   { tmw_button_proc,     0,   40,  44,    18,    0,  -1,    'o',  D_EXIT,    -1,                      0,    (char *)"&No",    NULL, NULL  },
+   { NULL,                0,    0,   0,     0,    0,   0,    0,    0,          0,                      0,    NULL,             NULL, NULL  }};
+
+   BITMAP *temp = gui_bitmap;
+   gui_bitmap = screen;
+   show_mouse(screen);
+   int width = alfont_text_length(gui_font, message)+4;
+   if(width<100)width=100;
+   alert_dialog[0].w = width;
+   alert_dialog[1].w = alfont_text_length(gui_font, message);
+   alert_dialog[1].h = alfont_text_height(gui_font);
+   alert_dialog[2].x = width/2-46;
+   alert_dialog[2].x = width/2+2;
+   position_dialog(alert_dialog, 400-width/2, 270);
+   ret = do_dialog(alert_dialog, 3);
+   show_mouse(NULL);
+   gui_bitmap = temp;
+   return ret-2;
+}
diff --git a/src/gui/gui.h b/src/gui/gui.h
new file mode 100644
index 00000000..36973b65
--- /dev/null
+++ b/src/gui/gui.h
@@ -0,0 +1,121 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#ifdef WIN32
+  #pragma warning (disable:4312)
+#endif
+
+#ifndef _TMW_GUI
+#define _TMW_GUI
+
+#include <allegro.h>
+#include <alfont.h>
+#include <string.h>
+
+typedef struct {    
+    BITMAP *grid[9];
+} LexSkinnedRect;
+
+typedef struct {
+    LexSkinnedRect  background[4];
+    int             textcolor[4];
+} LexButton;
+
+typedef struct {
+    BITMAP          *hSlider[3];
+    BITMAP          *vSlider[3];
+    BITMAP          *hGrip;
+    BITMAP          *vGrip;
+} LexSlider;
+
+typedef struct {
+    BITMAP *normal;
+    BITMAP *checked;
+    BITMAP *disabled;
+    BITMAP *disabled_checked;
+    int     textcolor[2];
+} LexCheckbox;
+
+typedef struct {
+    BITMAP *normal;
+    BITMAP *checked;
+    BITMAP *disabled;
+    BITMAP *disabled_checked;
+    int     textcolor[2];
+} LexRadiobutton;
+
+typedef struct {
+    LexSkinnedRect bg;
+    int            textcolor[2];
+} LexTextbox;
+
+typedef struct {
+    LexSkinnedRect bg;
+    LexSkinnedRect vscroll;
+    int            textcolor[4];
+} LexListbox;
+
+typedef struct {
+    LexSkinnedRect bg;
+} LexDialog;
+
+typedef struct {
+    LexButton      button;
+    LexSlider      slider;
+    LexCheckbox    checkbox;
+    LexRadiobutton radiobutton;
+    LexTextbox     textbox;
+    LexListbox     listbox;
+    LexDialog      dialog;
+} LexSkin;
+
+extern LexSkin gui_skin;
+extern BITMAP *gui_bitmap;
+extern ALFONT_FONT *gui_font;
+
+/* Definition of the callback function prototypes */
+typedef int (*gui_buttonCallback)(int id);
+typedef char *(*getfuncptr)(int, int *);
+
+void init_gui(BITMAP *dest_bitmap, const char *skin);
+void gui_exit();
+int  gui_update(DIALOG_PLAYER *player);
+int  gui_load_skin(const char* skinname);
+void gui_shutdown(void);
+
+int tmw_button_proc(int msg, DIALOG *d, int c);
+int tmw_slider_proc(int msg, DIALOG *d, int c);
+int tmw_check_proc(int msg, DIALOG *d, int c);
+int tmw_radio_proc(int msg, DIALOG *d, int c);
+int tmw_edit_proc(int msg, DIALOG *d, int c);
+int tmw_password_proc(int msg, DIALOG *d, int c);
+int tmw_list_proc(int msg, DIALOG *d, int c);
+int tmw_text_proc(int msg, DIALOG *d, int c);
+int tmw_dialog_proc(int msg, DIALOG *d, int c);
+int tmw_textbox_proc(int msg, DIALOG *d, int c);
+int tmw_bitmap_proc(int msg, DIALOG *d, int c);
+
+void ok(const char *title, const char *message);
+unsigned int yes_no(const char *title, const char *message);
+
+#endif 
diff --git a/src/gui/inventory.cpp b/src/gui/inventory.cpp
new file mode 100644
index 00000000..72c2cbaa
--- /dev/null
+++ b/src/gui/inventory.cpp
@@ -0,0 +1,249 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#include "inventory.h"
+
+void TmwInventory::create(int tempxpos, int tempypos) {
+	xpos =tempxpos;
+	ypos =tempypos;
+
+	itemPIC[0].pic = load_bitmap("items/herb.bmp", NULL); //ID=0
+	itemPIC[1].pic = load_bitmap("items/magicthing.bmp", NULL); //ID=1
+	empty = load_bitmap("items/empty.bmp", NULL);
+	selected = load_bitmap("items/selected.bmp", NULL);
+
+	for(int i = 0; i< 10; i++) {
+		for(int ii = 0; ii< 10; ii++) {
+			items[i][ii].flag = 0; //doesn't hold anything
+			items[i][ii].itemIDNum = -1; //doesn't exist :)
+			items[i][ii].xpos = empty->w*i+1;
+			items[i][ii].ypos = empty->h*ii;
+			items[i][ii].num = 0;
+		}
+	}
+
+	//create two fake items
+	items[0][0].flag = 1;
+	items[0][0].itemIDNum = 0;
+	items[0][0].num = 1;
+
+	items[2][0].flag = 1;
+	items[2][0].itemIDNum = 1;
+	items[2][0].num = 3;
+
+	backgroundSmall = create_bitmap(empty->w*10+10, empty->h+10);
+	backgroundBig = create_bitmap(empty->w*10+10, empty->h*10+10);
+	title = create_bitmap(15, backgroundSmall->h);
+	floodfill(title,0,0,200);
+	floodfill(backgroundSmall,0,0,100);
+	floodfill(backgroundBig,0,0,100);
+	areDisplaying = 0;
+	dragingWindow = 0;
+	lastSelectedX = -1;
+	lastSelectedY = -1;
+	bigwindow = 0; //false 
+}
+
+void TmwInventory::draw(BITMAP * buffer) {
+	// let's draw the inventory
+	if(areDisplaying) {
+		int max;
+		if(!bigwindow) {
+			max = 1;
+			blit(backgroundSmall, buffer, 0, 0, xpos-5, ypos-5, 800, 600);
+		} else {
+			max = 10;
+			blit(backgroundBig, buffer, 0, 0, xpos-5, ypos-5, 800, 600);
+		}
+		blit(title, buffer, 0, 0, xpos+backgroundSmall->w-5, ypos+-5, 800, 600);
+		for(int itemX = 0; itemX< 10; itemX++) {
+			for(int itemY = 0;itemY<max;itemY++) {
+				int draw = 0;
+	
+				blit(empty, buffer, 0, 0, (xpos+items[itemX][itemY].xpos), (ypos+items[itemX][itemY].ypos), 800, 600);
+	
+				if(mouse_b&1) {
+					if(xpos+items[itemX][itemY].xpos+empty->w > mouse_x && xpos+items[itemX][itemY].xpos < mouse_x)
+						if(ypos+items[itemX][itemY].ypos+empty->h > mouse_y && ypos+items[itemX][itemY].ypos < mouse_y) {
+						//selected
+						masked_blit(selected, buffer, 0, 0, (xpos+items[itemX][itemY].xpos), (ypos+items[itemX][itemY].ypos), 800, 600);
+						draw = 1;
+						if(items[itemX][itemY].flag) // have a item
+							if(!dragingItem) { //not dragging it
+								dragingItem=1; //begin to drag
+								ghostOldIDX = itemX;
+								ghostOldIDY = itemY; 
+								ghostID = items[itemX][itemY].itemIDNum;
+								ghostX = mouse_x;
+								ghostY = mouse_y;
+							}
+						}
+					} else {
+						if(lastSelectedX != -1 && dragingItem) { // have stoped dragging it over a itemholder
+							//swap place
+							itemHolder temp;
+							int txpos1,typos1,txpos2,typos2;
+							txpos1 = items[lastSelectedX][lastSelectedY].xpos;
+							typos1 = items[lastSelectedX][lastSelectedY].ypos;
+							txpos2 = items[ghostOldIDX][ghostOldIDY].xpos;
+							typos2 = items[ghostOldIDX][ghostOldIDY].ypos;
+							temp = items[lastSelectedX][lastSelectedY];
+							items[lastSelectedX][lastSelectedY] = items[ghostOldIDX][ghostOldIDY];
+							items[ghostOldIDX][ghostOldIDY] = temp;
+							items[lastSelectedX][lastSelectedY].xpos = txpos1;
+							items[lastSelectedX][lastSelectedY].ypos = typos1;
+							items[ghostOldIDX][ghostOldIDY].xpos = txpos2;
+							items[ghostOldIDX][ghostOldIDY].ypos = typos2;
+						}
+						dragingItem = 0; // stop dragging
+					}
+	
+					if(xpos+items[itemX][itemY].xpos+empty->w > mouse_x && xpos+items[itemX][itemY].xpos < mouse_x && ypos+items[itemX][itemY].ypos+empty->h > mouse_y && ypos+items[itemX][itemY].ypos < mouse_y ) {
+							// a hoover
+							lastSelectedX = itemX;
+							lastSelectedY = itemY;
+					}
+		
+					if(items[itemX][itemY].flag) //draw the item
+						masked_blit(itemPIC[items[itemX][itemY].itemIDNum].pic, buffer, 0, 0, (xpos+items[itemX][itemY].xpos), (ypos+items[itemX][itemY].ypos), 800, 600);
+		
+					//the number of that item
+					if(!bigwindow)
+						alfont_textprintf_aa(buffer, gui_font, xpos+items[itemX][itemY].xpos+20, ypos+items[itemX][itemY].ypos+empty->h-15, makecol(0,0,0), "%i",items[itemX][itemY].num);
+					else
+						alfont_textprintf_aa(buffer, gui_font, xpos+items[itemX][itemY].xpos+20, ypos+items[itemX][itemY].ypos+empty->h-15, makecol(0,0,0), "%i",items[itemX][itemY].num);
+				}
+			}
+	
+		
+		if(mouse_b&2)	{
+			if(xpos+title->w+backgroundSmall->w > mouse_x && xpos+backgroundSmall->w < mouse_x)
+				if(ypos+title->h > mouse_y && ypos < mouse_y) {
+					if(bigwindow)
+						bigwindow=0;
+					else
+						bigwindow = 1;
+				}
+			}
+	}
+
+	if(mouse_b&1) {
+		if(xpos+title->w+backgroundSmall->w > mouse_x && xpos+backgroundSmall->w < mouse_x)
+			if(ypos+title->h > mouse_y && ypos < mouse_y) { //begin to move the window
+				xpos = mouse_x-(backgroundSmall->w);
+				ypos = mouse_y;
+				dragingWindow=1;
+			}
+	} else { dragingWindow=0;}
+				
+	if(dragingWindow) { //moving the window ?
+		xpos = mouse_x-(backgroundSmall->w);
+		ypos = mouse_y;
+	}
+			
+	if(dragingItem) { //moving the item
+ 		masked_blit(itemPIC[ghostID].pic, buffer, 0, 0, ghostX, ghostY, 800, 600);
+		ghostX = mouse_x;
+		ghostY = mouse_y;
+	}
+}
+
+
+void TmwInventory::show(int val) {
+	if(val)
+		areDisplaying = 1;
+
+	if(!val)
+		areDisplaying = 0; 
+}
+
+int TmwInventory::addItem(int idnum, int antal)
+{
+int found, tempi, tempii;
+found = 0;
+tempi = -1;
+for(int i = 0; i< 10; i++)
+	{
+	for(int ii = 0; ii< 10; ii++)
+		{
+		if(items[i][ii].itemIDNum == idnum)
+			{ found = 1; items[i][ii].num = antal; return -2; }
+		}
+	}
+if(!found)
+{
+for(int ii = 0; ii< 10; ii++)
+	{
+	for(int i = 0; i< 10; i++)
+		{
+	if(items[i][ii].flag == 0)
+		{tempi = i; tempii = ii; ii=10;i=10;}
+		}
+	}
+	if(tempi != -1)
+	{
+	items[tempi][tempii].flag = 1;
+	items[tempi][tempii].itemIDNum = idnum;
+	items[tempi][tempii].num = antal;
+	return 1;
+	} else { return -1; }
+	
+}
+return -3;
+}
+
+int TmwInventory::rmItem(int idnum)
+{
+int found, tempi;
+found = 0;
+tempi = -1;
+for(int i = 0; i< 10; i++)
+	{
+	for(int ii = 0; ii< 10; ii++)
+		{
+		if(items[i][ii].itemIDNum == idnum)
+			{ items[i][ii].itemIDNum = -1;
+			items[i][ii].flag = 0;
+			items[i][ii].num = 0;
+			return 1;
+			}
+		}
+	}
+return -1;
+}
+
+int TmwInventory::changeNum(int idnum, int antal)
+{
+int found, tempi;
+found = 0;
+tempi = -1;
+for(int i = 0; i< 10; i++)
+	{
+	for(int ii = 0; ii< 10; ii++)
+		{
+		if(items[i][ii].itemIDNum == idnum)
+			{ items[i][ii].num = antal; return 1; }
+		}
+	}
+return -1;
+}
\ No newline at end of file
diff --git a/src/gui/inventory.h b/src/gui/inventory.h
new file mode 100644
index 00000000..75939950
--- /dev/null
+++ b/src/gui/inventory.h
@@ -0,0 +1,80 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#ifdef WIN32
+  #pragma warning (disable:4312)
+#endif
+
+#ifndef _INVENTORY_H
+#define _INVENTORY_H 
+#include <allegro.h>
+#ifdef WIN32
+#include <winalleg.h>
+#endif
+#include "../main.h"
+#include "../game.h"
+#include "../log.h"
+#include "../Net/network.h"
+#include "gui.h"
+
+struct itemHolder { // the holder of a item
+	int flag;		 // don't really know why I use this :)
+	int itemIDNum;  // the id of the item
+	int num;	    // number of items
+	int xpos,ypos;  // where am I?
+};
+
+struct itemID {//the holder of the pictures for each item, maybe more in the future
+	BITMAP * pic;
+};
+
+class TmwInventory{
+	public:
+		TmwInventory() {};
+		~TmwInventory() {};
+
+		void create(int tempxpos, int tempypos); // create the window
+		void draw(BITMAP *); // draw the window (if areDisplaying != 0 )
+		void show(int val); // choose between the show and don't show the window
+		void toggle() { if(areDisplaying){show(0);}else{show(1);} }
+		//API
+		int addItem(int idnum, int antal); //add a item
+		int rmItem(int idnum); //remove a item
+		int changeNum(int idnum, int antal); // change nummber of a item
+		//END API
+	private:
+		BITMAP * backgroundSmall;
+		BITMAP * backgroundBig;
+		BITMAP * title;
+		BITMAP * empty;
+		BITMAP * selected;
+		itemHolder items[10][10]; // this is the test holder of items
+		itemID     itemPIC[2]; // I only got two items
+		int			ghostX, ghostY, ghostID, ghostOldIDX,ghostOldIDY; //info needed when moving item
+		int dragingItem, lastSelectedX,lastSelectedY; //info needed when moving item
+		int areDisplaying, dragingWindow;
+		int bigwindow;
+		int xpos, ypos; // Where am I ?
+};
+
+#endif
diff --git a/src/gui/login.cpp b/src/gui/login.cpp
new file mode 100644
index 00000000..e3cb6195
--- /dev/null
+++ b/src/gui/login.cpp
@@ -0,0 +1,139 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#include "login.h"
+#include "../Graphic/graphic.h"
+
+/** Display login GUI */
+void login() {
+DIALOG login_dialog[] = {
+   /* (dialog proc)     (x)   (y)   (w)   (h)   (fg)  (bg)  (key) (flags)     (d1)                    (d2)  (dp)              (dp2) (dp3) */
+   { tmw_dialog_proc,   300,  252,  200,   96,    0,  -1,    0,    0,          0,                      0,    (char*)"Login",         NULL, NULL  },
+   { tmw_text_proc,     304,  284,  50,    10,    0,   0,    0,    0,          0,                      0,    (char*)"Name:",         NULL, NULL  },
+   { tmw_text_proc,     304,  304,  50,    10,    0,   0,    0,    0,          0,                      0,(char*)"Password:",         NULL, NULL  },
+   { tmw_edit_proc,     360,  280,  130,   18,    0,  -1,    0,    0,          24,                     0,          username,         NULL, NULL  },
+   { tmw_password_proc, 360,  300,  130,   18,    0,  -1,    0,    0,          24,                     0,          password,         NULL, NULL  },
+   { tmw_button_proc,   398,  322,  44,    18,    0,  -1,    'o',  D_EXIT,    -1,                      0,      (char*)"&Ok",         NULL, NULL  },
+   { tmw_button_proc,   446,  322,  44,    18,    0,  -1,    'c',  D_EXIT,    -1,                      0,  (char*)"&Cancel",         NULL, NULL  },
+   { tmw_check_proc,    304,  322,  60,    18,    0,   0,    '1',  0,          0,                      0,     (char*)"keep",         NULL, NULL  }, 
+   { NULL,                0,    0,   0,     0,    0,   0,    0,    0,          0,                      0,              NULL,         NULL, NULL  },
+};
+
+	if(get_config_int("login", "remember", 0)!=0) {
+		login_dialog[7].flags = D_SELECTED;
+		if(get_config_string("login", "username", 0))strcpy(username, get_config_string("login", "username", 0));
+        else strcpy(username, "player\0");
+	}
+	centre_dialog(login_dialog);
+	DIALOG_PLAYER *player = init_dialog(login_dialog, -1);
+	int gui_exit = 1;
+	while ((!key[KEY_ESC])&&(gui_exit)&&(state!=EXIT)&&(!key[KEY_ENTER])) {
+		clear_bitmap(buffer);
+		if(stretch_mode!=0)blit((BITMAP *)graphic[LOGIN_BMP].dat, buffer, 0, 0, 80, 60, 640, 480);
+		else blit((BITMAP *)graphic[LOGIN_BMP].dat, buffer, 0, 0, -120, -90, 640, 480);
+
+		gui_exit = gui_update(player);
+		blit(buffer, screen, 0, 0, 0, 0, 800, 600);
+	}
+	state = EXIT;
+	set_config_int("login", "remember", (login_dialog[7].flags & D_SELECTED)>>1);
+	if(login_dialog[7].flags & D_SELECTED) {
+    if(!username)strcpy(username, "player\0");
+    set_config_string("login", "username", username);
+  } else set_config_string("login", "username", "player\0");
+	log("Player", "username", username);
+  gui_exit = shutdown_dialog(player);
+	if((gui_exit==5)||(key[KEY_ENTER])) {
+        if(username[0]=='\0') {
+            ok("Error", "Enter your username first");
+            warning("Enter your username first");
+            state = LOGIN;
+        } else {
+            server_login();
+            close_session();
+        }
+	}
+}
+
+/** Attempt to login to login server */
+void server_login() {
+	int ret;    
+
+    // Connect to login server
+	ret = open_session(get_config_string("server", "host", 0), get_config_int("server", "port", 0));
+	if(ret==SOCKET_ERROR) {
+		state = LOGIN;
+		ok("Error", "Unable to connect to login server");
+		warning("Unable to connect to login server");
+		return;
+	}
+	
+	// Send login infos
+	
+
+	WFIFOW(0) = net_w_value(0x0064);
+	
+	WFIFOL(2) = 0;
+	memcpy(WFIFOP(6), username, 24);
+	memcpy(WFIFOP(30), password, 24);
+	WFIFOB(54) = 0;
+	WFIFOSET(55);
+
+	while((in_size<23)||(out_size>0))flush();
+	log_hex("Login_Packet", "Packet_ID", RFIFOW(0));
+    log_int("Login_Packet", "Packet_length", get_packet_length(RFIFOW(0)));
+		
+	if(RFIFOW(0)==0x0069) {
+		while(in_size<RFIFOW(2))flush();
+		n_server = (RFIFOW(2)-47)/32;
+		server_info = (SERVER_INFO *)malloc(sizeof(SERVER_INFO)*n_server);
+		account_ID = RFIFOL(8);
+		session_ID1 = RFIFOL(4);
+		session_ID2 = RFIFOL(12);
+		sex = RFIFOB(46);
+		for(int i=0;i<n_server;i++) {
+			server_info[i].address = RFIFOL(47+32*i);
+			memcpy(server_info[i].name, RFIFOP(47+32*i+6), 20);
+			server_info[i].online_users = RFIFOW(47+32*i+26);
+			server_info[i].port = RFIFOW(47+32*i+4);
+			state = CHAR_SERVER;
+		}
+		log("Login_Packet", "server_address", iptostring(server_info[0].address));
+		log("Login_Packet", "server_name", server_info[0].name);
+		log_int("Login_Packet", "server_users", server_info[0].online_users);
+		log_int("Login_Packet", "server_port", server_info[0].port);
+		RFIFOSKIP(RFIFOW(2));
+	} else if(RFIFOW(0)==0x006a) {
+		switch(RFIFOB(2)) {
+			case 0:
+				ok("Error", "Unregistered ID");
+				break;
+			case 1:
+				ok("Error", "Wrong password");
+				break;
+		}
+		state = LOGIN;
+		RFIFOSKIP(23);
+	} else ok("Error", "Unknown error");
+	// Todo: add other packets, also encrypted
+}
diff --git a/src/gui/login.h b/src/gui/login.h
new file mode 100644
index 00000000..c181e0eb
--- /dev/null
+++ b/src/gui/login.h
@@ -0,0 +1,43 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#ifdef WIN32
+  #pragma warning (disable:4312)
+#endif
+
+#ifndef _LOGIN_H
+#define _LOGIN_H 
+
+#include <allegro.h>
+#ifdef WIN32
+#include <winalleg.h>
+#endif
+#include "../main.h"
+#include "../log.h"
+#include "../Net/network.h"
+#include "gui.h"
+
+void login();
+void server_login();
+
+#endif
diff --git a/src/gui/skill.cpp b/src/gui/skill.cpp
new file mode 100644
index 00000000..f1ccdcc2
--- /dev/null
+++ b/src/gui/skill.cpp
@@ -0,0 +1,56 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+		By ElvenProgrammer aka Eugenio Favalli (umperio@users.sourceforge.net)
+
+*/
+
+#include "skill.h"
+
+extern CHAR_SEL_INFO  *char_info;
+
+char str_string[8];
+char agi_string[8];
+char vit_string[8];
+char int_string[8];
+char dex_string[8];
+char luk_string[8];
+
+DIALOG skill_dialog[] = {
+   /* (dialog proc)     (x)   (y)   (w)   (h)   (fg)  (bg)  (key) (flags)  (d1)                    (d2)  (dp)              (dp2) (dp3) */
+   { tmw_dialog_proc,     300,  200,  120,   60,  0,    0,    0,    0,       0,                0,    (char *)"Skill",  NULL, NULL  },
+   { tmw_text_proc,       304,  224,  252,  100,  0,    0,    0,    0,       0,                0,    str_string,       NULL, NULL  },
+   { tmw_text_proc,       304,  234,  252,  100,  0,    0,    0,    0,       0,                0,    agi_string,       NULL, NULL  },
+   { tmw_text_proc,       304,  244,  252,  100,  0,    0,    0,    0,       0,                0,    vit_string,       NULL, NULL  },
+   { tmw_text_proc,       364,  224,  252,  100,  0,    0,    0,    0,       0,                0,    int_string,       NULL, NULL  },
+   { tmw_text_proc,       364,  234,  252,  100,  0,    0,    0,    0,       0,                0,    dex_string,       NULL, NULL  },
+   { tmw_text_proc,       364,  244,  252,  100,  0,    0,    0,    0,       0,                0,    luk_string,       NULL, NULL  },
+   { NULL,                0,    0,    0,    0,    0,    0,    0,    0,       0,                0,    NULL,             NULL, NULL  }
+};
+
+void update_skill_dialog() {
+	sprintf(str_string, "STR: %i", char_info->STR);
+	sprintf(agi_string, "AGI: %i", char_info->AGI);
+	sprintf(vit_string, "VIT: %i", char_info->VIT);
+	sprintf(int_string, "INT: %i", char_info->INT);
+	sprintf(dex_string, "DEX: %i", char_info->DEX);
+	sprintf(luk_string, "LUK: %i", char_info->LUK);
+}
diff --git a/src/gui/skill.h b/src/gui/skill.h
new file mode 100644
index 00000000..a0ce031d
--- /dev/null
+++ b/src/gui/skill.h
@@ -0,0 +1,40 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+		By ElvenProgrammer aka Eugenio Favalli (umperio@users.sourceforge.net)
+
+*/
+
+#ifdef WIN32
+  #pragma warning (disable:4312)
+#endif
+
+#ifndef _SKILL_H
+#define _SKILL_H
+
+#include <allegro.h>
+#include "../main.h"
+
+//DIALOG skill_dialog[];
+
+void update_skill_dialog();
+
+#endif
diff --git a/src/log.cpp b/src/log.cpp
new file mode 100644
index 00000000..785418cc
--- /dev/null
+++ b/src/log.cpp
@@ -0,0 +1,189 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#include "log.h"
+
+int warning_n; // Keep warning number
+
+#define LOG_FILE "The Mana World.log"
+#define LOG_VERSION "0.3"
+
+void init_log() {
+#ifdef WIN32
+  remove(LOG_FILE);
+#else 
+	unlink(LOG_FILE);
+#endif
+
+  push_config_state();
+  set_config_file(LOG_FILE);
+#ifdef WIN32 // for the moment i cant find a valuable unix function for _strdate // Sull
+	char date[9];
+  set_config_string("Core", "date", _strdate(date));
+#endif
+	set_config_string("Core", "log_version", LOG_VERSION);
+	set_config_string("Core", "Allegro_ID", allegro_id);
+	switch(os_type) {
+		case OSTYPE_UNKNOWN:
+			set_config_string("Core", "Os", "unknown, or regular MSDOS");
+			break;
+		case OSTYPE_WIN3:
+			set_config_string("Core", "Os", "Windows 3.1 or earlier");
+			break;
+		case OSTYPE_WIN95:
+			set_config_string("Core", "Os", "Windows 95");
+			break;
+		case OSTYPE_WIN98:
+			set_config_string("Core", "Os", "Windows 98");
+			break;
+		case OSTYPE_WINME:
+			set_config_string("Core", "Os", "Windows ME");
+			break;
+		case OSTYPE_WINNT:
+			set_config_string("Core", "Os", "Windows NT");
+			break;
+		case OSTYPE_WIN2000:
+			set_config_string("Core", "Os", "Windows 2000");
+			break;
+		case OSTYPE_WINXP:
+			set_config_string("Core", "Os", "Windows XP");
+			break;
+		case OSTYPE_OS2:
+			set_config_string("Core", "Os", "OS/2");
+			break;
+		case OSTYPE_WARP:
+			set_config_string("Core", "Os", "OS/2 Warp 3");
+			break;
+		case OSTYPE_DOSEMU:
+			set_config_string("Core", "Os", "Linux DOSEMU");
+			break;
+		case OSTYPE_OPENDOS:
+			set_config_string("Core", "Os", "Caldera OpenDOS");
+			break;
+		case OSTYPE_LINUX:
+			set_config_string("Core", "Os", "Linux");
+			break;
+		case OSTYPE_SUNOS:
+			set_config_string("Core", "Os", "SunOS/Solaris");
+			break;
+		case OSTYPE_FREEBSD:
+			set_config_string("Core", "Os", "FreeBSD");
+			break;
+		case OSTYPE_NETBSD:
+			set_config_string("Core", "Os", "NetBSD");
+			break;
+		case OSTYPE_IRIX:
+			set_config_string("Core", "Os", "IRIX");
+			break;
+		case OSTYPE_QNX:
+			set_config_string("Core", "Os", "QNX");
+			break;
+		case OSTYPE_UNIX:
+			set_config_string("Core", "Os", "Unknown Unix variant");
+			break;
+		case OSTYPE_BEOS:
+			set_config_string("Core", "Os", "BeOS");
+			break;
+		case OSTYPE_MACOS:
+			set_config_string("Core", "Os", "MacOS");
+			break;
+		default:
+			set_config_string("Core", "Os", "Unknown");
+			break;
+	}
+	set_config_int("Core", "Os_version", os_version);
+	set_config_int("Core", "Os_revision", os_revision);
+	if(os_multitasking)set_config_string("Core", "Multitasking", "TRUE");
+	else set_config_string("Core", "Multitasking", "FALSE");
+
+	set_config_string("Core", "CPU_Vendor", cpu_vendor);
+	switch(cpu_family) {
+		case 3:
+			set_config_string("Core", "CPU_Family", "386");
+			break;
+		case 4:
+            set_config_string("Core", "CPU_Family", "486");
+			break;
+		case 5:
+			set_config_string("Core", "CPU_Family", "Pentium");
+			break;
+		case 6:
+			set_config_string("Core", "CPU_Family", "Pentium II/III/PRO/Athlon");
+			break;
+		case 15:
+			set_config_string("Core", "CPU_Family", "Pentium IV");
+			break;
+		default:
+			set_config_string("Core", "CPU_Family", "Unknown");
+			set_config_int("Core", "CPU_Family_ID", cpu_family);
+			break;
+	}
+
+    set_config_int("Core", "CPU_model", cpu_model);	
+
+	set_config_int("Core", "CPU_capabilities", cpu_capabilities);
+	pop_config_state();
+
+	warning_n = 0;
+}
+
+void log(const char *log_section, const char *log_name, const char *log_text) {
+    push_config_state();
+    set_config_file(LOG_FILE);
+	set_config_string(log_section, log_name, log_text);
+	pop_config_state();
+}
+
+void log_hex(const char *log_section, const char *log_name, const short log_value) {
+	push_config_state();
+  set_config_file(LOG_FILE);
+	set_config_hex(log_section, log_name, log_value);
+	pop_config_state();
+}
+
+void log_int(const char *log_section, const char *log_name, const int log_value) {
+	push_config_state();
+    set_config_file(LOG_FILE);
+	set_config_int(log_section, log_name, log_value);
+	pop_config_state();
+}
+
+void error(const char *error_text) {
+	log("Error", "Last_error", error_text);
+#ifdef WIN32
+	MessageBox(NULL, error_text, "Error", MB_ICONERROR|MB_OK);
+#else
+	printf("Error: %s", error_text);
+#endif
+	exit(1);
+}
+
+void warning(const char *warning_text) {
+	char warning_name[40];
+	sprintf(warning_name, "warning_%i", warning_n);
+	log("Error", warning_name, warning_text);
+}
+
+void status(const char *status_text) {
+	log("Status", "last_function", status_text);
+}
diff --git a/src/log.h b/src/log.h
new file mode 100644
index 00000000..5c53e5ca
--- /dev/null
+++ b/src/log.h
@@ -0,0 +1,45 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#ifdef WIN32
+  #pragma warning (disable:4312)
+#endif
+
+#ifndef _LOG_H
+#define _LOG_H
+
+#include <allegro.h>
+#ifdef WIN32
+#include <winalleg.h>
+#endif
+#include <stdio.h>
+
+void init_log();
+void log(const char *log_section, const char *log_name, const char *log_text);
+void log_hex(const char *log_section, const char *log_name, const short log_value);
+void log_int(const char *log_section, const char *log_name, const int log_value);
+void error(const char *error_text);
+void warning(const char *warning_text);
+void status(const char *status_text);
+
+#endif
diff --git a/src/main.cpp b/src/main.cpp
new file mode 100644
index 00000000..937c40f6
--- /dev/null
+++ b/src/main.cpp
@@ -0,0 +1,156 @@
+/**
+
+  The Mana World
+  Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#include "main.h"
+#include "./Sound/sound.h"
+#include "./Graphic/graphic.h"
+
+/* Account infos */
+int account_ID, session_ID1, session_ID2;
+char sex, n_server, n_character;
+SERVER_INFO *server_info;
+CHAR_SEL_INFO *char_info;
+
+BITMAP *playerset;
+DATAFILE *graphic, *emotions;
+
+char username[25];
+char password[25];
+int map_address, char_ID;
+short map_port;
+char map_name[16];
+unsigned char state;
+unsigned short x, y;
+unsigned char direction;
+unsigned short job, hair, hair_color;
+unsigned char stretch_mode;
+
+// new sound-engine /- kth5
+TmwSound sound;
+
+void request_exit() {
+  state = EXIT;
+}
+
+/** Do all initialization stuff */
+void init_engine() {
+  allegro_init();
+  init_log();
+  set_close_button_callback(request_exit);  // we should not use set_window_close_hook() since it's deprecated and might be gone in the future /-kth5
+  set_config_file("tmw.ini");
+  #ifdef MACOSX
+  set_color_depth(32);
+  Init_SuperEagle(32);
+  #else
+  set_color_depth(16);
+  Init_SuperEagle(16);
+  #endif
+	stretch_mode = get_config_int("settings", "stretch", 0);
+	if(stretch_mode==0) {
+    if(set_gfx_mode(get_config_int("settings", "screen", 0), 400, 300, 0, 0))
+      error(allegro_error);
+	} else {
+		if(set_gfx_mode(get_config_int("settings", "screen", 0), 800, 600, 0, 0))
+      error(allegro_error);
+	}
+  if(install_keyboard())
+    error("Unable to install keyboard");
+  if(install_timer())
+    error("Unable to install timer");
+  if(install_mouse()==-1)
+    error("Unable to install mouse");
+  if(alfont_init()!=ALFONT_OK)
+    error("Unable to install AllegroFont");
+
+  buffer = create_bitmap(800, 600);
+  if(!buffer)
+    error("Not enough memory to create buffer");
+  graphic = load_datafile("./data/graphic/graphic.dat");
+  if(graphic==NULL)
+    error("Unable to load graphic datafile");
+  playerset = (BITMAP*)graphic[PLAYERSET_BMP].dat;
+	emotions = load_datafile("./data/graphic/emotions.dat");
+	if(emotions==NULL)
+		error("Unable to load emotions datafile");
+
+	init_gui(buffer, "./data/skin/aqua.skin");
+
+  state = LOGIN;
+}
+
+/** Clear the engine */
+void exit_engine() {
+  gui_exit();
+  //alfont_exit();
+  destroy_bitmap(buffer);
+  allegro_exit();
+}
+
+/** Main */
+int main() {
+  init_engine();
+
+  // initialize sound-engine and start playing intro-theme /-kth5
+  try{
+    if(get_config_int("settings", "sound", 0)==1)
+      sound.Init(32,20);                          // inits the sound-subsystem w/ 32 voices / 20 for mod
+    sound.SetVol(128,128,128);                    // sets intial volume parameters
+    //#ifdef WIN32
+      //sound.StartMIDI("Sound/Midis/city.mid",-1);   // play a midi file
+    //#endif
+  }catch(const char * err){                       // catch errors and show appropriate messages on-screen (elven plz... ^^)
+    ok("Sound Engine", err);
+    warning(err);
+  }
+
+  while(state!=EXIT) {
+    switch(state) {
+      case LOGIN:
+        status("LOGIN");
+        login();
+        break;
+      case CHAR_SERVER:
+        status("CHAR_SERVER");
+        char_server();
+        break;
+      case CHAR_SELECT:
+        status("CHAR_SELECT");
+        char_select();
+        break;
+      case GAME:
+        sound.StopBGM();
+        status("GAME");
+        map_start();
+        if( state==GAME )
+          game();
+        break;
+      default:
+        state = EXIT;
+        break;
+    }
+  }
+  status("EXIT");
+  exit_engine();
+  return 0;
+}
+END_OF_MAIN();
diff --git a/src/main.h b/src/main.h
new file mode 100644
index 00000000..0b4eb87a
--- /dev/null
+++ b/src/main.h
@@ -0,0 +1,86 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#ifdef WIN32
+  #pragma warning (disable:4312)
+#endif
+
+#ifndef _MAIN_H
+#define _MAIN_H
+
+#include <stdio.h>
+#include <allegro.h>
+#include <alfont.h>
+
+#include "log.h"
+#include "game.h" 
+#include "./Net/protocol.h"
+#include "./Gui/login.h"
+#include "./Gui/gui.h"
+#include "./Gui/char_server.h"
+#include "./Gui/char_select.h"
+#include "./Graphic/SuperEagle.h"
+#include "./data/graphic/gfx_data.h"
+
+#define EXIT        0
+#define LOGIN       1
+#define CHAR_SERVER 2
+#define CHAR_SELECT 3
+#define CHAR_NEW    4
+#define CHAR_DEL    5
+#define GAME        6
+
+typedef struct {
+	int address;
+	short port;
+	char name[20];
+	short online_users;
+} SERVER_INFO;
+
+typedef struct {
+	int id;
+	char name[24];
+	short hp, max_hp, sp, max_sp, lv;
+	int xp, zeny, job_xp, job_lv;
+	short statp, skillp;
+	char STR, AGI, VIT, INT, DEX, LUK;
+} CHAR_SEL_INFO;
+
+extern BITMAP *playerset;
+extern DATAFILE *graphic, *emotions;
+extern char username[25];
+extern char password[25];
+extern int map_address, char_ID;
+extern short map_port;
+extern char map_name[16];
+extern int account_ID, session_ID1, session_ID2;
+extern char sex, n_server, n_character;
+extern SERVER_INFO *server_info;
+extern CHAR_SEL_INFO *char_info;
+extern unsigned char state;
+extern unsigned short x, y;
+extern unsigned char direction;
+extern unsigned short job, hair, hair_color;
+extern unsigned char stretch_mode;
+
+#endif
diff --git a/src/map.cpp b/src/map.cpp
new file mode 100644
index 00000000..c8fc3612
--- /dev/null
+++ b/src/map.cpp
@@ -0,0 +1,120 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#include "map.h"
+#include "log.h"
+#include "being.h"
+
+#include <stdio.h>
+#ifdef WIN32
+#include <windows.h>
+#else
+#include "./Net/win2linux.h"
+#endif
+
+MAP map;
+
+/** Loads a map file */
+bool load_map(char *map_file) {
+	PACKFILE *file = pack_fopen(map_file, "rp");
+	if(!file) {
+		warning(map_file);
+		return false;
+	}
+	pack_fread(&map, sizeof(MAP), file);
+	pack_fclose(file);
+	return true;
+}
+
+
+/** Set walkability flag for a tile */
+void set_walk(short x_c, short y_c, bool walkable) {
+	if(walkable==true)map.tiles[x_c][y_c].data[3] |= 0x0002;
+	else map.tiles[x_c][y_c].data[3] &= 0x00fd;
+}
+
+/** Tell if a tile is walkable or not */
+bool get_walk(short x_c, short y_c) {
+	bool ret = (map.tiles[x_c][y_c].data[3] & 0x0002)>0;
+	if(ret==true) {
+    NODE *node = get_head();
+		while(node && ret==true) {
+			if(get_x(node->coordinates)==x_c && get_y(node->coordinates)==y_c)
+				ret = false;
+			node = node->next;
+		}
+		return ret;
+	} else return false;
+}
+
+/** Tell if a tile is walkable or not (0=walkable,1=not walkable) */
+unsigned char get_path_walk(unsigned short x, unsigned short y) {
+	if(get_walk(x, y))return 0;
+	else return 1;
+}
+
+/** Tell if a tile is animated or not */
+bool get_anim(short x_c, short y_c, char layer) {
+	char temp = map.tiles[x_c][y_c].flags & 0x00C0;
+	temp>>=6;
+	if(abs(temp)==layer)return (map.tiles[x_c][y_c].data[3] & 0x0001)>0;
+	else return false;
+}
+
+/** Set tile ID */
+void set_tile(short x_c, short y_c, char layer, unsigned short id) {
+	if(layer==0) {
+		id <<= 6;
+        map.tiles[x_c][y_c].data[0] = HIBYTE(id);
+		map.tiles[x_c][y_c].data[1] &= 0x003f;
+        map.tiles[x_c][y_c].data[1] |= LOBYTE(id);
+	} else if(layer==1) {
+		id  <<= 4;
+		map.tiles[x_c][y_c].data[1] &= 0x00c0;
+		map.tiles[x_c][y_c].data[1] |= HIBYTE(id);
+		map.tiles[x_c][y_c].data[2] &= 0x000f;
+		map.tiles[x_c][y_c].data[2] |= LOBYTE(id);
+	} else if(layer==2) {
+		id <<= 2;
+		map.tiles[x_c][y_c].data[2] &= 0x00f0;
+		map.tiles[x_c][y_c].data[2] |= HIBYTE(id);
+		map.tiles[x_c][y_c].data[3] &= 0x0003;
+		map.tiles[x_c][y_c].data[3] |= LOBYTE(id);
+	}
+}
+
+/** Return tile ID */
+unsigned short get_tile(short x_c, short y_c, char layer) {
+	unsigned short id;
+	if(layer==0) {
+        id = MAKEWORD(map.tiles[x_c][y_c].data[1] & 0x00c0, map.tiles[x_c][y_c].data[0]);
+        id >>= 6;
+	} else if(layer==1) {
+		id = MAKEWORD(map.tiles[x_c][y_c].data[2] & 0x00f0, map.tiles[x_c][y_c].data[1] & 0x003f);
+		id >>= 4;
+	} else if(layer==2) {
+		id = MAKEWORD(map.tiles[x_c][y_c].data[3] & 0x00fc, map.tiles[x_c][y_c].data[2] & 0x000f);
+		id >>=2;
+	}
+    return id;
+}
diff --git a/src/map.h b/src/map.h
new file mode 100644
index 00000000..4c33928d
--- /dev/null
+++ b/src/map.h
@@ -0,0 +1,89 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#ifndef _MAP_H
+#define _MAP_H
+
+#define MAP_WIDTH  200
+#define MAP_HEIGHT 200
+#define TILESET_WIDTH 30
+
+#define WALKABLE 0
+#define NOT_WALKABLE 1
+
+/** Struct representing a tile. A tile is composed of 3 layers.
+1st: Ground layer (used for grass, water, ...) -> bit 0-9 of data
+2nd: Fringe layer (objects that are overlapped by the player) -> bit 10-19 of data
+3rd: Over layer (roofs, tree leaves, ...) -> bit 20-29
+Walk flag: tells if a tile is walkable or not -> bit 30
+Animation flag: tells if a tile is animated or not -> bit 31
+
+data field:
+1st byte: [1][1][1][1][1][1][1][1]
+2nd byte: [1][1][2][2][2][2][2][2]
+3rd byte: [2][2][2][2][3][3][3][3]
+4th byte: [3][3][3][3][3][3][W][A]
+
+Legend:
+1 - First layer
+2 - Second layer
+3 - Third layer
+W - Walkability flag
+A - Animated tile flag
+
+flags field:
+[l][l][f][f][f][f][f][f][f]
+
+Legend:
+l - Animated layer
+f - future use
+*/
+struct TILE {
+	char data[4];
+	char flags;
+};
+
+struct MAP {
+	TILE tiles[MAP_WIDTH][MAP_HEIGHT];
+	char tileset[20];
+	char bg_music[20];
+};
+
+bool load_map(char *map_file);
+void set_walk(short x_c, short y_c, bool walkable);
+bool get_walk(short x_c, short y_c);
+unsigned char get_path_walk(unsigned short x, unsigned short y);
+bool get_anim(short x_c, short y_c, char layer);
+void set_tile(short x_c, short y_c, char layer, unsigned short id);
+unsigned short get_tile(short x_c, short y_c, char layer);
+
+/** Return tile x coordinate in tileset */
+inline int get_tile_x(int x, int y, int layer) {
+	return get_tile(x,y,layer)%TILESET_WIDTH;
+}
+/** Return tile y coordinate in tileset */
+inline int get_tile_y(int x, int y, int layer) {
+	return get_tile(x,y,layer)/TILESET_WIDTH;
+}
+
+#endif
diff --git a/src/net/network.cpp b/src/net/network.cpp
new file mode 100644
index 00000000..c8bff09a
--- /dev/null
+++ b/src/net/network.cpp
@@ -0,0 +1,177 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#include "network.h"
+#ifndef WIN32
+#include <unistd.h>
+#include <fcntl.h>
+#include <errno.h>
+#endif
+
+/** Warning: buffers and other variables are shared,
+    so there can be only one connection active at a time */
+
+int buffer_size = 65536;
+char *in, *out;
+int in_size, out_size;
+
+SOCKET sock;
+SOCKADDR_IN addr;
+// File descriptors attached to socket
+fd_set read_socket;
+fd_set write_socket;
+
+/** Increase size of written data */
+void WFIFOSET(int len) {
+	if(out_size+len>=buffer_size)
+		warning("Output buffer full");
+	else out_size+=len;
+}
+
+/** Convert an address from int format to string */
+char *iptostring(int address) {
+	short temp1, temp2;
+
+	char *temp = (char *)malloc(sizeof(char[20]));
+	temp1 = LOWORD(address);
+	temp2 = HIWORD(address);
+	sprintf(temp, "%i.%i.%i.%i", LOBYTE(temp1), HIBYTE(temp1), LOBYTE(temp2), HIBYTE(temp2));
+	return temp;
+}
+
+/** Open a session with a server */
+SOCKET open_session(const char* address, short port) {
+	#ifdef WIN32
+	WSADATA wsda;
+	#endif
+	struct hostent *server;
+	int ret;
+
+	// Init WinSock and connect the socket
+	#ifdef WIN32
+	WSAStartup(MAKEWORD(2,0), &wsda);
+	#endif
+
+	sock = socket(PF_INET, SOCK_STREAM, 0); // Create socket for current session
+	if(sock==SOCKET_ERROR)return SOCKET_ERROR;
+
+	addr.sin_family = AF_INET;
+	addr.sin_port = htons(port);
+	addr.sin_addr.s_addr = inet_addr(address);
+	if(addr.sin_addr.s_addr == INADDR_NONE){
+		server = NULL;
+		server = gethostbyname(address);
+		if(server == NULL)return SOCKET_ERROR;
+			memcpy(&addr.sin_addr, server->h_addr_list[0], server->h_length);
+	}
+
+	ret = connect(sock, (struct sockaddr *) &addr, sizeof(addr));
+	if(ret == SOCKET_ERROR)return SOCKET_ERROR;
+
+	// Init buffers
+	in = (char *)malloc(buffer_size);
+	out = (char *)malloc(buffer_size);
+	memset(in, '\0', buffer_size);
+	memset(out, '\0', buffer_size);
+	in_size = 0;
+	out_size = 0;
+	FD_CLR(sock, &read_socket);
+	FD_CLR(sock, &write_socket);
+
+	return sock;	
+}
+
+/** Close a session */
+void close_session() {
+	FD_CLR(sock,&read_socket);
+	FD_CLR(sock,&write_socket);
+    closesocket(sock);	
+	if(in!=NULL)free(in);
+	if(out!=NULL)free(out);
+	in = NULL;
+	out = NULL;
+	in_size = 0;
+	out_size = 0;
+	WSACleanup();
+}
+
+/** Send and receive data waiting in the buffers */
+void flush() {
+    int ret = 0;
+    void *buf = out; //-kth5
+    timeval time_out;
+
+    // Init the time_out struct to 0s so it won't block
+    time_out.tv_sec=0;
+    time_out.tv_usec=0;
+
+    // Clear file descriptors and set them to socket
+    FD_ZERO(&read_socket);
+    FD_ZERO(&write_socket);
+    FD_SET(sock, &read_socket);
+    FD_SET(sock, &write_socket);
+
+    // Check if socket has available data by evaluating attached file descriptors
+    select(FD_SETSIZE, &read_socket, &write_socket, NULL, &time_out);
+
+    // Send data if available
+    if(FD_ISSET(sock, &write_socket)) {
+        // While there wasn't a error or sent the whole data: handles partial packet send
+        while((ret!=SOCKET_ERROR)&&(out_size>0)) { 
+            ret = send(sock, (char *)buf, out_size, 0);
+						/*FILE *file = fopen("log.log","wb");
+
+						fprintf(file, "%s", out[0]);
+						fclose(file);*/
+						// If not the whole data has been sent, empty the buffer from already sent bytes
+            if(ret!=SOCKET_ERROR && ret>0) {
+                buf = (char*)buf+ret; //-kth5
+                out_size -= ret;
+            }
+        }
+        if(ret==SOCKET_ERROR) {
+            error("Socket Error");
+#ifdef WIN32
+            log_int("Error", "socket_error", WSAGetLastError());
+#else 
+            log("Error", "socket_error", "Undefined socket error");
+#endif
+        }
+    }
+
+    // Read data, if available
+    if(FD_ISSET(sock, &read_socket)) {
+      /* There's no check for partial received packets because at this level
+         the app doesn't know packet length, but it will done when parsing received data */
+      ret = recv(sock, in+in_size, RFIFOSPACE, 0);
+      if(ret==SOCKET_ERROR) {
+#ifdef WIN32
+		  log_int("Error", "socket_error", WSAGetLastError());
+#else 
+		  log("Error", "socket_error", "Undefined socket error");
+#endif
+	  } else RFIFOSET(ret); // Set size of available data to read
+    }
+}
+
+
diff --git a/src/net/network.h b/src/net/network.h
new file mode 100644
index 00000000..5eca3398
--- /dev/null
+++ b/src/net/network.h
@@ -0,0 +1,87 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#ifdef WIN32
+  #pragma warning (disable:4312)
+#endif
+
+#ifndef _NETWORK_H
+#define _NETWORK_H
+
+#ifdef WIN32
+#include <allegro.h>
+#include <winalleg.h>
+#else
+#include "win2linux.h"
+#endif
+#include <stdio.h>
+#include "../log.h"
+#ifdef MACOSX
+#include "win2mac.h"
+#endif
+
+/** Macros to write in output buffer, pos is the location where to write data 
+    After you wrote len bytes, you have to use WFIFOSET */
+#define WFIFOSPACE (buffer_size-out_size) // Number of bytes currently written in uotput buffer
+#define WFIFOP(pos) (out+(pos+out_size)) // Return a pointer to a specific location in output buffer
+#define WFIFOB(pos) (*(unsigned char *)(out+pos+out_size)) // Write a byte (1 byte)
+#define WFIFOW(pos) (*(unsigned short *)(out+pos+out_size)) // Write a word (2 byte)
+#define WFIFOL(pos) (*(unsigned int *)(out+pos+out_size)) // Write a long (4 byte)
+//#define WFIFOSET(len) out_size+=len // Increase size of written data
+#ifdef MACOSX
+#define net_b_value(id) (id)
+#define net_w_value(id) DR_SwapTwoBytes(id)
+#define net_l_value(id) DR_SwapFourBytes(id)
+#else
+#define net_b_value(id) (id)
+#define net_w_value(id) (id)
+#define net_l_value(id) (id)
+#endif
+
+
+/** Macros to read from input buffer, pos is the location of data to be read
+    After you read len bytes, you should use RFIFOSKIP */
+#define RFIFOP(pos) (in+(pos)) // Get a pointer from a specific location in input buffer
+#ifdef MACOSX
+#define RFIFOB(pos) ((*(unsigned char*)(in+(pos)))) // Read a byte
+#define RFIFOW(pos) DR_SwapTwoBytes((*(unsigned short*)(in+(pos)))) // Read a word
+#define RFIFOL(pos) DR_SwapFourBytes((*(unsigned int*)(in+(pos)))) // Read a long
+#else
+#define RFIFOB(pos) (*(unsigned char*)(in+(pos))) // Read a byte
+#define RFIFOW(pos) (*(unsigned short*)(in+(pos))) // Read a word
+#define RFIFOL(pos) (*(unsigned int*)(in+(pos))) // Read a long
+#endif
+#define RFIFOSKIP(len) (memcpy(in,in+len,in_size-len));in_size-=len; // Empty len bytes from input buffer 
+#define RFIFOSPACE (buffer_size-in_size) // Return input buffer size
+#define RFIFOSET(len) in_size+=len;
+
+void WFIFOSET(int len);
+char *iptostring(int address);
+SOCKET open_session(const char* address, short port);
+void close_session();
+void flush();
+
+extern char *in, *out; // Input, output buffer
+extern int in_size, out_size; // Input, output buffer size
+
+#endif
diff --git a/src/net/protocol.cpp b/src/net/protocol.cpp
new file mode 100644
index 00000000..2c33d092
--- /dev/null
+++ b/src/net/protocol.cpp
@@ -0,0 +1,264 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#include "protocol.h"
+
+short packet_lengths[] = {
+	
+   10,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+// #0x0040
+    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+    0,  0,  0,  0, 55, 17,  3, 37, 46, -1, 23, -1,  3,108,  3,  2,
+    3, 28, 19, 11,  3, -1,  9,  5, 54, 53, 58, 60, 41,  2,  6,  6,
+// #0x0080
+    7,  3,  2,  2,  2,  5, 16, 12, 10,  7, 29, 23, -1, -1, -1,  0,
+    7, 22, 28,  2,  6, 30, -1, -1,  3, -1, -1,  5,  9, 17, 17,  6,
+   23,  6,  6, -1, -1, -1, -1,  8,  7,  6,  7,  4,  7,  0, -1,  6,
+    8,  8,  3,  3, -1,  6,  6, -1,  7,  6,  2,  5,  6, 44,  5,  3,
+// #0x00C0
+    7,  2,  6,  8,  6,  7, -1, -1, -1, -1,  3,  3,  6,  6,  2, 27,
+    3,  4,  4,  2, -1, -1,  3, -1,  6, 14,  3, -1, 28, 29, -1, -1,
+   30, 30, 26,  2,  6, 26,  3,  3,  8, 19,  5,  2,  3,  2,  2,  2,
+    3,  2,  6,  8, 21,  8,  8,  2,  2, 26,  3, -1,  6, 27, 30, 10,
+// #0x0100
+    2,  6,  6, 30, 79, 31, 10, 10, -1, -1,  4,  6,  6,  2, 11, -1,
+   10, 39,  4, 10, 31, 35, 10, 18,  2, 13, 15, 20, 68,  2,  3, 16,
+    6, 14, -1, -1, 21,  8,  8,  8,  8,  8,  2,  2,  3,  4,  2, -1,
+    6, 86,  6, -1, -1,  7, -1,  6,  3, 16,  4,  4,  4,  6, 24, 26,
+// #0x0140
+   22, 14,  6, 10, 23, 19,  6, 39,  8,  9,  6, 27, -1,  2,  6,  6,
+  110,  6, -1, -1, -1, -1, -1,  6, -1, 54, 66, 54, 90, 42,  6, 42,
+   -1, -1, -1, -1, -1, 30, -1,  3, 14,  3, 30, 10, 43, 14,186,182,
+   14, 30, 10,  3, -1,  6,106, -1,  4,  5,  4, -1,  6,  7, -1, -1,
+// #0x0180
+    6,  3,106, 10, 10, 34,  0,  6,  8,  4,  4,  4, 29, -1, 10,  6,
+   90, 86, 24,  6, 30,102,  9,  4,  8,  4, 14, 10,  4,  6,  2,  6,
+    3,  3, 35,  5, 11, 26, -1,  4,  4,  6, 10, 12,  6, -1,  4,  4,
+   11,  7, -1, 67, 12, 18,114,  6,  3,  6, 26, 26, 26, 26,  2,  3,
+// #0x01C0
+    2, 14, 10, -1, 22, 22,  4,  2, 13, 97,  0,  9,  9, 29,  6, 28,
+    8, 14, 10, 35,  6,  8,  4, 11, 54, 53, 60,  2, -1, 47, 33,  6,
+   30,  8, 34, 14,  2,  6, 26,  2, 28, 81,  6, 10, 26,  2, -1, -1,
+   -1, -1, 20, 10, 32,  9, 34, 14,  2,  6, 48, 56, -1,  4,  5, 10,
+// #0x200
+   26,  0,  0,  0, 18,  0,  0,  0,  0,  0,  0, 19,
+
+};
+
+/** Packet length by id */
+short get_length(short id) {
+	return packet_lengths[id];
+}
+
+/** Decodes dest x coord */
+unsigned short get_dest_x(char *data) {
+	short temp;
+	temp = MAKEWORD(data[3], data[2] & 0x000f);
+	temp >>= 2;
+	return temp;
+}
+
+/** Decodes dest y coord */
+unsigned short get_dest_y(char *data) {
+	short temp;
+	temp = MAKEWORD(data[4], data[3] & 0x0003);
+	return temp;
+}
+
+/** Decodes src x coord */
+unsigned short get_src_x(char *data) {
+	short temp;
+	temp = MAKEWORD(data[1], data[0]);
+	temp >>= 6;
+	return temp;
+}
+
+/** Decodes src y coord */
+unsigned short get_src_y(char *data) {
+	short temp;
+	temp = MAKEWORD(data[2], data[1] & 0x003f);
+	temp >>= 4;
+	return temp;
+}
+
+/** Decodes src direction */
+unsigned char get_src_direction(char data) {
+	data >>= 4;
+    return data;
+}
+
+/** Decodes dest direction */
+unsigned char get_dest_direction(char data) {
+	return data & 0x000f;
+}
+
+/** Decodes x coord */
+unsigned short get_x(char *data) {
+	short temp;
+	temp = MAKEWORD(data[1] & 0x00c0, data[0] & 0x00ff);
+	temp >>= 6;
+	return temp;
+}
+
+/** Decodes y coord */
+unsigned short get_y(char *data) {
+	short temp;
+	if(!data)error("Corrupted data");
+	temp = MAKEWORD(data[2] & 0x00f0, data[1] & 0x003f);
+	if(!temp)error("Corrupted data");
+	temp >>= 4;
+	return temp;
+}
+
+/** Decodes direction */
+unsigned char get_direction(char *data) {
+	char temp;
+	temp = data[2] & 0x000f;
+	return temp;
+}
+
+/** Encodes coords and direction in 3 bytes data */
+void set_coordinates(char *data, unsigned short x, unsigned short y, unsigned char direction) {
+	short temp;
+	temp = x;
+	temp <<= 6;
+	data[0] = 0;
+	data[1] = 1;
+	data[2] = 2;
+	data[0] = HIBYTE(temp);
+	data[1] = LOBYTE(temp);
+	temp = y;
+	temp <<= 4;
+	data[1] |= HIBYTE(temp);
+	data[2] = LOBYTE(temp);
+	data[2] |= direction;
+}
+
+/** Initialize connection with map server */
+void map_start() {
+	// Connect to map server
+	if(open_session(iptostring(map_address), map_port)==SOCKET_ERROR) {
+		warning("Unable to connect to map server");
+		state = LOGIN;
+		ok("Error", "Unable to connect to map server");
+		return;
+	}
+	
+	// Send login infos
+	WFIFOW(0) = net_w_value(0x0072);
+	WFIFOL(2) = net_l_value(account_ID);
+	WFIFOL(6) = net_l_value(char_ID);
+	WFIFOL(10) = net_l_value(session_ID1);
+	WFIFOL(14) = net_l_value(session_ID2);
+	WFIFOB(18) = net_b_value(sex);
+	WFIFOSET(19);
+
+	while((in_size<4)||(out_size>0))flush();
+	RFIFOSKIP(4);
+		
+	while(in_size<2)flush();
+
+	if(RFIFOW(0)==0x0073) {
+		while(in_size<11)flush();
+		x = get_x(RFIFOP(6));
+		y = get_y(RFIFOP(6));
+		log_int("Player", "x", x);
+		log_int("Player", "y", y);
+		direction = get_direction(RFIFOP(6));
+		log_int("Player", "direction", direction);
+		RFIFOSKIP(11);
+	} else if(0x0081) {
+		warning("Map server D/C");
+	} else error("Unknown packet: map_start");
+	// Send "map loaded"
+	WFIFOW(0) = net_w_value(0x007d);
+	WFIFOSET(2);
+  while(out_size>0)flush();
+}
+
+/** Requests to walk */
+void walk(unsigned short x, unsigned short y, unsigned char direction) {
+	char temp[3];
+	set_coordinates(temp, x, y, direction);
+	WFIFOW(0) = net_w_value(0x0085);
+	memcpy(WFIFOP(2), temp, 3);
+	WFIFOSET(5);
+}
+
+/** Request to speak */
+void speak(char *speech) {
+	int len = (int)strlen(speech);
+	WFIFOW(0) = net_w_value(0x008c);
+  WFIFOW(2) = net_w_value(len+4);
+  memcpy(WFIFOP(4), speech, len);
+  WFIFOSET(len+4);
+}
+
+/** request action */
+void action(short type, int id) {
+	WFIFOW(0) = net_w_value(0x0089);
+	WFIFOL(2) = net_l_value(id);
+	WFIFOB(6) = net_l_value(type);
+	WFIFOSET(7);
+}
+
+
+/** Request to attack */
+void attack(unsigned short x, unsigned short y, unsigned char direction) {
+	int monster_id = 0;
+
+	if(direction==2) {
+		for(int j=-1;j<2;j++)
+			for(int i=-1;i<1;i++) {
+				monster_id = find_monster(x+i, y+j);
+				if(monster_id!=0)
+					action(0x07, monster_id);
+			}
+	} else if(direction==6) {
+		for(int j=-1;j<2;j++)
+			for(int i=0;i<2;i++) {
+        monster_id = find_monster(x+i, y+j);
+				if(monster_id!=0)
+					action(0x07, monster_id);
+			}
+	} else if(direction==4) {
+		for(int j=-1;j<1;j++)
+			for(int i=-1;i<2;i++) {
+        monster_id = find_monster(x+i, y+j);
+				if(monster_id!=0)
+					action(0x07, monster_id);
+			}
+	} else if(direction==0) {
+		for(int j=0;j<1;j++)
+			for(int i=-1;i<2;i++) {
+        monster_id = find_monster(x+i, y+j);
+				if(monster_id!=0)
+					action(0x07, monster_id);
+			}
+	}
+}
+
diff --git a/src/net/protocol.h b/src/net/protocol.h
new file mode 100644
index 00000000..60293e4a
--- /dev/null
+++ b/src/net/protocol.h
@@ -0,0 +1,57 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+#ifdef WIN32
+  #pragma warning (disable:4312)
+#endif
+  
+#ifndef _PROTOCOL_H
+#define _PROTOCOL_H
+
+#include <allegro.h>
+#ifdef WIN32
+#include <winalleg.h>
+#include <windows.h>
+#else
+#include "win2linux.h"
+#endif
+
+#include "../main.h"
+#include "../being.h"
+
+short get_length(short id);
+unsigned short get_x(char *data);
+unsigned short get_y(char *data);
+unsigned char get_direction(char *data);
+unsigned short get_src_x(char *data);
+unsigned short get_src_y(char *data);
+unsigned char get_src_direction(char data);
+unsigned short get_dest_x(char *data);
+unsigned short get_dest_y(char *data);
+unsigned char get_dest_direction(char data);
+void set_coordinates(char *data, unsigned short x, unsigned short y, unsigned char direction);
+void map_start();
+void walk(unsigned short x, unsigned short y, unsigned char direction);
+void speak(char *speech);
+void attack(unsigned short x, unsigned short y, unsigned char direction);
+void action(short, int);
+#endif
diff --git a/src/net/win2linux.h b/src/net/win2linux.h
new file mode 100644
index 00000000..71737a58
--- /dev/null
+++ b/src/net/win2linux.h
@@ -0,0 +1,54 @@
+#include <stdio.h>
+#include <stdlib.h>
+#ifndef MACOSX
+#include <malloc.h>
+#endif
+#include <string.h>
+#include <sys/socket.h>
+#include <netinet/in.h>
+#include <stdio.h>
+#include <unistd.h>
+#include <arpa/inet.h>
+#include <netdb.h>
+
+typedef unsigned char BYTE;
+typedef unsigned short WORD;
+#define MAKEWORD(low,high) \
+        ((WORD)(((BYTE)(low)) | ((WORD)((BYTE)(high))) << 8))
+#define  closesocket(a)  close(a)
+#define SOCKET int
+#define SOCKET_ERROR -1
+#define SOCKADDR_IN struct sockaddr_in
+typedef struct	sockaddr                SOCKADDR;
+typedef	SOCKADDR *      LPSOCKADDR;
+#define WSACleanup() ;
+
+
+
+typedef unsigned short                  WORD;
+typedef unsigned long int LWORD;
+typedef unsigned char BYTE;
+#define LOBYTE(w)                       ((BYTE)          (w)            )
+#define HIBYTE(w)                       ((BYTE)  (((WORD)(w)) >> 8)     )
+#define LOWORD(l)                       ((WORD)          (l)            )
+#define HIWORD(l)                       ((WORD) (((LWORD)(l)) >> 16)    )
+#define HANDLE int
+#define HANDLE int
+#define PHANDLE int
+#define SMALL_RECT int
+//#define WORD int
+#define DWORD int
+#define PDWORD int
+#define BOOL int
+#define LPBOOL int
+#define LPSTR int
+#define LPTSTR int
+#define LPCTSTR int
+#define LPDWORD int
+#define LPVOID int
+#define WINAPI
+
+#define LOBYTE(w)                       ((BYTE)          (w)            )
+#define HIBYTE(w)                       ((BYTE)  (((WORD)(w)) >> 8)     )
+#define LPTHREAD_START_ROUTINE void *(*)(void *)
+#define CloseHandle close
diff --git a/src/net/win2mac.cpp b/src/net/win2mac.cpp
new file mode 100644
index 00000000..be4bad1d
--- /dev/null
+++ b/src/net/win2mac.cpp
@@ -0,0 +1,42 @@
+#include "win2mac.h"
+
+
+void dummy()
+{
+
+printf("hej\n");
+}
+
+UInt32 DR_SwapFourBytes(UInt32 dw)
+{
+UInt32 tmp;
+tmp =  (dw & 0x000000FF);
+tmp = ((dw & 0x0000FF00) >> 0x08) | (tmp << 0x08);
+tmp = ((dw & 0x00FF0000) >> 0x10) | (tmp << 0x08);
+tmp = ((dw & 0xFF000000) >> 0x18) | (tmp << 0x08);
+return (tmp);
+}
+
+UInt16 DR_SwapTwoBytes(UInt16 w)
+{
+UInt16 tmp;
+tmp =  (w & 0x00FF);
+tmp = ((w & 0xFF00) >> 0x08) | (tmp << 0x08);
+return(tmp);
+}
+ 
+char* SwapChar(char charlist[])
+{
+for(int i =0; i< 24/2; i++)
+	SWAP(charlist[i],charlist[24-i]);
+return charlist;
+}
+
+/*
+char* SwapChar(char charlist[])
+{
+for(int i =0; i< sizeof(charlist)*4/2; i++)
+	SWAP(charlist[i],charlist[sizeof(charlist)*4-i]);
+return charlist;
+}
+*/
\ No newline at end of file
diff --git a/src/net/win2mac.h b/src/net/win2mac.h
new file mode 100644
index 00000000..72ae9fd9
--- /dev/null
+++ b/src/net/win2mac.h
@@ -0,0 +1,16 @@
+#include <stdio.h>
+
+#define UInt16 unsigned short int
+#define INT16 short int
+#define UInt32 unsigned long int
+#define INT32 long int
+#define SWAP( a,  b ) { char c; c=a; a=b; b=c; }
+
+#ifndef _MAC_H
+#define _MAC_H
+void dummy();
+UInt32 DR_SwapFourBytes(UInt32 dw);
+UInt16 DR_SwapTwoBytes(UInt16 w);
+char* SwapChar(char charlist[]);
+#endif
+
diff --git a/src/sound/sound.cpp b/src/sound/sound.cpp
new file mode 100644
index 00000000..105959ba
--- /dev/null
+++ b/src/sound/sound.cpp
@@ -0,0 +1,269 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+/**
+  rewrite of non-existend sdl-soundengine using allegro
+  
+  Author: kth5 aka Alexander Baldeck
+    pipe your question, suggestions and flames to: kth5@gawab.com
+*/
+
+#ifdef WIN32
+  #pragma warning(disable:4312)
+#endif
+
+#include <allegro.h>
+
+
+  #include <jgmod.h>
+  #include "sound.h"
+
+/**
+  install the sound engine
+   int voices      -> overall reserved voices
+   int mod_voices  -> voices dedicated for mod-playback
+   
+   NOTE:
+       overall voices must not be less or equal to the
+       specified amount of mod_voices!
+       if mod-voices is too low some mods will not sound
+       correctly since a couple of tracks are not going
+       to be played along w/ the others. so missing ins-
+       truments can be a result.
+       32/20 sounds realistic here.
+*/
+void TmwSound::Init(int voices, int mod_voices) {
+  isOk = -1;
+  
+  if(mod_voices >= voices)
+    throw("No voices left for SFX! Sound will be disabled!");
+
+  install_timer();
+  reserve_voices (voices, -1);
+ 
+  #ifdef WIN32
+    if (install_sound (DIGI_AUTODETECT, MIDI_AUTODETECT, NULL) < 0)
+  #else
+    if (install_sound (DIGI_AUTODETECT, MIDI_NONE, NULL) < 0)
+  #endif
+      throw("Could not initialize sound... :-(");
+
+  
+  if (install_mod (mod_voices) < 0)
+    throw("Could not install MOD player... :-(");
+
+  mod = NULL;
+  mid = NULL;
+  sfx = NULL;
+      
+  pan = 128;
+  pitch=1000;
+  
+  isOk = 0;
+}
+
+/**
+   set the volume value-range: 0-255
+    int digi -> for digital playback
+    int mid  -> for midi playback
+    int mod  -> for... aw, you guess ^^
+    
+   NOTE:
+       all values may only be between 0-255 where 0 means
+       muted.
+*/
+void TmwSound::SetVol(int digi, int mid, int mod) {
+  if(isOk==-1)
+    return;  
+  set_volume(digi, mid);
+  set_mod_volume(mod);
+  set_hardware_volume(digi, mid);
+  
+  if(isMaxVol(vol_digi + digi)==false) vol_digi += digi;
+  if(isMaxVol(vol_midi + mid) ==false) vol_midi += mid;
+  if(isMaxVol(vol_mod  + mod) ==false) vol_mod  += mod;
+}
+
+/**
+   adjusts current volume
+    int digi -> for digital playback
+    int mid  -> for midi playback
+    int mod  -> for... aw, you guess ^^
+    
+   NOTE:
+       all values may only be between 0-255 where 0 means
+       muted.
+*/
+void TmwSound::SetAdjVol(int adigi, int amid, int amod) {
+  if(isOk==-1)
+    return;  
+  set_volume(vol_digi + adigi, vol_midi + amid);
+  set_mod_volume(vol_mod + amod);
+
+  if(isMaxVol(vol_digi + adigi)==false) vol_digi += adigi;
+  if(isMaxVol(vol_midi + amid) ==false) vol_midi += amid;
+  if(isMaxVol(vol_mod  + amod) ==false) vol_mod  += amod;
+}
+
+/**
+   start BGM using a midi file
+    char *in -> full path of midi file
+    int loop -> how many times should the midi be looped? (-1 = infinite)    
+
+   NOTE:
+       playing midi does not steal away any voices but
+       does not work w/ most soundcards w/o software
+       emulation. this means than linux-users will most
+       probably be left out. do not use this unless we
+       find a way to always get it to work. :-)
+       
+       at this point of time only standard RMI midi files
+       can be played. so no m$ extensions like GS and stuff.
+*/
+void TmwSound::StartMIDI(char *in, int loop) {
+  if(isOk==-1)
+    return;  
+
+  mid = load_midi(in);
+  if (!mid) {
+    isOk=-1;
+    throw("Could not load MIDI file!");
+  }
+  
+  play_midi(mid, TRUE);
+}
+
+/**
+   start BGM using a mod file
+    char *in -> full path of mod file
+    int loop -> how many times should the midi be looped? (-1 = infinite)
+
+   NOTE:
+       playing mod is a pretty good choice. most of the work
+       is being done by the cpu so it's not dependend on the
+       sound-card how things sound as long as it works. ;-)
+       
+       JGMOD supports several formats:
+           MOD
+           S3M
+           XM
+           Unreal
+           and S3M (in UMX extension)
+*/
+void TmwSound::StartMOD(char * in, int loop) {
+  if(isOk==-1)
+    return;
+  
+  mod = load_mod(in);
+  if(!mod) {  
+    isOk=-1;
+    throw("Error reading MOD file...");
+  }
+  play_mod(mod, TRUE);
+}    
+
+/**
+   stop all currently running BGM tracks
+
+   NOTE:
+      you need to stop all playback when you want to
+      switch from mod to midi. playing a new track is
+      usually possibe simply by calling StartMIDI() ir
+      SartMOD() again.
+      passing NULL to the playing functions only means
+      to make playback stop.
+*/
+void TmwSound::StopBGM() {
+  if(isOk==-1)
+    return;  
+
+  play_midi(NULL,-1);
+  stop_mod();
+  
+  mod = NULL;
+  mid = NULL;
+}
+
+/**
+   play short sample usually for sfx
+      char * in -> full path to the sample file
+      (int wavid -> the id of the preloaded wav file (not implemented yet))
+      int pan   -> panning of the sound, values can be 0-255 where 128 is
+                   the middle
+
+   NOTE:
+      later on this will be a subsequent call to another
+      function that preloads all wavs corresponding to
+      the current area (e.g. monster screams) to memory.
+      right now the function loads the file from hdd
+      everytime you want it to be played. this is kind of
+      resource intensive even though most OS'ses cache a
+      already loaded file for some time.
+      
+      allegro supports different formats but this is not
+      stated clear enough - these will work for sure:
+          WAV
+          VOC
+      
+      i don't know what kind of samples are necessary so we
+      need to test this thoroughly.
+*/
+void TmwSound::StartWAV(char * in, int pan) {
+  if(isOk==-1)
+    return; 
+  
+  sfx = load_sample(in);
+  if (!sfx)
+    throw("Error reading WAV file...");
+
+  play_sample(sfx, vol_digi, pan, pitch, FALSE);
+}
+
+/**
+   deinstall all sound functionality
+
+   NOTE:
+       normally you won't need to call this since this is
+       done by allegro when shutting itself down. but if
+       you find a reason to delete the sound-engine from
+       memory (e.g. garbage-collection) feel free to use
+       it. :-P
+*/
+int TmwSound::Close(void) {
+  if(isOk==-1)
+    return -1;  
+  mod = NULL;
+  mid = NULL;
+  sfx = NULL;
+  
+  remove_sound();
+  isOk = -1;
+  return 0;
+}
+
+/** PRIVATE */
+
+bool TmwSound::isMaxVol(int vol) {
+  if( vol > 0 && vol < 255 ) return false;
+  else return true;
+}
diff --git a/src/sound/sound.h b/src/sound/sound.h
new file mode 100644
index 00000000..12300e58
--- /dev/null
+++ b/src/sound/sound.h
@@ -0,0 +1,83 @@
+/**
+
+	The Mana World
+	Copyright 2004 The Mana World Development Team
+
+    This file is part of The Mana World.
+
+    The Mana World is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    any later version.
+
+    The Mana World is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with The Mana World; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+*/
+
+#ifndef __SOUND_H
+#define __SOUND_H
+
+#ifdef WIN32
+  #pragma warning(disable:4312)
+#endif
+#include <allegro.h>
+#include <jgmod.h>
+#include <string>
+using namespace std;
+
+/**
+  rewrite of non-existend sdl-soundengine using allegro
+  
+  Author: kth5 aka Alexander Baldeck
+    pipe your question, suggestions and flames to: kth5@gawab.com
+
+  NOTE:
+      i documented all functions in their implementation. ;-)
+*/
+
+class TmwSound {
+  public:
+    void  Init(int, int);
+    int   Close();
+    
+    void  StartMIDI(char *, int);
+    void  StartMOD(char *, int);
+    void  StopBGM(); 
+
+    void  StartWAV(char *, int);
+    void  SetVol(int, int, int);
+    void  SetAdjVol(int adigi, int amid, int amod);
+    
+    TmwSound() {isOk=-1;}
+    ~TmwSound() {StopBGM(); Close();};  // if allegros shuts down or object is deleted
+                                        // any BGM is stopped and SFX runout
+  private:
+    int isOk;                           // initial value is -1 which means error.
+                                        // you can only play sounds and bgm if this is 0.
+                                        // should be the case after calling Init()
+                                        // successfully
+    
+    MIDI   * mid;
+    JGMOD  * mod;
+    SAMPLE * sfx;
+
+    int pan;
+    int pitch;
+    
+    int ret;
+    int vol_digi;
+    int vol_midi;
+    int vol_mod;
+    
+    bool isMaxVol(int);
+};
+
+
+#endif