HSP¥Ý¡¼¥¿¥ë
¥µ¥¤¥È¥Þ¥Ã¥× ¤ªÌ䤤¹ç¤ï¤»


HSPTV!·Ç¼¨ÈÄ


̤²ò·è ²ò·è Ää»ß ºï½üÍ×ÀÁ

2010
0428
¤ß¤«¤ó£è£ó£ð¤Ç¤ê¤ó¤´¤ò¥­¥ã¥Ã¥Á¤¹¤ë¤è¤¦¤Ê¥²¡¼¥à¤ò¤Ä¤¯¤ê¤¿¤¤¤Î¤Ç¤¹¤¬10̤²ò·è


¤ß¤«¤ó

¥ê¥ó¥¯

2010/4/28(Wed) 20:10:21|NO.32364

¤³¤¦¤¤¤Ã¤¿ÇùÁ³¤È¤·¤¿¤³¤È¤ò¤·¤Æ¤Ï¤¤¤±¤Ê¤¤¤È
½ñ¤¤¤Æ¤¢¤Ã¤¿¤Î¤Ç¤¹¤¬¡¢¤É¤¦¤·¤Æ¤âÍê¤ë¤È¤³¤í¤¬Ìµ¤¤¤Î¤Ç¡¢¤¹¤¤¤Þ¤»¤ó¡£
¤«¤´¤òÆ°¤«¤·¤Æ¡¢Íî¤Á¤Æ¤¯¤ë¤ê¤ó¤´(²¿¤Ç¤âÎɤ¤¤Î¤Ç¤¹¤¬)
¤ò¥­¥ã¥Ã¥Á¤¹¤ë¥²¡¼¥à¤òºî¤ê¤¿¤¤¤Ç¤¹¡£
¼«Ê¬¤ÎÃæ¤Ç¤Ï¥·¥å¡¼¥Æ¥£¥ó¥°¥²¡¼¥à¤Î¤Ö¤Ä¤«¤Ã¤¿¤È¤­¤Î
Åö¤¿¤êȽÄê¤Ç¤Ç¤­¤ë¤È»×¤¤¹þ¤ó¤Ç¤¤¤ë¤Î¤Ç¤¹¤¬¡¢
¤½¤¦¤¤¤¦¤â¤Î¤Ç¤Ï¤Ê¤¤¤Î¤Ç¤·¤ç¤¦¤«¡£
Æñ¤·¤¤Ã±¸ì¤Ï¼«Ê¬¤ÇÄ´¤Ù¤Þ¤¹¤Î¤Ç¡¢¤É¤Ê¤¿¤«¤´¶µ¼ø¤¤¤¿¤À¤±¤Ê¤¤¤Ç¤·¤ç¤¦¤«¡£



¤³¤Îµ­»ö¤ËÊÖ¿®¤¹¤ë


Chokoko

¥ê¥ó¥¯

2010/4/28(Wed) 20:38:21|NO.32365

¼«Ê¬¤ÇÇùÁ³¤È¤·¤¿¼ÁÌä¤Ç¤¢¤ë¤ÈÍý²ò¤·¤Æ¤¤¤ë¤Î¤Ê¤é¤Ð¡¢
¤â¤¦¾¯¤·¶ñÂÎŪ¤Ë½ñ¤¯ÅØÎϤò¤·¤Æ¤¯¤À¤µ¤¤¡£

>>¼«Ê¬¤ÎÃæ¤Ç¤Ï¥·¥å¡¼¥Æ¥£¥ó¥°¥²¡¼¥à¤Î¡¦¡¦¡¦
¥·¥å¡¼¥Æ¥£¥ó¥°¥²¡¼¥à¤ÎÅö¤¿¤êȽÄê¤ò¹Ô¤¦ÊýË¡¤Ï¤¿¤¯¤µ¤ó¤¢¤ê¤Þ¤¹¡£
¤¢¤Ê¤¿¤¬ÁÛÁü¤·¤Æ¤¤¤ëʪ¤ò¥¹¥¯¥ê¥×¥È¤È¤·¤ÆÄ󼨤·ÀâÌÀ¤¹¤ë¤«¡¢
ÆâÍƤ¬¤ï¤«¤ë¤è¤¦¤Ë¤Ï¤Ã¤­¤ê¤ÈÀâÌÀ¤·¤Æ¤¯¤À¤µ¤¤¡£

¤½¤¦¤·¤Æ¤â¤é¤¨¤Ê¤±¤ì¤ÐÅú¤¨¤è¤¦¤¬¤¢¤ê¤Þ¤»¤ó¡£



backdrop

¥ê¥ó¥¯

2010/4/28(Wed) 21:23:17|NO.32367

¥ê¥ó¥´¤È¥×¥ì¥¤¥ä¡¼¤ÎºÂɸ(X or Y)¤¬½Å¤Ê¤Ã¤¿¤é¥­¥ã¥Ã¥Á¤·¤Æ¡¢¤½¤Î¥ê¥ó¥´¤ò¾Ã¤¹



Ve

¥ê¥ó¥¯

2010/4/28(Wed) 21:24:11|NO.32368

¹Í¤¨¤ò¼ÑµÍ¤á¤Æ¤¤¤±¤Ð¡¢½èÍý¤Îή¤ì¤¬Ê¬¤«¤ë¤È»×¤¦¡£

Âç¤Þ¤«¤Ë¤Ç¤âŽ¥Ž¥Ž¥

¡¦¥ê¥ó¥´¤Ï²¼¤ØÍî¤Á¤ë
¡¦¥«¥´¤ÏÆ°¤«¤»¤ë
¡¦¥ê¥ó¥´¤È¥«¥´¤¬ÀÜ¿¨¤¹¤ë¤È¥­¥ã¥Ã¥Á¤¹¤ë
¡¦¥ê¥ó¥´¤¬²èÌ̤«¤é¾Ã¤¨¤ë

¤È¹Í¤¨¤Æ¡¢¤µ¤é¤ËºÙ¤«¤¯Êø¤·¤Æ¤¤¤±¤Ð¡¢É¬ÍפʽèÍý¤¬Ê¬¤«¤ë¤È»×¤¤¤Þ¤¹¡£

¡¦¥ê¥ó¥´¤Ï²¼¤ØÍî¤Á¤ë

­¡¥ê¥ó¥´¤Ï¡û¤º¤Ä²¼¤ØÍî¤Á¤ë
­¢¡û¤º¤ÄÍî¤È¤¹°Ù¤Ë¥ê¥ó¥´¤ÎºÂɸ¤òµ­Ï¿¤¹¤ëÊÑ¿ô¤¬É¬Íפˤʤë
­£¤½¤ÎÊÑ¿ô¤Ë¡û¤º¤Ä²Ã»»¤µ¤»¤Æ¤¤¤¯½èÍý¤ò¥ë¡¼¥×¤ØÆþ¤ì¤ë
­¤¥«¥´¤ÎºÂɸ¤È½Å¤Ê¤Ã¤¿¤é¥ê¥ó¥´¤¬¾Ã¤¨¤Æ¡¢¥­¥ã¥Ã¥Á¤·¤¿»ö¤Ë¤Ê¤ë
­¥ÃÏÌ̤ˤª¤Á¤Æ¤â¥ê¥ó¥´¤¬¾Ã¤¨¤ë

