sanguo

#include "all.h"
#include "rpg.h"
#define UP 0
#define DOWN 1
sprite small;
int done=0;
char *things[5]={"money","ticket","card","key","sport"};
pcx_picture_ptr background;

void Pre_Game(void);
void Game_Load(void);
void Game_End(void);

void main(void)
{
Set_Video_Mode(VGA256);
Pre_Game();
Game_Load();
Game_End();
Set_Video_Mode(TEXT_MODE);
}

void Chat(int x,int y,int seek)
{
int i=0,place=-1,smallplace=-1,chats,index;
int button,number,head_id,say_num;
char *file="room.dat";
char *file2="chat.dat";
int chat_num;
int flag=';';
int end='=';
char *data=malloc(sizeof(char));
int can_chat=0;
pcx_picture objects_pcx;
int chat_here[4];
chat_num=atoi(fread_char_seek(flag,file,6,seek*192,end));
for(chats=0;chats<chat_num*5;chats=chats+5)
{
 chat_here[0]=atoi(fread_char_seek(flag,file,7+chats,seek*192,end));
 chat_here[1]=atoi(fread_char_seek(flag,file,8+chats,seek*192,end));
 chat_here[2]=atoi(fread_char_seek(flag,file,9+chats,seek*192,end));
 chat_here[3]=atoi(fread_char_seek(flag,file,10+chats,seek*192,end));
 data=fread_char_seek(flag,file,11+chats,seek*192,end);
 if(x>=chat_here[0]&&x<=chat_here[2]&&y>=chat_here[1]&&y<=chat_here[3])
 {
  for(index=0;index<5;index++)
   if((strcmp(data,things[index])==0)&&my_things[index]==0)
   {
    my_things[index]=1;
    can_chat=1;
   }
   else if(strcmp(data,"null")==0)
    can_chat=1;
  break;
 }
}
if(can_chat!=0)
{
 say_num=atoi(fread_char_seek(flag,file2,5,seek*1152+chats*192/5,end));
 for(index=0;index<say_num;index++)
 {
  head_id=atoi(fread_char_seek(flag,file2,6+index*2,seek*1152+chats*192/5,end));
  if(head_id==1)
  {
   data=fread_char_seek(flag,file2,1,seek*1152+chats*192/5,end);
   PCX_Load_Screen_Size(data,(pcx_picture_ptr)&objects_pcx,1,60,50,0,0);
   data=fread_char_seek(flag,file2,3,seek*1152+chats*192/5,end);
   WriteHzStr(data,0,70,WHITE);
  }
  else
  {
   data=fread_char_seek(flag,file2,2,seek*1152+chats*192/5,end);
   PCX_Load_Screen_Size(data,(pcx_picture_ptr)&objects_pcx,1,60,50,260,0);
   data=fread_char_seek(flag,file2,4,seek*1152+chats*192/5,end);
   WriteHzStr(data,260,70,WHITE);
  }
  data=fread_char_seek(flag,file2,7+index*2,seek*1152+chats*192/5,end);
  Words_Step(data,10,130,WHITE,5);
  getch();
  Fill_Screen_Size(BLACK,0,120,319,148);
  Fill_Screen_Size(BLACK,0,0,59,119);
  Fill_Screen_Size(BLACK,260,0,319,118);
  if(seek==8)
   done=1;
 }
}
}

void Room(int direction)
{
pcx_picture objects_pcx;
int x=121,y=100,x_old,y_old,button=0,done=0;
int come_in=0;
int flag=';';
int end='=';
int address;
int width;
int up_down;
char *small_map;
char *thing;
char *file="room.dat";
int num,seek;
Squeeze_Mouse(MOUSE_RESET,0,0,0);
mscurson(arrow);
Squeeze_Mouse(MOUSE_HIDE,0,0,0);
for(seek=0;seek<10;seek++)
{
 address=atoi(fread_char_seek(flag,file,1,seek*192,end));
 width=atoi(fread_char_seek(flag,file,2,seek*192,end));
 up_down=atoi(fread_char_seek(flag,file,3,seek*192,end));
 thing=fread_char_seek(flag,file,4,seek*192,end);
 if(direction==up_down)
 {
  if(sx>=address&&sx<address+width&&(strcmp(thing,"null")==0||
   (strcmp(thing,things[0])==0)&&my_things[0]!=0||
   (strcmp(thing,things[1])==0)&&my_things[1]!=0||
   (strcmp(thing,things[2])==0)&&my_things[2]!=0||
   (strcmp(thing,things[3])==0)&&my_things[3]!=0||
   (strcmp(thing,things[4])==0)&&my_things[4]!=0))
  {
   small_map=fread_char_seek(flag,file,5,seek*192,end);
   PCX_Load_Screen_Height(small_map,(pcx_picture_ptr)&objects_pcx,1,120);
   pause_bar=1;
   come_in=1;
   break;
  }
 }
}
if(come_in==1)
{
Behind_Sprite_Size((sprite_ptr)&small,65,45);
Squeeze_Mouse(MOUSE_RESET,0,0,0);
mscurson(arrow);
Squeeze_Mouse(MOUSE_HIDE,0,0,0);
while(done==0)
{
 Squeeze_Mouse(MOUSE_BUTT_POS,&x,&y,&button);
 if(x!=x_old||y!=y_old)
 {
  Erase_Sprite_Size((sprite_ptr)&small,65,45);
 }

 if(x<=116)
 {
  x=116;
 }
 if(x>=436)
 {
  x=436;
 }
 if(y<=0)
 {
  y=0;
 }
 if(y>=55)
 {
  y=55;
 }
 if(button==2)
 {
  done=1;
 }
 if(button==1)
 {
  Chat(x,y,seek);
  Delay(10);
 }
 Squeeze_Mouse(MOUSE_SET_SENSITIVITY,&x,&y,&button);
 if(x!=x_old||y!=y_old)
 {
  small.x=x/2;
  small.y=y;
  Behind_Sprite_Size((sprite_ptr)&small,65,45);
  Draw_Sprite_Size((sprite_ptr)&small,65,45);
  x_old=x;
  y_old=y;

 }
}
}
pause_bar=0;
Squeeze_Mouse(MOUSE_RESET,0,0,0);
mscurson(arrow);
}

