home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1997 March / VPR9703A.ISO / FFILLY / FTILE400 / FLATMAN.TFY < prev    next >
Text File  |  1996-08-31  |  2KB  |  93 lines
  1. /*　ふらっとマン関係のＴｏｆｆｙファイル　*/
  2.  
  3. rtiledraw(high,paraX,paraY){
  4.  
  5.     if(high==49)    MovePic(whitepic,0,0,32,32,basepic,paraX+1,paraY+1);    
  6.     if(high==50)    MovePic(greenpic,0,0,32,32,basepic,paraX+1,paraY+1);
  7.     if(high==51)    MovePic(bluepic,0,0,32,32,basepic,paraX+1,paraY+1);
  8.     if(high==52)    MovePic(redpic,0,0,32,32,basepic,paraX+1,paraY+1);
  9. }
  10.  
  11. flatmanmovedown(paraX,paraY){
  12.     int n; 
  13.     n=tile[placeX+placeY*9];
  14.  
  15.     if(dir==0 && placeY!=8){        //下向き
  16.         placeY=placeY+1;
  17.         MovePic(downpic,0,0,33,33,basepic,paraX,paraY+35,0,color);
  18.         if(n==48)    MovePic(yellowpic,0,0,33,33,basepic,paraX,paraY);
  19.         else    rtiledraw(n,paraX,paraY);
  20.         return;
  21.     }
  22. }
  23.  
  24. flatmanmoveright(paraX,paraY){
  25.     int n; 
  26.     n=tile[placeX+placeY*9];
  27.  
  28.     if(dir==1 && placeX!=8){        //右向き
  29.         placeX=placeX+1;
  30.         MovePic(rightpic,0,0,33,33,basepic,paraX+35,paraY,0,color);
  31.         if(n==48)    MovePic(yellowpic,0,0,33,33,basepic,paraX,paraY);
  32.         else    rtiledraw(n,paraX,paraY);
  33.         return;
  34.     }
  35. }
  36.  
  37. flatmanmoveup(paraX,paraY){
  38.     int n; 
  39.     n=tile[placeX+placeY*9];
  40.  
  41.     if(dir==2 && placeY!=0){        //上向き
  42.         placeY=placeY-1;
  43.         MovePic(uppic,0,0,33,33,basepic,paraX,paraY-35,0,color);
  44.         if(n==48)    MovePic(yellowpic,0,0,33,33,basepic,paraX,paraY);
  45.         else    rtiledraw(n,paraX,paraY);    
  46.         return;
  47.     }
  48. }
  49.  
  50. flatmanmoveleft(paraX,paraY){
  51.     int n; 
  52.     n=tile[placeX+placeY*9];
  53.  
  54.     if(dir==3 && placeX!=0){        //左向き
  55.         placeX=placeX-1;
  56.         MovePic(leftpic,0,0,33,33,basepic,paraX-35,paraY,0,color);
  57.         if(n==48)    MovePic(yellowpic,0,0,33,33,basepic,paraX,paraY);
  58.         else    rtiledraw(n,paraX,paraY);
  59.         return;
  60.     }
  61. }
  62.  
  63. flatmanchange(paraX,paraY){    //ふらっとマンの向きを変える
  64.     int n; 
  65.     n=tile[placeX+placeY*9];
  66.  
  67.     if(dir==0){
  68.         MovePic(yellowpic,0,0,33,33,basepic,paraX,paraY);
  69.         if(n!=48)        rtiledraw(n,paraX,paraY);
  70.         MovePic(downpic,0,0,33,33,basepic,paraX,paraY,0,color);
  71.         return;
  72.     }
  73.     if(dir==1){
  74.         MovePic(yellowpic,0,0,33,33,basepic,paraX,paraY);
  75.         if(n!=48)        rtiledraw(n,paraX,paraY);
  76.         MovePic(rightpic,0,0,33,33,basepic,paraX,paraY,0,color);
  77.         return;
  78.     }
  79.     if(dir==2){
  80.         MovePic(yellowpic,0,0,33,33,basepic,paraX,paraY);
  81.         if(n!=48)        rtiledraw(n,paraX,paraY);
  82.         MovePic(uppic,0,0,33,33,basepic,paraX,paraY,0,color);
  83.         return;
  84.     }
  85.     if(dir==3){
  86.         MovePic(yellowpic,0,0,33,33,basepic,paraX,paraY);
  87.         if(n!=48)        rtiledraw(n,paraX,paraY);
  88.         MovePic(leftpic,0,0,33,33,basepic,paraX,paraY,0,color);
  89.         return;
  90.     }
  91. }
  92.  
  93.