¡Äetc



backdrop

¥ê¥ó¥¯

2010/4/28(Wed) 21:26:36|NO.32370

HGIMG3¤À¤Ã¤¿¤égetcoli¤¬´Êñ
[¥ê¥ó¥´¤ò¾Ã¤¹]¤«¤é¡¢¥ë¡¼¥×¤Î¤¦¤Á¤ÇËè²ó³¨²è½èÍý(ºÂɸ¤¬½Å¤Ê¤Ã¤Æ¤¤¤¿¤é¥¹¥­¥Ã¥×¤¹¤ë¤È¤«)



ANTARES

¥ê¥ó¥¯

2010/4/28(Wed) 23:54:37|NO.32375

>¼«Ê¬¤ÎÃæ¤Ç¤Ï¥·¥å¡¼¥Æ¥£¥ó¥°¥²¡¼¥à¤Î¤Ö¤Ä¤«¤Ã¤¿¤È¤­¤Î
>Åö¤¿¤êȽÄê¤Ç¤Ç¤­¤ë¤È»×¤¤¹þ¤ó¤Ç¤¤¤ë¤Î¤Ç¤¹¤¬¡¢
>¤½¤¦¤¤¤¦¤â¤Î¤Ç¤Ï¤Ê¤¤¤Î¤Ç¤·¤ç¤¦¤«¡£
¡¡¾¯¤·°Û¤Ê¤ëÍ×ÁǤ¬Íí¤ó¤Ç¤­¤Þ¤¹¡£

¡¡¤Þ¤º¡¢¤«¤´¤ò¥É¥Ã¥Èñ°Ì¤ÇÆ°¤«¤¹¤Î¤«¥­¥ã¥é¥¯¥¿Ã±°Ì¤Ç
Æ°¤«¤¹¤Î¤«¡Ê¤³¤ì¤ÏƱ»þ¤Ë¥ê¥ó¥´¤Î½é´ü°ÌÃ֣غÂɸ¤ò
¥É¥Ã¥Èñ°Ì¤Ë¤¹¤ë¤Î¤«¥­¥ã¥é¥¯¥¿Ã±°Ì¤Ë¤¹¤ë¤Î¤«¤È¤¤¤¦
¤³¤È¤Ç¤â¤¢¤ê¤Þ¤¹¡Ë
¥­¥ã¥é¥¯¥¿Ã±°Ì¤ÇÆ°¤«¤¹¤Î¤Ç¤¢¤ì¤Ð¡¢¤¦¤Þ¤¯¥­¥ã¥Ã¥Á¤Ç¤­¤¿
¤È¤­¤Ï¥ê¥ó¥´¤È¤«¤´¤¬¤Ô¤Ã¤¿¤ê½Å¤Ê¤ê¤Þ¤¹¤·¡¢¥­¥ã¥Ã¥Á
¤Ç¤­¤Ê¤¤¤È¤­¤Ï¤Þ¤ë¤ÇÎ¥¤ì¤Þ¤¹¤«¤éÌäÂꤢ¤ê¤Þ¤»¤ó¡£
¡¡¤·¤«¤·¡¢¥É¥Ã¥Èñ°Ì¤ÇÆ°¤«¤¹¾ì¹ç¡¢Åµ·¿Åª¤ÊÎã¤È¤·¤Æ¤Ï
¤«¤´¤È¥ê¥ó¥´¤¬¡Ê£ØºÂɸ¤Ë¤Ä¤¤¤Æ¡ËȾʬ¤À¤±½Å¤Ê¤Ã¤Æ¤¤¤ë¤È¤­
¤É¤¦È½Äꤹ¤ë¤Î¤«¤È¤¤¤¦ÌäÂ꤬À¸¤¸¤Þ¤¹¡£

¡¡¤·¤«¤·¡¢¥·¥å¡¼¥Æ¥£¥ó¥°¤Î¤¢¤¿¤êȽÄê¤ÈƱÍͤË
¾¯¤·¤Ç¤â¿¨¤Ã¤Æ¤¤¤ì¤Ð¥­¥ã¥Ã¥Á¤Ç¤­¤¿¤ÈȽÄꤹ¤ë¤³¤È¤â
¤Ç¤­¤Þ¤¹¡£

¡¡·ë¶É¡¢¤½¤ì¤ò·è¤á¤ë¤Î¤Ï¤¢¤Ê¤¿¤Ç¤¢¤Ã¤Æ¡¢
¤¤¤¤¤«°­¤¤¤«¤ÎÌäÂê¤Ç¤Ï¤¢¤ê¤Þ¤»¤ó¡£



ANTARES

¥ê¥ó¥¯

2010/4/29(Thu) 00:10:55|NO.32377

>¤¤¤¤¤«°­¤¤¤«¤ÎÌäÂê¤Ç¤Ï¤¢¤ê¤Þ¤»¤ó¡£
¡¡ÄûÀµ¡£
Àµ¤·¤¤¤«´Ö°ã¤Ã¤Æ¤¤¤ë¤«¤È¤¤¤¦ÌäÂê¤Ç¤Ï¤¢¤ê¤Þ¤»¤ó¡£



£ç£í

¥ê¥ó¥¯

2010/4/29(Thu) 14:15:42|NO.32381

hsp32\sample\game\block2.hsp

¥µ¥ó¥×¥ë¥Õ¥¡¥¤¥ë¤ò»²¹Í¤Ë¤µ¤ì¤¿¤é¡© xD



¤¢¤ê

¥ê¥ó¥¯

2010/4/30(Fri) 11:10:31|NO.32394

¥ê¥ó¥´¥­¥ã¥Ã¥Á¥²¡¼¥à¤Ê¤é´ðËÜŪ¤Ë¥×¥ì¥¤¥ä¡¼¤¬¾å²¼¤Ë°ÜÆ°¤¹¤ë»ö¤Ï̵¤¤¤Î¤Ç
¥×¥ì¥¤¥ä¡¼¤ÎYºÂɸ¤Ë¥ê¥ó¥´¤¬Ã£¤·¤¿»þ¤Ë¥×¥ì¥¤¥ä¡¼¤ÎÉý¤ÎÃæ¤Ë
¥ê¥ó¥´¤ÎXºÂɸ¤¬Â¸ºß¤·¤Æ¤¤¤ì¤Ð¥­¥ã¥Ã¥Á¤Ç¤­¤¿»ö¤Ë¤Ê¤ê¤Þ¤¹¡£
ȽÄê¤Ï¤³¤ó¤Ê´¶¤¸¤Ê¤Î¤Ç¤½¤ì¤Û¤ÉÆñ¤·¤¯Ìµ¤¤¤È¤Ï»×¤¤¤Þ¤¹¤¬
Ê£¿ô¤Î¥ê¥ó¥´¤òÍî¤È¤½¤¦¤È¤·¤¿¾ì¹ç¤Î´ÉÍý¤ÎÊý¤¬½é¿´¼Ô¤Ë¤Ï¿¾¯¥Ï¡¼¥É¥ë¤¬
¹â¤¤¤Î¤Ç¤Ï¤Ê¤¤¤«¤È»×¤¤¤Þ¤¹¡£

