view test/longcode.c @ 927:b491db049d74

Added tag current-release for changeset 4e73a22327a8
author kono
date Sun, 13 Apr 2014 10:20:02 +0900
parents 5313ed059cee
children
line wrap: on
line source


typedef struct teki {
     float x;
     float y;
     float sx;
     float sy;
     int charno;
     char  tama;                         
     char  f;                    
     int p;                      
     int move;
     int sc;                     
     int dt1;
     int dt2;
} teki;



typedef struct player {
     int x;
     int y;
     int ch;
     int point;
     char  bf;
     int muteki;
     int zanki;
     int ccount;
} player;

struct move_interface {
     int y;
     int ch;
     int point;
     char  bf;
     int muteki;
     int zanki;
     int ccount;
};

__code
put_enemy_bung(
     __code(*junction)(int,teki *,player,struct move_interface),
     int tekino,
     teki *enemy,
     player jiki,
     struct move_interface interface);

__code
move13_1(int tekino,teki *enemy,player jiki,struct move_interface interface);

__code
move13(int tekino,teki *enemy,player jiki,struct move_interface interface)
{
     if (enemy[tekino].f == 0 ) {

          goto put_enemy_bung(move13_1,tekino,enemy,jiki,interface);
     }
     goto move13_1(tekino,enemy,jiki,interface);
}