[WitchFan 00401] Re: サンプル

["Shigeki 'anmitsu' Yamamoto" <anmitsu@cds.ne.jp>]

$B$"$s$_$D(B $B$G$9!#(B

> $B2hA|I=<($K$D$$$F$J$N$G$9$,!"(B
> $B2<5-$N%W%m%0%i%`$G$O8mF0:n$7$^$9!#(B
> $B%-%c%i%/%?I=<($H%9%W%i%$%HI=<($r(B
> $B0l$D$:$D9T$&$D$b$j$G=q$$$?$b$N$G$9$,!"(B
> $B$I$3$,$I$&$$$&Iw$K0c$C$F$$$k$N$G$7$g$&!)(B
$B$$$m$$$m$J0UL#$G4V0c$C$F$k$H;W$$$^$9(B ^-^;


> static int bmp1[] = {
>     0xff, 0xff, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81,
>     0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0xff, 0xff,
> };
$B$3$N%G!<%?$r(B
>     font_set_colordata(0,1,bmp1);
$B$H$d$k$H!";v<B>e!">eH>J,$N(B8$B$D$N%G!<%?$@$1$r;H$C$?%U%)%s%H$,EPO?$5$l$F(B
$B$7$^$$$^$9!#(B
$B0U?^$7$?DL$j$G$"$m$&%U%)%s%H$N@5$7$$Dj5A$O(B
  static int bmp1[] = {
      0xffff, 0x8181, 0x8181, 0x8181, 0x8181, 0x8181, 0x8181, 0xffff,
  };
$B$H$J$j$^$9!#(B(1$B%i%$%s$K$D$-(B2$B%P%$%H(B=int$B7?$NCM$R$H$D(B)

>     lcd_set_color(0x7530,0xfdb9);
$B?'$N@_Dj$K4X$7$F$O!"$3$l$r8F$s$@$@$1$G$O$@$a$G!"(Bpalette_set_color()$B$b(B
$B8F$s$G$d$i$J$$$H$$$1$^$;$s!#(B
$B5U$K$$$&$H!"(Blcd_set_color()$B$O8F$P$J$/$F$bJ?5$$_$?$$$G$9!#(B($B$C$F$$$&$+!"(B
$B;d$O$3$A$i$O;H$C$?$3$H$,$J$$$N$G$h$/J,$+$j$^$;$s!#!#!#(B)

>  screen_fill_char(SCREEN1,0,0,28,18,0x00);
$B$3$l$N:G8e$N0z?t$N(Bbit9$B!A(B12($B>e$+$i(B4$B%S%C%HL\!A(B7$B%S%C%HL\(B)$B$K!">e$G@_Dj$7$?(B
$B%Q%l%C%HHV9f$rIU$1$^$9!#%Q%l%C%HHV9f(B0$B$r;HMQ$9$k$J$i$3$N$^$^$G$$$$$N$G(B
$B$9$,!"$?$H$($P%Q%l%C%HHV9f(B15$B$r;H$&>l9g$O(B 0x1e00 $B$H$J$j$^$9!#(B
$B$A$J$_$K!"(BSCREEN2$B$r;HMQ$9$k>l9g$O!"(BSCREEN1$B$h$j<jA0$KI=<($5$l$k4X78>e!"(B
$BL5>r7o$G(B00$B$,F)L@?'$H$J$k(B $B%Q%l%C%HHV9f(B4-7,12-15 $B$r;HMQ$7$J$$$H!"(BSCREEN1
$B$,1#$l$F$7$^$C$F8+$($J$/$J$j$^$9!#(B

>     no=0;
>  screen_set_char(SCREEN1,11,11,1,1,&no);
$B$3$A$i$bF1MM$G!":G8e$N0z?t$G<($5$l$k%G!<%?$K%Q%l%C%H>pJs$rF~$l$k$N$rK:(B
$B$l$J$$$h$&$K$7$^$7$g$&!#(B


>     sprite_set_char(1,1);
$B$3$l$bBh(B2$B0z?t$K%Q%l%C%H>pJs$rIU$1$F$d$k$N$G$9$,!"%9%W%i%$$H$N>l9g$O%Q(B
$B%l%C%HHV9f(B8$B!A(B15$B$7$+;H$($^$;$s$N$GCm0U$7$F$/$@$5$$!#>e5-$N>l9g$G$9$H%Q(B
$B%l%C%HHV9f(B8$B$,;H$o$l$^$9!#Nc$($P(B15$B$r;H$$$?$$>l9g(B sprite_set_char(1,0x0e01);
$B$H$7$^$9!#(B

>     sprite_set_range(0,127);
$B$3$l$G$9$H!"(B127$B8D$N%9%W%i%$%H$,I=<($5$l$F$7$^$$$^$9!#(B
$B$D$^$j!">e$G@_Dj$7$?$b$N0J30$N$4$_$,2hLL$KI=<($5$l$F$7$^$&2DG=@-$,$"$k!"(B
$B$H$$$&$3$H$G$9!#(B

>     while(1);
$B$3$l$O@dBP$K$d$a$?$[$&$,$$$$$G$9!#(B
$B$3$l$G$9$H!"EE8;$r$V$A@Z$k0J30$K=*N;J}K!$,$"$j$^$;$s!#(B
$B%W%m%0%i%`<B9TCf$N>uBV$GEE8;$rIQHK$K$V$A$V$A$d$C$F$$$k$H%+!<%H%j%C%8Fb(B
$B$N%G!<%?$,2u$l$k>l9g$,$"$j$^$9!#(B
$B%F%9%H%W%m%0%i%`$GI=<($r3NG'$7$?$$>l9g$O!"(Bkey_wait()$B$J$I$r;H$$$^$7$g$&!#(B