°Ê¾å¤òƧ¤Þ¤¨¤ÆºÇÄã¸ÂɬÍפÊÍ×ÁǤòÆþ¤ì¤¿¥¹¥¯¥ê¥×¥È¤òºî¤Ã¤Æ¤ß¤Þ¤·¤¿¡£
³ÆÌ¿Îá¤Î¾ÜºÙ¤ÏÌ¿Îá¥Ø¥ë¥×¡ÊÌ¿Îá¤Ë¥­¥ã¥ì¥Ã¥È¤ò¤¢¤ï¤»¤ÆF1¥­¡¼¤Çµ¯Æ°)¤ò¸«¤Æ²¼¤µ¤¤¡£
Enter¥­¡¼¤ÇÅö¤¿¤êȽÄ꤬ɽ¼¨¤µ¤ì¤ë¤Î¤ÇÆâÉô¤Ç¤É¤Î¤è¤¦¤Ë
Æ°¤¤¤Æ¤¤¤ë¤Î¤«¤Î»²¹Í¤Ë¤Ê¤ì¤Ð¤È»×¤¤¤Þ¤¹¡£
¡Ê¥ê¥ó¥´¤ÎȽÄê°ÌÃÖ¤òÃæ¿´¤Ë¤¹¤ë°Ù¤Ëɽ¼¨°ÌÃÖ¤òº¸¤Ë8¥É¥Ã¥Èʬ¤º¤é¤·¤Æ¤¤¤ë¤Î¤ËÃí°Õ¡Ë

screen 0, 640, 480 buffer 1 : cls 4 font msgothic, 16 color 255, 255, 255 pos 1, 0 : mes "¡û" pos 0, 13 : mes "Âç" pos 0, 26 : mes "£Ö" color 255 : pos 1, 42 : mes "¡ü" Px = 320 ;¥×¥ì¥¤¥ä¡¼¤Î½é´üºÂɸ£Ø Py = 450 ;¥×¥ì¥¤¥ä¡¼¤Î½é´üºÂɸ£Ù Pmuki = 1 ;º¸¸þ¤­=-1 ±¦¸þ¤­=1 Pmov = 8 ;¥×¥ì¥¤¥ä¡¼¤Î°ÜÆ°ÎÌ hit1 = Px ;Åö¤¿¤êȽÄ꺸ü hit2 = Px +16 + 12 ;Åö¤¿¤êȽÄ걦ü Amax = 15 ;¥ê¥ó¥´¤ÎºÇÂç¿ô dim Ax, Amax ;¥ê¥ó¥´¤Î£ØºÂɸ dim Ay, Amax ;¥ê¥ó¥´¤Î£ÙºÂɸ dim Aflg, Amax ;¥ê¥ó¥´¤Î¸ºß¥Õ¥é¥° Anum = 0 ;²èÌÌÃæ¤Î¥ê¥ó¥´¤Î¿ô Asty = 0 ;¥ê¥ó¥´¤Î½é´ü°ÌÃÖ Amov = 4 ;¥ê¥ó¥´¤Î°ÜÆ°ÎÌ Adflg = 10 ;¥ê¥ó¥´¤¬²¿¥Õ¥ì¡¼¥àËè¤Ë½Ð¸½¤¹¤ë¤«¡© Chkline = 445 ;Åö¤¿¤êȽÄê¥é¥¤¥ó dbg = 0 ;¥Ç¥Ð¥Ã¥°¥Õ¥é¥° Score = 0 randomize ;Íð¿ô½é´ü²½ *main gsel 0 gmode 2, 16, 25 redraw 0 color 0 : boxf ; ¥×¥ì¥¤¥ä¡¼¤Î°ÜÆ°¤Èɽ¼¨ stick key, 5 if key & 1 : Pmuki = -1 : Px + Pmov * Pmuki : hit1 = Px - 12 : hit2 = Px +16 if key & 4 : Pmuki = 1 : Px + Pmov * Pmuki : hit1 = Px : hit2 = Px +16 + 12 if key & 32 : dbg + 1 : dbg \ 2 if key & 128 : end Px = limit(Px, 16, 612) pos Px, Py : gcopy 1 pos Px + 12 * Pmuki, Py + 10 : gcopy 1, 0, 28, 16, 12 if Anum ! 0 : gosub *Apple_Move ;¥ê¥ó¥´¤Î¿ô¤¬°ì¸Ä°Ê¾å¤¢¤ì¤Ð°ÜÆ°¥ë¡¼¥Á¥ó¤Ø Adrop++ : Adrop \ Adflg ;¥é¥ó¥À¥à¤Ç¥ê¥ó¥´¤òÍ if Adrop = 0 : if rnd(3) = 0 : gosub *Apple_Drop if dbg = 1 { ;Åö¤¿¤êȽÄê¥é¥¤¥óɽ¼¨ color ,,255 : line hit1, 0, hit1, 480 : line hit2, 0, hit2, 480 color ,255 : line 0, Chkline, 640, Chkline } title "" + Anum + "¸ÄÍî²¼Ãæ " + Score + "¸Ä½¦¤Ã¤¿ Esc¤Ç½ªÎ»¡¡Enter¤ÇȽÄêɽ¼¨" redraw 1 await 33 goto *main *Apple_Drop if Anum = Amax : return ;¥ê¥ó¥´¤¬ºÇÂç¿ô¤è¤êÁý¤¨¤Ê¤¤¤è¤¦¤ËÄ´Àá repeat Amax if Aflg(cnt) = 0 { ;ÇÛÎó¤Î¶õ¤­¤¬¤¢¤ì¤Ð¥ê¥ó¥´¤òÄɲ乤ë Aflg(cnt) = 1 Anum = limit(Anum + 1, 0, Amax) Ax(cnt) = rnd(79) * 8 + 8 ;¥ê¥ó¥´¤Î½Ð¸½°ÌÃÖ·èÄê Ay(cnt) = Asty break } loop return *Apple_Move repeat Amax if Aflg(cnt) = 1 { Ay(cnt) + Amov if Ay(cnt) > Chkline { ;Åö¤¿¤êȽÄ곫»Ï if (Ax(cnt) > hit1)&(Ax(cnt) < hit2) { Aflg(cnt) = 0 Anum = limit(Anum - 1, 0, Amax) Score + 1 continue } } if Ay(cnt) > 480 { ;ÃÏÌ̤ËÍî¤Á¤¿¤é¾Ã¤¨¤ë Aflg(cnt) = 0 Anum = limit(Anum - 1, 0, Amax) continue } pos Ax(cnt) -8, Ay(cnt) : gcopy 1, 0, 42, 16, 54 ;¥ê¥ó¥´É½¼¨ if dbg = 1 : color 255 : line Ax(cnt), 0, Ax(cnt), 640 ;Åö¤¿¤êȽÄê¥é¥¤¥óɽ¼¨ } loop return