void Boy(sprite_ptr sprite)
{
static int index,old=0,direction=0,change=0;
char get_key;

if(kbhit())
{
get_key=getch();
Clear_Key_Buffer();

if(get_key==sprite->key.up)
{
 sprite->curr_frame=6;
 Draw_Sprite(sprite);
 change=1;
 Room(UP);
 PCX_Load_Scroll("shtu.pcx",background,1);
 sprite->curr_frame=7;
 Delay(10);
}
if(get_key==sprite->key.right)
{
 sx+=8;
 if(old==-1)
 {
  sprite->curr_frame=(sprite->curr_frame+4)%8;
  direction=sprite->curr_frame;
 }
 else
 {
  sprite->curr_frame=0;
  direction=sprite->curr_frame;
 }
 old=-1;
 if(sx>639)
  sx=0;
}
if(get_key==sprite->key.down)
{
 sprite->curr_frame=3;
 Draw_Sprite(sprite);
 change=1;
 Room(DOWN);
 PCX_Load_Scroll("shtu.pcx",background,1);
 sprite->curr_frame=2;
 Delay(10);
}
if(get_key==sprite->key.left)
{
 sx-=8;
 if(old==1)
 {
  sprite->curr_frame=(sprite->curr_frame+4)%8;
  direction=sprite->curr_frame;
 }
 else
 {
  sprite->curr_frame=1;
  direction=sprite->curr_frame;
 }
 old=1;
 if(sx<0)
  sx=639;
}

if(get_key==sprite->key.quit)
{
 done=1;
}
Show_View_Port_Pcx(background,sx);
Draw_Sprite(sprite);
if(change==1)
{
 sprite->curr_frame=direction;
 change=0;
}
Delay(10);
}
else
{
 PCX_Load_Scroll("shtu.pcx",background,1);
 Show_View_Port_Pcx(background,sx);
 sprite->curr_frame=(sprite->curr_fra me+4)%8;
 Draw_Sprite(sprite);
 Delay(10);
}
}

void Build_Screen(void)
{
int index;
char key[7]={'w','x','a','d','s','q','z'};
pcx_picture objects_pcx;
for(index=1;index<255;index++)
 Get_Palette_Register(index,(RGB_color_ptr)&color[index]);

PCX_Load_Screen("boy.pcx",1);

now=pre=(struct sprite *)malloc(sizeof(struct sprite_type));
head=now;
Sprite_Init(now,160,168,0,0,0,0,Boy,key);
for(index=0;index<MAX_SPRITE_FRAMES;index++)
 PCX_Grab_Bitmap_Screen((pcx_picture_ptr)&objects_pcx,now,index,index,0);
now->curr_frame=0;
now->next=NULL;

Fill_Screen(0);

PCX_Load_Screen_Height("mouse.pcx",(pcx_picture_ptr)&objects_pcx,1,65);
Sprite_Init_Size((sprite_ptr)&small,0,0,0,0,0,0,65,45,1);
PCX_Grab_Bitmap_Size_Screen((pcx_picture_ptr)&objects_pcx,(sprite_ptr)&small,0,0,0,65,45);
Fill_Screen(0);

background=(struct pcx_picture *)malloc(sizeof(struct pcx_picture_typ));
PCX_Init_Scroll(background);
PCX_Load_Scroll("shtu.pcx",background,1);
Show_View_Port_Pcx(background,sx);
Draw_Sprite(now);
PCX_Load_Screen_Height("help2.pcx",(pcx_picture_ptr)&objects_pcx,1,120);
Delay(50);
PCX_Load_Screen_Height("help.pcx",(pcx_picture_ptr)&objects_pcx,1,120);
}

void Game_Load(void)
{
Build_Screen();
Delay(20);
Squeeze_Mouse(MOUSE_RESET,0,0,0);
mscurson(handcurs);
while(done!=1){
 if(pause_game!=1)
  Judge_Sprite();
 if(pause_bar!=1)
  Judge_Object_RPG();
}

Sprite_Delete_Size((sprite_ptr)&small,1);
Sprite_Delete(now);
}