u

¥ê¥ó¥¯

2010/4/30(Fri) 19:03:01|NO.32399

¥¢¥ë¥´¥ê¥º¥à¤µ¤¨Ê¬¤«¤ì¤Ð¤³¤ÎÀè±þÍѤǤä¤Ã¤Æ¤¤¤±¤ë¤È»×¤¦¤Î¤Ç¡¢´Êά²½¤·¤¿¥µ¥ó¥×¥ë¤ò½ñ¤­¤Þ¤·¤¿¡£
Åö¤¿¤êȽÄê¤Ï¥ê¥ó¥´¤ÎÃæ¿´ÅÀ¤À¤±¤Ç¹Ô¤Ã¤Æ¤¤¤Þ¤¹¡£(¥«¥´¤Ë¤«¤¹¤Ã¤¿¤À¤±¤ÇÆþ¤ë¤È¤¤¤¦¤Î¤â¤ª¤«¤·¤¤µ¤¤¬¤¹¤ë¤Î¤Ç)


max=5//°ì²èÌ̤ËÍî¤È¤¹¥ê¥ó¥´¤ÎºÇÂç¿ô dim appX,max//¥ê¥ó¥´X°ÌÃÖÍÑÇÛÎó dim appY,max//¥ê¥ó¥´Y°ÌÃÖÍÑÇÛÎó repeat max//¥ê¥ó¥´¤Î½é´ü°ÌÃÖ¤ò¥é¥ó¥À¥à¤Ë·è¤á¤ë appX(cnt)=rnd(680) appY(cnt)=-rnd(max*100) loop kagoX=0//¥«¥´¤ÎX°ÌÃÖ kagoY=450//Y°ÌÃÖ mes "¦Ò" mesx=ginfo_mesx/2//ʸ»ú¤Î²£Éý¤ÎȾʬ¡¡(´Ê°×Åö¤¿¤êȽÄê¤Ë»ÈÍÑ) repeat redraw 0 color 0,0,0:boxf//²èÌ̤ò¹õ¤ÇÅɤêÄÙ¤· color 255,255,255 pos 0,0:mes "¥«¥´¤ÎÃæ¤Ë¤Ï¥ê¥ó¥´¤¬"+nakami+"¸Ä¤Ç¤¹" repeat max//¥ê¥ó¥´¤Î¿ôʬ·«¤êÊÖ¤¹ appY(cnt)+=2//¥ê¥ó¥´¤ÎYºÂɸ¤ò²¼¤²¤ë color 255,0,0 pos appX(cnt),appY(cnt):mes "¦Ò"//¤½¤Î°ÌÃÖ¤Ëɽ¼¨ if (appX(cnt)+mesx>kagoX) & (appX(cnt)+mesx<kagoX+30) & (appY(cnt)>kagoY) & (appY(cnt)<kagoY+20){//¥ê¥ó¥´¤ÎÃæ¿´¤¬¥«¥´¤ËÅö¤¿¤Ã¤Æ¤¤¤ì¤Ð /* 30=¥«¥´¤Î²£Éý¡¡20=¥«¥´¤Î½ÄÉý */ color 255,255,255 pos appX(cnt)-20,appY(cnt)-20 mes "¡À¥¹¥Ý¥Ã¡¿"//¥¹¥Ý¥Ã nakami++//¥«¥¦¥ó¥È¤òÁý¤ä¤¹ appX(cnt)=rnd(640)//ºÂɸ¤ò¥é¥ó¥À¥à¤Ë appY(cnt)=-rnd(max*100) } if appY(cnt)>480{//²èÌ̤β¼¤Þ¤Ç¤­¤¿¤é¤Þ¤¿ºÂɸ¤ò¥é¥ó¥À¥à¤Ë appX(cnt)=rnd(640) appY(cnt)=-rnd(max*100) } loop stick key,1|4 if key=1:kagoX-=4//¢«¤Ê¤éX¤ò¸º¤é¤· if key=4:kagoX+=4//¢ª¤Ê¤éÁý¤ä¤¹ color 255,255,255 boxf kagoX,kagoY,kagoX+30,kagoY+20//¥«¥´É½¼¨ color:pos kagoX,450:mes "¥«¥´" redraw 1 wait 1 loop



¥Æ¥Ã¥¯

¥ê¥ó¥¯

2010/5/3(Mon) 21:02:36|NO.32441

>¤«¤´¤òÆ°¤«¤·¤Æ¡¢Íî¤Á¤Æ¤¯¤ë¤ê¤ó¤´(²¿¤Ç¤âÎɤ¤¤Î¤Ç¤¹¤¬)
>¤ò¥­¥ã¥Ã¥Á¤¹¤ë¥²¡¼¥à¤òºî¤ê¤¿¤¤¤Ç¤¹¡£
¿ïʬÃê¾ÝŪ¤Ê¼ÁÌä¤Î¤è¤¦¤Êµ¤¤¬¤¹¤ë¡¦¡¦¡¦¡£
¤Þ¤¢¡¢¤³¤¦¤¤¤¦¤Î¤Ï¡¢Ve¤µ¤ó¤¬µ­½Ò¤·¤Æ¤¢¤ë¤È¤ª¤ê¡¢
½èÍý¤òʬ¤±¤Æ¹Í¤¨¤Æ¤¤¤¯¤Î¤¬¤¤¤¤¤«¤â¤·¤ì¤Þ¤»¤ó¡£

¡¦½é´ü½èÍý[£±²ó¤Î¤ß]
¡¡²èÁü¥Ç¡¼¥¿¤Î¥í¡¼¥É¤Ê¤É
¡¦ÆþÎϽèÍý
¡¡¥­¡¼ÆþÎÏÆɤ߹þ¤ß½èÍý
¡¦°ÜÆ°½èÍý
¡¡¼«µ¡(¤«¤´)¤Î°ÜÆ°½èÍý
¡¡Å¨µ¡(¤ê¤ó¤´)¤Î°ÜÆ°½èÍý
¡¦Åö¤¿¤êȽÄê
¡¡¼«µ¡(¤«¤´)¤ÈŨµ¡(¤ê¤ó¤´)¤ÎÅö¤¿¤êȽÄê
¡¦ÉÁ²è½èÍý
¡¡¼«µ¡(¤«¤´)¤ÎÉÁ²è½èÍý
¡¡Å¨µ¡(¤ê¤ó¤´)¤ÎÉÁ²è½èÍý

¤¢¤ê¤µ¤ó¤äu¤µ¤ó¤¬¡¢¥µ¥ó¥×¥ë¥¹¥¯¥ê¥×¥È¤òºÜ¤»¤Æ¤Þ¤¹¤¬¡¢
»ä¤â¥µ¥ó¥×¥ë¥¹¥¯¥ê¥×¥È¤òºîÀ®¤·¤¿¤Î¤ÇºÜ¤»¤Æ¤ª¤­¤Þ¤¹¡£
¤½¤ì¤Ë¤·¤Æ¤â¡¢¤³¤ì¤À¤±¤Î»ÅÍͤʤΤˡ¢
£È£Ó£Ð¤Ï¡¢Êʤ¬¤¢¤ê¤¹¤®¤Î¤«¡¢
¼ÂÁõ¤¹¤ë¤Î¤Ë¤«¤Ê¤êÈè¤ì¤¿¡¦¡¦¡¦(¡­¡¦¦Ø¡¦¡®)


//==================================================================================================== // ¥Õ¥¡¥¤¥ë̾¡§SampleHsp001.hsp // Æâ¡¡¡¡¡¡ÍÆ¡§¤ß¤«¤ó¤µ¤ó¤Î¼ÁÌä¤ÎÊÖÅú // ºî¡¡À®¡¡¼Ô¡§¥Æ¥Ã¥¯ // ¹¹¡¡¿·¡¡¼Ô¡§¥Æ¥Ã¥¯ // ºî¡¡À®¡¡Æü¡§2010/05/01 // ¹¹¡¡¿·¡¡Æü¡§2010/05/03 // Íú¡¡¡¡¡¡Îò¡§2010/05/01 ¿·µ¬ºîÀ® // ¡¡¡¡¡¡¡¡¡¡¡¡2010/05/02 ¤«¤´ÍÑ¡¦¤ê¤ó¤´ÍѤÎÇÛÎ󡦥ޥ¯¥í¤òºîÀ® // ¡¡¡¡¡¡¡¡¡¡¡¡2010/05/03 ¥²¡¼¥à¥á¥¤¥ó½èÍý¡¦Åö¤¿¤êȽÄê¤ò¼ÂÁõ // ¥á¡¡¡¡¡¡¥â¡§¥¹¥ì¥Ã¥É¡Öhttp://hsp.tv/play/pforum.php?mode=all&num=32364¡× //==================================================================================================== //==================== ¥Ø¥Ã¥À¡¼¥Õ¥¡¥¤¥ë¤Î¥¤¥ó¥¯¥ë¡¼¥É ====================// #include "hspdef.as" //==================== ¥Þ¥¯¥í¤ÎÀë¸À ====================// #define global APPLE_SIZE 10 // ¤ê¤ó¤´¤Î¸Ä¿ô #define global ITEM_SIZE_BASKET 6 // ¤«¤´¤Î¹àÌÜ¿ô #define global ITEM_SIZE_APPLE 7 // ¤ê¤ó¤´¤Î¹àÌÜ¿ô #define global WINDOW_ID_BASKET 1 // ¥¦¥£¥ó¥É¥¦£É£Ä(¤«¤´) #define global WINDOW_ID_APPLE 2 // ¥¦¥£¥ó¥É¥¦£É£Ä(¤ê¤ó¤´) #define global FILE_NAME_BASKET "Basket.gif" // ¥Õ¥¡¥¤¥ë̾(¤«¤´) #define global FILE_NAME_APPLE "Apple.gif" // ¥Õ¥¡¥¤¥ë̾(¤ê¤ó¤´) #define global BASKET_WIDTH 36 // ¤«¤´²èÁü¤ÎÉý #define global BASKET_HEIGHT 36 // ¤«¤´²èÁü¤Î¹â¤µ #define global APPLE_WIDTH 36 // ¤ê¤ó¤´²èÁü¤ÎÉý #define global APPLE_HEIGHT 36 // ¤ê¤ó¤´²èÁü¤Î¹â¤µ #define global APPLE_WAIT 20 // ¤ê¤ó¤´¤ÎÉÁ²è´Ö³Ö #define global BASKET_MOVE_X 20 // ¤«¤´²èÁü¤Î°ÜÆ°ÎÌ(£Ø¼´) #define global BASKET_MOVE_Y 0 // ¤«¤´²èÁü¤Î°ÜÆ°ÎÌ(£Ù¼´) #define global APPLE_MOVE_X 0 // ¤ê¤ó¤´²èÁü¤Î°ÜÆ°ÎÌ(£Ø¼´) #define global APPLE_MOVE_Y 8 // ¤ê¤ó¤´²èÁü¤Î°ÜÆ°ÎÌ(£Ù¼´) #define global g_clsBasket_hWindowId g_nArrayBasket@(0) #define global g_clsBasket_nDivId g_nArrayBasket@(1) #define global g_clsBasket_nLeft g_nArrayBasket@(2) #define global g_clsBasket_nTop g_nArrayBasket@(3) #define global g_clsBasket_nWidth g_nArrayBasket@(4) #define global g_clsBasket_nHeight g_nArrayBasket@(5) #define global ctype g_clsApple_hWindowId(%1) g_nArrayApple@(0, %1) #define global ctype g_clsApple_nDivId(%1) g_nArrayApple@(1, %1) #define global ctype g_clsApple_nLeft(%1) g_nArrayApple@(2, %1) #define global ctype g_clsApple_nTop(%1) g_nArrayApple@(3, %1) #define global ctype g_clsApple_nWidth(%1) g_nArrayApple@(4, %1) #define global ctype g_clsApple_nHeight(%1) g_nArrayApple@(5, %1) #define global ctype g_clsApple_nDisplay(%1) g_nArrayApple@(6, %1) // ¢¨¢¬¥â¥¸¥å¡¼¥ëÆ⤫¤é¥°¥í¡¼¥Ð¥ëÊÑ¿ô¤ò»²¾È¤¹¤ë¾ì¹ç¤Ï¡¢ÊÑ¿ô̾¤ÎºÇ¸å¤Ë¡÷¤òÉÕ¤±¤Ê¤±¤ì¤Ð¤Ê¤é¤Ê¤¤ //==================== Äê¿ô¤ÎÀë¸À ====================// #const global WAIT_TIME 10 // ÃæÃÇ»þ´Ö(ñ°Ì¡§£±£°¥ß¥êÉÃ) #const global KEY_ARROW_LEFT 1 // ¥«¡¼¥½¥ë¥­¡¼¤Îº¸(¢«) #const global KEY_ARROW_RIGHT 4 // ¥«¡¼¥½¥ë¥­¡¼¤Î±¦(¢ª) #const global KEY_ARROW_UP 2 // ¥«¡¼¥½¥ë¥­¡¼¤Î¾å(¢¬) #const global KEY_ARROW_DOWN 8 // ¥«¡¼¥½¥ë¥­¡¼¤Î²¼(¢­) #const global KEY_SPACE 16 // ¥¹¥Ú¡¼¥¹¥­¡¼ #const global KEY_ENTER 32 // Enter¥­¡¼ #const global KEY_ESC 128 // Esc¥­¡¼ //==================== Îóµó·¿¤ÎÀë¸À ====================// // ¥×¥í¥»¥¹£É£Ä #enum global ENUM_PROCESS_ID_BEGIN = 0 // ¥×¥í¥»¥¹£É£Ä(½é¡¡´ü½èÍý) #enum global ENUM_PROCESS_ID_MAIN // ¥×¥í¥»¥¹£É£Ä(¥á¥¤¥ó½èÍý) #enum global ENUM_PROCESS_ID_END // ¥×¥í¥»¥¹£É£Ä(½ª¡¡Î»½èÍý) #enum global ENUM_PROCESS_ID_LIMIT // ¥×¥í¥»¥¹£É£Ä(¸Â³¦ÃÍ) // ¥·¡¼¥ó£É£Ä #enum global ENUM_SCENE_ID_GAME = 0 // ¥·¡¼¥ó£É£Ä(¥²¡¼¥à²èÌÌ) #enum global ENUM_SCENE_ID_TITLE // ¥·¡¼¥ó£É£Ä(¥¿¥¤¥È¥ë²èÌÌ) #enum global ENUM_SCENE_ID_LIMIT // ¥·¡¼¥ó£É£Ä(¸Â³¦ÃÍ) //==================== ¥°¥í¡¼¥Ð¥ëÊÑ¿ô¤ÎÀë¸À ====================// g_nProcessId = ENUM_PROCESS_ID_BEGIN // ¥×¥í¥»¥¹£É£Ä g_nSceneIdOld = ENUM_SCENE_ID_GAME // ¥·¡¼¥ó£É£Ä(²áµî) g_nSceneIdNow = ENUM_SCENE_ID_GAME // ¥·¡¼¥ó£É£Ä(¸½ºß) g_nSceneIdNew = ENUM_SCENE_ID_GAME // ¥·¡¼¥ó£É£Ä(̤Íè) g_nKeyData = 0 // ¥­¡¼ÆþÎϥǡ¼¥¿ g_nArrowLeft = 0 // ¥­¡¼ÆþÎϥե饰(º¸) g_nArrowRight = 0 // ¥­¡¼ÆþÎϥե饰(±¦) g_nAppleCount = 0 // ¤ê¤ó¤´¤ÎÉÁ²è´Ö³Ö¥«¥¦¥ó¥È dim g_nArrayBasket, ITEM_SIZE_BASKET // ¤«¤´¾ðÊó¤Î£±¼¡¸µÇÛÎó dim g_nArrayApple, ITEM_SIZE_APPLE, APPLE_SIZE // ¤ê¤ó¤´¾ðÊó¤Î£²¼¡¸µÇÛÎó //==================== ¥â¥¸¥å¡¼¥ë¤ÎÀë¸À ====================// #module SampleModule // £²¤Ä¤Î¶ë·Á¤ÎÅö¤¿¤êȽÄê¤ò¹Ô¤¦ // °ú¿ô // ¡¡lstRect1 : ¶ë·Á£±¤ÎÇÛÎó // ¡¡lstRect2 : ¶ë·Á£²¤ÎÇÛÎó // ¡¡nIndex : ¶ë·Á£²¤ÎÇÛÎó¤ÎÍ×ÁÇ¿ô // ¥í¡¼¥«¥ëÊÑ¿ô // ¡¡nHitFlag : // Ìá¤êÃÍ // ¡¡£°°Ê³° : £²¤Ä¤Î¶ë·Á¤¬ÀÜ¿¨¤·¤Æ¤¤¤ë¾ì¹ç // ¡¡£°¡¡¡¡ : £²¤Ä¤Î¶ë·Á¤¬ÀÜ¿¨¤·¤Æ¤¤¤Ê¤¤¾ì¹ç #defcfunc IsHit array lstRect1, array lstRect2, int nIndex, local nHitFlag, \ local nLeft1, local nLeft2, local nLeft3, local nLeft4, \ local nTop1, local nTop2, local nTop3, local nTop4 nLeft1 = lstRect1(2) nLeft2 = lstRect2(2, nIndex) + lstRect2(4, nIndex) nLeft3 = lstRect1(2) + lstRect1(4) nLeft4 = lstRect2(2, nIndex) nTop1 = lstRect1(3) nTop2 = lstRect2(3, nIndex) + lstRect2(5, nIndex) nTop3 = lstRect1(3) + lstRect1(5) nTop4 = lstRect2(3, nIndex) // ¶ë·Á£±¤Îº¸Â¦¤Î£ØºÂɸ¤¬¡¢¶ë·Á£²¤Îº¸Â¦¤Î£ØºÂɸ¡Ü¶ë·Á£²¤ÎÉý̤Ëþ¤Î¾ì¹ç ¤«¤Ä // ¶ë·Á£±¤Îº¸Â¦¤Î£ØºÂɸ¡Ü¶ë·Á£±¤ÎÉý¤¬¡¢¶ë·Á£²¤Îº¸Â¦¤Î£ØºÂɸ°Ê¾å¤Î¾ì¹ç ¤«¤Ä // ¶ë·Á£±¤Î¾å¦¤Î£ÙºÂɸ¤¬¡¢¶ë·Á£²¤Î¾å¦¤Î£ÙºÂɸ¡Ü¶ë·Á£²¤Î¹â¤µÌ¤Ëþ¤Î¾ì¹ç ¤«¤Ä // ¶ë·Á£±¤Î¾å¦¤Î£ÙºÂɸ¡Ü¶ë·Á£±¤Î¹â¤µ¤¬¡¢¶ë·Á£²¤Î¾å¦¤Î£ÙºÂɸ°Ê¾å¤Î¾ì¹ç if((nLeft1 < nLeft2) & (nLeft3 > nLeft4) & (nTop1 < nTop2) & (nTop3 > nTop4)) { nHitFlag = 1 // ¾åµ­°Ê³°¤Î¾ì¹ç } else { nHitFlag = 0 } return nHitFlag // ½é´ü½èÍý¤ò¹Ô¤¦ // °ú¿ô // ¡¡nSceneIdNow : ¥·¡¼¥ó£É£Ä(¸½ºß) // ¡¡nSceneIdOld : ¥·¡¼¥ó£É£Ä(²áµî) // Ìá¤êÃÍ // ¡¡¤Ê¤· #deffunc ProcessBegin int nSceneIdNow, int nSceneIdOld // ¤«¤´²èÁü¾ðÊó¤Î½é´ü²½¤ò¹Ô¤¦ g_clsBasket_hWindowId = WINDOW_ID_BASKET g_clsBasket_nDivId = 0 g_clsBasket_nLeft = 0 g_clsBasket_nTop = 400 g_clsBasket_nWidth = BASKET_WIDTH g_clsBasket_nHeight = BASKET_HEIGHT // ¤ê¤ó¤´²èÁü¾ðÊó¤Î½é´ü²½¤ò¹Ô¤¦ for i, 0, APPLE_SIZE, 1 g_clsApple_hWindowId(i) = WINDOW_ID_APPLE g_clsApple_nDivId(i) = 0 g_clsApple_nLeft(i) = 0 g_clsApple_nTop(i) = 0 g_clsApple_nWidth(i) = APPLE_WIDTH g_clsApple_nHeigth(i) = APPLE_HEIGHT g_clsApple_nDisplay(i) = 0 next // ²èÁü¥Õ¥¡¥¤¥ë¤ò¥í¡¼¥É¤·¡¢²¾ÁÛ²èÌÌ(¥Ð¥Ã¥Õ¥¡)¤ò½é´ü²½¤¹¤ë celload FILE_NAME_BASKET, WINDOW_ID_BASKET, 0 celload FILE_NAME_APPLE, WINDOW_ID_APPLE, 0 return // ¥á¥¤¥ó½èÍý¤ò¹Ô¤¦ // °ú¿ô // ¡¡nSceneIdNow : ¥·¡¼¥ó£É£Ä(¸½ºß) // ¡¡nSceneIdOld : ¥·¡¼¥ó£É£Ä(²áµî) // ¥í¡¼¥«¥ëÊÑ¿ô // ¡¡nSceneIdNew : ¥·¡¼¥ó£É£Ä(̤Íè) // ¡¡nHitFlag : Åö¤¿¤ê¥Õ¥é¥° // Ìá¤êÃÍ // ¡¡¥·¡¼¥ó£É£Ä(̤Íè) #defcfunc ProcessMain int nSceneIdNow, int nSceneIdOld, local nSceneIdNew, local nHitFlag // ¥·¡¼¥ó£É£Ä(̤Íè)¤Ë¥·¡¼¥ó£É£Ä(¸½ºß)¤òÂåÆþ¤¹¤ë nSceneIdNew = nSceneIdNow // ¤ê¤ó¤´¤ÎÉÁ²è´Ö³Ö¥«¥¦¥ó¥È¤ò¥«¥¦¥ó¥È¥¢¥Ã¥×¤¹¤ë g_nAppleCount@++ // ¥«¡¼¥½¥ë¥­¡¼¤Îº¸(¢«)¤ÎÆþÎϾõÂÖ¤ò¼èÆÀ¤¹¤ë getkey g_nArrowLeft, 37 // ¥«¡¼¥½¥ë¥­¡¼¤Îº¸(¢«)¤¬²¡²¼¤µ¤ì¤Æ¤¤¤ë¾ì¹ç // if(g_nKeyData@ & KEY_ARROW_LEFT) { if(g_nArrowLeft) { // ¤«¤´¤Î£ØºÂɸ¤¬£°Ì¤Ëþ(¥¦¥£¥ó¥É¥¦¤Îº¸Ã¼)¤Î¾ì¹ç if(g_clsBasket_nLeft <= 0) { g_clsBasket_nLeft = 0 // ¤«¤´¤Î£ØºÂɸ¤¬£°°Ê¾å¤Î¾ì¹ç } else { // ¤«¤´¤Î£ØºÂɸ¤«¤é¤«¤´¤Î°ÜÆ°Î̤ò¸º»»¤¹¤ë g_clsBasket_nLeft = g_clsBasket_nLeft - BASKET_MOVE_X } } // ¥«¡¼¥½¥ë¥­¡¼¤Î±¦(¢ª)¤ÎÆþÎϾõÂÖ¤ò¼èÆÀ¤¹¤ë getkey g_nArrowRight, 39 // ¥«¡¼¥½¥ë¥­¡¼¤Î±¦(¢ª)¤¬²¡²¼¤µ¤ì¤Æ¤¤¤ë¾ì¹ç // if(g_nKeyData@ & KEY_ARROW_RIGHT) { if(g_nArrowRight) { // ¤«¤´¤Î£ØºÂɸ¡Ü¤«¤´¤ÎÉý¤¬£¶£´£°°Ê¾å(¥¦¥£¥ó¥É¥¦¤Î±¦Ã¼)¤Î¾ì¹ç if(g_clsBasket_nLeft + g_clsBasket_nWidth >= 640) { g_clsBasket_nLeft = 640 - g_clsBasket_nWidth // ¤«¤´¤Î£ØºÂɸ¡Ü¤«¤´¤ÎÉý¤¬£¶£´£°Ì¤Ëþ¤Î¾ì¹ç } else { // ¤«¤´¤Î£ØºÂɸ¤Ë¤«¤´¤Î°ÜÆ°Î̤ò²Ã»»¤¹¤ë g_clsBasket_nLeft = g_clsBasket_nLeft + BASKET_MOVE_X } } // ¤ê¤ó¤´¤Î°ÜÆ°¡¦ÉÁ²è½èÍý¤ò¹Ô¤¦ for i, 0, APPLE_SIZE, 1 // ¤ê¤ó¤´¤¬ÉÁ²è¤µ¤ì¤Æ¤¤¤ë¾ì¹ç if(g_clsApple_nDisplay(i)) { // ¤ê¤ó¤´¤Î£ÙºÂɸ¤Ë¤ê¤ó¤´¤Î°ÜÆ°ÎÌ(£ÙºÂɸ)¤ò²Ã»»¤¹¤ë g_clsApple_nTop(i) = g_clsApple_nTop(i) + APPLE_MOVE_Y // ¤ê¤ó¤´¤Î£ÙºÂɸ¤¬£´£¸£°°Ê¾å(¥¦¥£¥ó¥É¥¦¤Î²¼Ã¼)¤Î¾ì¹ç if(g_clsApple_nTop(i) >= 480) { // ¤ê¤ó¤´¤òÈóɽ¼¨¤Ë¤¹¤ë g_clsApple_nDisplay(i) = 0 // Ê̲è²èÌ̤ËÁ«°Ü¤¹¤ë(º£²ó¤Ï¡¢£È£Ó£Ð¤ò½ªÎ»¤¹¤ë) nSceneIdNew = ENUM_SCENE_ID_LIMIT // ¥ë¡¼¥×¤òÈ´¤±¤ë _break } // ¤«¤´¤È¤ê¤ó¤´¤¬ÀÜ¿¨¤·¤Æ¤¤¤ë¤«¥Á¥§¥Ã¥¯¤¹¤ë nHitFlag = IsHit(g_nArrayBasket@, g_nArrayApple@, i) // ¤«¤´¤È¤ê¤ó¤´¤¬ÀÜ¿¨¤·¤Æ¤¤¤ë¾ì¹ç if(nHitFlag) { // ¤ê¤ó¤´¤òÈóɽ¼¨¤Ë¤¹¤ë g_clsApple_nDisplay(i) = 0 // ¤«¤´¤È¤ê¤ó¤´¤¬ÀÜ¿¨¤·¤Æ¤¤¤Ê¤¤¾ì¹ç } else { // ¤«¤´¤ÎÉÁ²è°ÌÃÖ¤òÀßÄꤹ¤ë pos g_clsApple_nLeft(i), g_clsApple_nTop(i) // ¤ê¤ó¤´¤òÉÁ²è¤¹¤ë celput g_clsApple_hWindowId(i), g_clsApple_nDivId(i), 1.0, 1.0, 0.0 } // ¤ê¤ó¤´¤¬ÉÁ²è¤µ¤ì¤Æ¤¤¤Ê¤¤¾ì¹ç } else { // ¤ê¤ó¤´¤ÎÉÁ²è´Ö³Ö¤Î¥«¥¦¥ó¥È¤¬¤ê¤ó¤´¤ÎÉÁ²è´Ö³Ö°Ê¾å¤Î¾ì¹ç if(g_nAppleCount@ >= APPLE_WAIT) { // ¤ê¤ó¤´¤ÎÉÁ²è°ÌÃÖ¤ò½é´ü²½¤¹¤ë g_clsApple_nLeft(i) = rnd(640 - APPLE_WIDTH) g_clsApple_nTop(i) = 0 g_clsApple_nDisplay(i) = 1 // ¤ê¤ó¤´¤ÎÉÁ²è´Ö³Ö¤Î¥«¥¦¥ó¥È¤ò£°¤Ç¥¯¥ê¥¢¤¹¤ë g_nAppleCount@ = 0 } } next // ¤«¤´¤ÎÉÁ²è°ÌÃÖ¤òÀßÄꤹ¤ë pos g_clsBasket_nLeft, g_clsBasket_nTop // ¤«¤´¤òÉÁ²è¤¹¤ë celput g_clsBasket_hWindowId, g_clsBasket_nDivId, 1.0, 1.0, 0.0 return nSceneIdNew // ½ªÎ»½èÍý¤ò¹Ô¤¦ // °ú¿ô // ¡¡nSceneIdNow : ¥·¡¼¥ó£É£Ä(¸½ºß) // ¡¡nSceneIdOld : ¥·¡¼¥ó£É£Ä(²áµî) // Ìá¤êÃÍ // ¡¡¤Ê¤· #deffunc ProcessEnd int nSceneIdNow, int nSceneIdOld return // module SampleModule #global //==================== £È£Ó£Ð¥¹¥¯¥ê¥×¥È¤Î¼ÂÁõ ====================// // £È£Ó£Ð¤Î¥¨¥ó¥È¥ê¡¼¥Ý¥¤¥ó¥È // °ú¿ô // ¡¡¤Ê¤· // Ìá¤êÃÍ // ¡¡¤Ê¤· *HspMain // ¥¦¥£¥ó¥É¥¦¤ò½é´ü²½¤¹¤ë // screen 0, 640, 480, 0 // ²èÌ̤ò¥¯¥ê¥¢¤¹¤ë(¹õ) cls 4 // ¥²¡¼¥à¥ë¡¼¥× // ¥×¥í¥»¥¹£É£Ä¤¬¥×¥í¥»¥¹£É£Ä(¸Â³¦ÃÍ)°Ê¾å¤Ë¤Ê¤ë¤Þ¤Ç¥ë¡¼¥×¤¹¤ë do // £È£Ó£Ð¤Î¼Â¹Ô¤ò°ìÄê»þ´ÖÃæÃǤ¹¤ë wait WAIT_TIME // ²èÌ̤ò¥¯¥ê¥¢¤¹¤ë(¹õ) cls 4 // ¥­¡¼ÆþÎϾðÊó¤ò¼èÆÀ¤¹¤ë stick g_nKeyData, 0, 0 // Esc¥­¡¼¤¬²¡²¼¤µ¤ì¤¿¾ì¹ç if(g_nKeyData & KEY_ESC) { // ½ªÎ»½èÍý¤ËÁ«°Ü¤¹¤ë g_nProcessId = ENUM_PROCESS_ID_END // £È£Ó£Ð¤ò½ªÎ»¤¹¤ë g_nProcessId = ENUM_PROCESS_ID_LIMIT } // ¥×¥í¥»¥¹£É£Ä¤ËÂбþ¤·¤¿½èÍý¤ò¹Ô¤¦ switch g_nProcessId // ½é´ü½èÍý¤Î¾ì¹ç case ENUM_PROCESS_ID_BEGIN // ½é´ü½èÍý¤ò¹Ô¤¦ ProcessBegin g_nSceneIdNow, g_nSceneIdOld // ¥á¥¤¥ó½èÍý¤ËÁ«°Ü¤¹¤ë g_nProcessId = ENUM_PROCESS_ID_MAIN swbreak // ¥á¥¤¥ó½èÍý¤Î¾ì¹ç case ENUM_PROCESS_ID_MAIN // ¥á¥¤¥ó½èÍý¤ò¹Ô¤¦ g_nSceneIdNew = ProcessMain(g_nSceneIdNow, g_nSceneIdOld) // ¥·¡¼¥ó£É£Ä(¸½ºß)¤È¥·¡¼¥ó£É£Ä(̤Íè)¤¬°Û¤Ê¤ë¾ì¹ç if(g_nSceneIdNow != g_nSceneIdNew) { // ¥·¡¼¥ó£É£Ä(²áµî)¤Ë¥·¡¼¥ó£É£Ä(¸½ºß)¤òÂåÆþ¤¹¤ë g_nSceneIdOld = g_nSceneIdNow // ¥·¡¼¥ó£É£Ä(¸½ºß)¤Ë¥·¡¼¥ó£É£Ä(̤Íè)¤òÂåÆþ¤¹¤ë g_nSceneIdNow = g_nSceneIdNew // ½ªÎ»½èÍý¤ËÁ«°Ü¤¹¤ë g_nProcessId = ENUM_PROCESS_ID_END } swbreak // ½ªÎ»½èÍý¤Î¾ì¹ç case ENUM_PROCESS_ID_END // ½ªÎ»½èÍý¤ò¹Ô¤¦ ProcessEnd g_nSceneIdNow, g_nSceneIdOld // ¥·¡¼¥ó£É£Ä(̤Íè)¤¬¥·¡¼¥ó£É£Ä(¸Â³¦ÃÍ)¤Î¾ì¹ç if(g_nSceneIdNew == ENUM_SCENE_ID_LIMIT) { // £È£Ó£Ð¤ò½ªÎ»¤¹¤ë g_nProcessId = ENUM_PROCESS_ID_LIMIT } swbreak // ¾åµ­°Ê³°¤Î¾ì¹ç default swbreak swend until g_nProcessId >= ENUM_PROCESS_ID_LIMIT // £È£Ó£Ð¤ò½ªÎ»¤¹¤ë end stop



ONION software Copyright 1997-2023(c) All rights reserved.