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


HSPTV!·Ç¼¨ÈÄ


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

2020
0916
¤Ê¤Þ¤³´Ë¤ä¤«¤ËÄÉÈø22²ò·è


¤Ê¤Þ¤³

¥ê¥ó¥¯

2020/9/16(Wed) 01:53:24|NO.91376

¥×¥í¥°¥é¥ß¥ó¥°¤ò»Ï¤á¤¿¤Ð¤«¤ê¤Î¼Ô¤Ç¤¹¡£
¾å²¼º¸±¦¤Î¥­¡¼¤ÇÁàºî¤Ç¤­¤ë¼«µ¡¤ËÂФ·¤ÆŨ¤Ï¼«µ¡¤¬¶á¤¯¤Ë¤¤¤ë¤È¤­¤ËÄÉÈø¤·¡¢±ó¤¯¤Ë¼«µ¡¤¬¤¤¤ë¾ì¹ç¤ÏŬÅö¤Ë²èÌÌÆâ¤Ç°ÜÆ°¤¹¤ë¥×¥í¥°¥é¥à¤¬ÃΤꤿ¤¤¤Ç¤¹¡£
¤¼¤Ò½õ¤±¤Æ¤Û¤·¤¤¤Ç¤¹¡£¤è¤í¤·¤¯¤ª´ê¤¤¤·¤Þ¤¹¡£



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


GENKI

¥ê¥ó¥¯

2020/9/16(Wed) 22:12:26|NO.91382

¤Þ¤º¤Ï¤ä¤ê¤¿¤¤¤³¤È¤òʬ²ò¤·¤Æ¤ß¤Þ¤·¤ç¤¦¡£¤É¤³¤Þ¤Ç½ÐÍè¤Æ¤¤¤Æ¡¢¤É¤³¤¬½ÐÍè¤Æ¤¤¤Ê¤¤¤Î¤«¡¢¤É¤³¤¬¤ï¤«¤é¤Ê¤¤¤Î¤«¤¬¸«¤¨¤Ê¤¤¤ÈÀè¤Ë¿Ê¤á¤Þ¤»¤ó¡£

> ¾å²¼º¸±¦¤Î¥­¡¼¤ÇÁàºî¤Ç¤­¤ë¼«µ¡¤ËÂФ·¤Æ
¤³¤³¤Þ¤Ç¤Ï½ÐÍè¤Æ¤¤¤ë¤È¹Í¤¨¤Æ¤¤¤¤¤Ç¤·¤ç¤¦¤«¡£

> Ũ¤Ï¼«µ¡¤¬¶á¤¯¤Ë¤¤¤ë¤È¤­¤ËÄÉÈø¤·¡¢±ó¤¯¤Ë¼«µ¡¤¬¤¤¤ë¾ì¹ç¤Ï
¤ª¤½¤é¤¯¤³¤³¤¬¡¢¤³¤Î¼ÁÌä¤Çʹ¤­¤¿¤¤¥Ý¥¤¥ó¥È¤Ê¤Î¤À¤È»×¤¤¤Þ¤¹¡£

> ŬÅö¤Ë²èÌÌÆâ¤Ç°ÜÆ°¤¹¤ë
¤³¤ÎÆ°ºî¤Ï¤Ç¤­¤Æ¤¤¤Þ¤¹¤«¡©

¤È¡¢¤¤¤¦¤è¤¦¤ËÍý²ò¤·¤¿¤Î¤Ç¤¹¤¬¡¢¤¢¤Ã¤Æ¤¤¤Þ¤¹¤«¡©


²óÅúÂԤĤΤâ¤Ê¤ó¤Ê¤Î¤ÇͽÁۤDzóÅú¤ò³¤±¤Þ¤¹¡£

> Ũ¤Ï¼«µ¡¤¬¶á¤¯¤Ë¤¤¤ë¤È¤­¤ËÄÉÈø¤·¡¢±ó¤¯¤Ë¼«µ¡¤¬¤¤¤ë¾ì¹ç¤Ï
¤µ¤é¤Ë¤³¤ì¤òʬ²ò¤·¤Þ¤¹¡£

> Ũ¤Ï¼«µ¡¤¬¶á¤¯¤Ë¤¤¤ë¤È¤­¡Ä±ó¤¯¤Ë¼«µ¡¤¬¤¤¤ë¾ì¹ç
Ũ¤È¼«µ¡¤Îµ÷Î¥¤òÄ´¤Ù¤Æ¡¢µ÷Î¥¤Ë±þ¤¸¤ÆŨ¤ÎÆ°ºî¤òÀÚ¤êÂؤ¨¤ì¤Ð¤è¤µ¤½¤¦¤Ç¤¹¡£

> ÄÉÈø¤·
¥²¡¼¥à¥¸¥ã¥ó¥ë¤äŨ¥­¥ã¥é¤ÎÆÃħ¤Å¤±Åù¤Ë¤è¤Ã¤Æ¤É¤Î¥¢¥ë¥´¥ê¥º¥à¤òºÎÍѤ¹¤ë¤«¤ÏÊѤï¤Ã¤ÆÍè¤Þ¤¹¡£
¤·¤«¤·¤³¤³¤Ï¤È¤ê¤¢¤¨¤º¼ê·Ú¤Ê¥¢¥ë¥´¥ê¥º¥à¤ò°ì¤Ä¡ÄŨ¤¬¿Ê¤àÊý¸þ¤ò¾ï¤Ë¼«µ¡Êý¸þ¤Ë»ØÄꤹ¤ë¤È¡¢¼«µ¡¤òÄɤ¤¤«¤±¤ëÆ°ºî¤Ë¤Ê¤ê¤Þ¤¹¡£



¤Ê¤Þ¤³

¥ê¥ó¥¯

2020/9/17(Thu) 00:54:06|NO.91384

GENKI¤µ¤ó

²óÅú¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡ª

> ¾å²¼º¸±¦¤Î¥­¡¼¤ÇÁàºî¤Ç¤­¤ë¼«µ¡¤ËÂФ·¤Æ
¾å²¼º¸±¦¤Î¼«µ¡Áàºî¤Ï¤Ç¤­¤Þ¤¹¡£

> Ũ¤Ï¼«µ¡¤¬¶á¤¯¤Ë¤¤¤ë¤È¤­¤ËÄÉÈø¤·¡¢±ó¤¯¤Ë¼«µ¡¤¬¤¤¤ë¾ì¹ç¤Ï
¼«µ¡¤¬¶á¤¯¤Ë¤¤¤¿¤éÄÉÈø¤¹¤ë¥×¥í¥°¥é¥à¤¬ÃΤꤿ¤¤¤Ç¤¹¡£

> ŬÅö¤Ë²èÌÌÆâ¤Ç°ÜÆ°¤¹¤ë
ŬÅö¤Ë²èÌÌÆâ¤Ç°ÜÆ°¤¹¤ë¥×¥í¥°¥é¥à¤Ï¤Ç¤­¤Æ¤¤¤Þ¤»¤ó¡£


ͽÁۤβóÅú¤â¤·¤Æ¤¤¤¿¤À¤­¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£
¤É¤Î¤è¤¦¤Ê¥×¥í¥°¥é¥à¤Ç¼«µ¡¤¬¶á¤¯¤Ë¤¤¤ë¤È¤­¤ËÄÉÈø¤·¡¢±ó¤¯¤Ë¼«µ¡¤¬¤¤¤ë¾ì¹ç¤ÏŬÅö¤Ë²èÌÌÆâ¤Ç°ÜÆ°¤¹¤ë¤Î¤«¶µ¤¨¤Æ¤¤¤¿¤À¤­¤¿¤¤¤Ç¤¹¡£
ʬ¤«¤é¤Ê¤¤¤³¤È¤¬Â¿¤¯¡¢¿½¤·Ìõ¤¢¤ê¤Þ¤»¤ó¡£¤è¤í¤·¤¯¤ª´ê¤¤¤·¤Þ¤¹¡£



GENKI

¥ê¥ó¥¯

2020/9/18(Fri) 23:41:15|NO.91396

> > ŬÅö¤Ë²èÌÌÆâ¤Ç°ÜÆ°¤¹¤ë
> ŬÅö¤Ë²èÌÌÆâ¤Ç°ÜÆ°¤¹¤ë¥×¥í¥°¥é¥à¤Ï¤Ç¤­¤Æ¤¤¤Þ¤»¤ó¡£

¡ÖŬÅö¡×¤Ã¤Æ¤¢¤ë°ÕÌ£Æñ¤·¤¤¤ó¤Ç¤¹¤è¤Í¡Ä¡£
¤Þ¤º¤Ï°ÜÆ°ÊýË¡¤Ç¤¹¤¬¡¢ÄÉÈø¤Ë¤âÍøÍѤǤ­¤ë°ÜÆ°ÊýË¡¤¬¤¤¤¤¤È»×¤¤¤Þ¤¹¡£¤Ä¤Þ¤êÊý¸þ¤È®ÅÙ¤òÍ¿¤¨¤Æ°ÜÆ°¤µ¤»¤ëÊýË¡¤Ç¤¹¡£
Êý¸þ¤ò¼«µ¡¤È¤Ï´Ø·¸¤Ê¤¯¡ÖŬÅö¡×¤Ë·è¤á¤Æ¤¢¤²¤ì¤Ð·ë²ÌŪ¤ËŬÅö¤ËÆ°¤­¤Þ¤¹¡£¡ÖŬÅö¡×¤Î¥ë¡¼¥ëÉÕ¤±¤ò¤É¤¦¤¹¤ë¤«¤Ï¤ª¹¥¤ß¤Ç¤Ç¤¹¤Í¡£


> ¼«µ¡¤¬¶á¤¯¤Ë¤¤¤¿¤éÄÉÈø¤¹¤ë¥×¥í¥°¥é¥à¤¬ÃΤꤿ¤¤¤Ç¤¹¡£

NO.91382 ¤Ç²óÅúºÑ¤ß¤Ç¤¹¡£¡Ä¤È¸À¤Ã¤Æ¤â²óÅú¤Ç¤Ïʬ¤«¤é¤Ê¤«¤Ã¤¿¤«¤éºÆÅ٤μÁÌä¤Ê¤ó¤Ç¤¹¤è¤Í¡£
²óÅú¤ÎÃæ¤Ç¤É¤³¤¬Ê¬¤«¤é¤Ê¤«¤Ã¤¿¤Î¤«¡¢¶µ¤¨¤Æ¤¤¤¿¤À¤±¤ì¤Ð»ä¤â¤ï¤«¤ê¤Þ¤»¤ó¡£¶ñÂÎŪ¤Ë¤É¤³¤¬¤ï¤«¤é¤Ê¤¤¤È¶µ¤¨¤Æ¤¤¤¿¤À¤±¤ì¤Ð²óÅú¤Î¤ä¤ê¤è¤¦¤¬¤¢¤ë¤Î¤Ç¤¹¤¬¡£
µ÷Î¥¤òÄ´¤Ù¤ëÊýË¡¤Ç¤¹¤«¡©»ØÄê¤ÎÊý¸þ¤ËÆ°¤«¤¹ÊýË¡¤Ç¤¹¤«¡©Å¨¤ò°ÜÆ°¤¹¤ëÊýË¡¤Ç¤¹¤«¡©¤¦¡¼¤ó¡¢Â¾¤Ë¤Ê¤Ë¤¬¤¢¤ë¤«¤Ê¡Ä¡©



¤Ê¤Þ¤³

¥ê¥ó¥¯

2020/9/19(Sat) 23:43:11|NO.91403

GENKI¤µ¤ó
²óÅú¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡ª

ÀâÌÀÉÔ­¤Çʬ¤«¤ê¤Å¤é¤¯ËÜÅö¤Ë¿½¤·Ìõ¤¢¤ê¤Þ¤»¤ó¡Ä
²óÅú¤·¤Æ¤¤¤¿¤À¤¤¤Æ¤È¤Æ¤â¤¢¤ê¤¬¤¿¤¤¤Ç¤¹¡Ä¡£


¡ä¡ÖŬÅö¡×¤Ã¤Æ¤¢¤ë°ÕÌ£Æñ¤·¤¤¤ó¤Ç¤¹¤è¤Í¡Ä¡£
¡ÖŬÅö¡×¤À¤È³Î¤«¤ËÆñ¤·¤¤¤Ç¤¹¤è¤Í¡Ä¡£¡ÖŬÅö¡×¤È¤¤¤¦¤Î¤ÏÄûÀµ¤·¤Æ¡¢¼«µ¡¤¬¶á¤¯¤Ë¤¤¤Ê¤¤¾ì¹ç¤½¤Î¾ì¤Ëµï³¤±¡¢¶á¤¯¤Ë¼«µ¡¤¬¤¤¤¿¾ì¹çÄÉÈø¤·Î¥¤ì¤¿¤é°ÜÆ°¤·¤¿¾ì½ê¤Ëµï³¤±¤ë¤È¤¤¤¦¥×¥í¥°¥é¥à¤òºî¤ë¤³¤È¤Ï²Äǽ¤Ç¤·¤ç¤¦¤«¡©¤â¤·²Äǽ¤Ç¤¢¤ì¤Ð¤É¤Î¤è¤¦¤Ê¼°¤ò½ñ¤±¤Ðºî¤ì¤ë¤Î¤«¶µ¤¨¤Æ¤¤¤¿¤À¤­¤¿¤¤¤Ç¤¹¡£
²¼µ­¤Î¥×¥í¥°¥é¥à¤ÏŨ¤¬¼«µ¡¤ò¤º¤Ã¤ÈÄÉÈø¤¹¤ë¤â¤Î¤Ç¤¹¡£¼«Ê¬¤Ç²èÁü¤òÊݸ¤·¤Æɽ¼¨¤·¤Æ¤¤¤¿¤â¤Î¤ò²èÁü¤òÊݸ¤·¤Ê¤¯¤Æ¤¤¤¤¤è¤¦¤Ëʸ»ú¡Ê¼«¤äŨ¡Ë¤ËÃÖ¤­´¹¤¨¤¿¤Î¤Ç¤¹¤¬¡¢ÃÖ¤­´¹¤¨¤Î½ñ¤­Êý¤¬¤ï¤«¤é¤º¼Â¹Ô¤¬¤Ç¤­¤Æ¤¤¤Þ¤»¤ó¡£¤¹¤ß¤Þ¤»¤ó¡Ä¡£°ì±þ¤³¤Î¤è¤¦¤Ê·Á¤ÇÄÉÈø¤Î¥×¥í¥°¥é¥à¤ò½ñ¤¤¤Æ¤¤¤Þ¤¹¡Ä¡£¤³¤Î¼°¤ò¤É¤Î¤è¤¦¤Ëľ¤»¤Ð¼«µ¡¤¬¶á¤¯¤Ë¤¤¤ë¤È¤­¤ËÄÉÈø¤¹¤ëŨ¤¬¤Ç¤­¤Þ¤¹¤Ç¤·¤ç¤¦¤«¡£


¡äNO.91382 ¤Ç²óÅúºÑ¤ß¤Ç¤¹¡£¡Ä
Íý²ò¤¬Â­¤é¤ºËÜÅö¤Ë¿½¤·Ìõ¤Ê¤¤¤Ç¤¹¡Ä¡£µ÷Î¥¤òÄ´¤Ù¤ëÊýË¡¡¦»ØÄê¤ÎÊý¸þ¤ËÆ°¤«¤¹ÊýË¡¡¦Å¨¤ò°ÜÆ°¤¹¤ëÊýË¡¤¬¤ï¤«¤é¤Ê¤¤¤¿¤á¶µ¤¨¤Æ¤¤¤¿¤À¤­¤¿¤¤¤Ç¤¹¡£
¤è¤í¤·¤¯¤ª´ê¤¤¤¤¤¿¤·¤Þ¤¹¡£


title "Äɤ¤¤«¤±¤ë"
wx=800:wy=600 ; ²èÌÌ¥µ¥¤¥º
screen 0,wx,wy
color 0,200,100:boxf 0,0,800,800


*game1
mx=400:my=300 ; ¥×¥ì¥¤¥ä¡¼¤ÎºÂɸ
msp=4 ; ¥×¥ì¥¤¥ä¡¼¤Î°ÜÆ°¥¹¥Ô¡¼¥É
ms=22 ; ±ß¤Î¥µ¥¤¥º
ex=50:ey=50 ; ¼Ø1¤ÎºÂɸ
frame=0


;¼«µ¡
stick key,%11111 ; ¥­¡¼ÆþÎÏ
;limit p1,p2,p3(°ìÄêÈÏ°ÏÆâ¤ÎÀ°¿ô¤òÊÖ¤¹) ÂоݤȤʤëÃÍ,ºÇ¾®ÃÍ¡¤ºÇÂçÃÍ
if key&1 : mx=limit( mx-msp, 0, wx ) ; º¸°ÜÆ°
if key&4 : mx=limit( mx+msp, 0, wx ) ; ±¦°ÜÆ°
if key&2 : my=limit( my-msp, 0, wy ) ; ¾å°ÜÆ°
if key&8 : my=limit( my+msp, 0, wy ) ; ²¼°ÜÆ°
repeat
pos mx-ms,my-ms mes "¼«"
loop




;Ũ
dist=abs(ex-mx)+abs(ey-my) ; Ũ¤È¤Îµ÷Î¥¤ò´Ê°×Ū¤Ëµá¤á¤ë
if dist<(ms*2) : goto *gameover ; ¾×Æͤ·¤Æ¤¤¤¿¤é*gameover¤Ø

ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹
ey=alien(ey,my) ; YºÂɸ¤òÆ°¤«¤¹


redraw 0 ; ²èÌ̹¹¿·³«»Ï
color 0,200,100:boxf 0,0,800,800


;Ũ
repeat
pos ex-ms,ey-ms ;50-22,50-22
pos 0,0 mes "Ũ"
loop


redraw 1 ; ²èÌ̹¹¿·½ª¤ï¤ê
await 1000/60 ; 1/60ÉäDzèÌ̤ò¹¹¿·
frame++ ; ¥Õ¥ì¡¼¥à¤ò¿Ê¤á¤ë
goto *game1 ; ·«¤êÊÖ¤¹


*gameover
; ¤Ä¤«¤Þ¤Ã¤¿»þ¤Î½èÍý
font msgothic,120
color 0,0,65:pos 50,50
mes "¤Ä¤«¤Þ¤¨¤¿¡ª"
stop



GENKI

¥ê¥ó¥¯

2020/9/20(Sun) 16:39:41|NO.91406

¤È¤ê¤¢¤¨¤ºÆ°¤¯¤è¤¦¤Ë¤·¤Æ¤ß¤¿¡£
ÄÉÈøµ¡Ç½¤Ï¤¢¤ê¤Þ¤»¤ó¡£

title "Äɤ¤¤«¤±¤ë" wx=800:wy=600 ; ²èÌÌ¥µ¥¤¥º screen 0,wx,wy color 0,200,100:boxf 0,0,800,800 mx=400:my=300 ; ¥×¥ì¥¤¥ä¡¼¤ÎºÂɸ msp=4 ; ¥×¥ì¥¤¥ä¡¼¤Î°ÜÆ°¥¹¥Ô¡¼¥É ms=22 ; ±ß¤Î¥µ¥¤¥º ex=50:ey=50 ; ¼Ø1¤ÎºÂɸ frame=0 *game1 redraw 0 ; ²èÌ̹¹¿·³«»Ï color 0,200,100:boxf 0,0,800,800 ;¼«µ¡ stick key,%11111 ; ¥­¡¼ÆþÎÏ ;limit p1,p2,p3(°ìÄêÈÏ°ÏÆâ¤ÎÀ°¿ô¤òÊÖ¤¹) ÂоݤȤʤëÃÍ,ºÇ¾®ÃÍ¡¤ºÇÂçÃÍ if key&1 : mx=limit( mx-msp, 0, wx ) ; º¸°ÜÆ° if key&4 : mx=limit( mx+msp, 0, wx ) ; ±¦°ÜÆ° if key&2 : my=limit( my-msp, 0, wy ) ; ¾å°ÜÆ° if key&8 : my=limit( my+msp, 0, wy ) ; ²¼°ÜÆ° pos mx-ms,my-ms color mes "¼«" ;Ũ dist=abs(ex-mx)+abs(ey-my) ; Ũ¤È¤Îµ÷Î¥¤ò´Ê°×Ū¤Ëµá¤á¤ë if dist<(ms*2) : goto *gameover ; ¾×Æͤ·¤Æ¤¤¤¿¤é*gameover¤Ø ;ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹ ;ey=alien(ey,my) ; YºÂɸ¤òÆ°¤«¤¹ ;Ũ ;pos ex-ms,ey-ms ;50-22,50-22 pos ex, ey color mes "Ũ" redraw 1 ; ²èÌ̹¹¿·½ª¤ï¤ê await 1000/60 ; 1/60ÉäDzèÌ̤ò¹¹¿· frame++ ; ¥Õ¥ì¡¼¥à¤ò¿Ê¤á¤ë goto *game1 ; ·«¤êÊÖ¤¹ *gameover ; ¤Ä¤«¤Þ¤Ã¤¿»þ¤Î½èÍý font msgothic,120 color 0,0,65:pos 50,50 mes "¤Ä¤«¤Þ¤¨¤¿¡ª" redraw 1 stop
ÄÉÈø¤Ë¤Ä¤¤¤Æ¤Ï¸å¤Ç½ñ¤­¤Þ¤¹¤¬¡¢¤Þ¤º¤Ï¸«Èæ¤Ù¤Æ¤ß¤Æ²¿¤¬ÌäÂê¤ÇÆ°¤«¤Ê¤«¤Ã¤¿¤Î¤«¤ò³Îǧ¤·¤Æ¤â¤é¤¨¤ì¤Ð¤È¡£



GENKI

¥ê¥ó¥¯

2020/9/20(Sun) 17:28:39|NO.91407

¥¹¥¯¥ê¥×¥È¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£
¤Ê¤ë¤Û¤É¡¢¥¹¥¯¥ê¥×¥È¤ò¸«¤»¤Æ¤â¤é¤Ã¤¿¤ª¤«¤²¤Ç¸½¾õ¤¬Ê¬¤«¤Ã¤¿µ¤¤¬¤·¤Þ¤¹¡£


> µ÷Î¥¤òÄ´¤Ù¤ëÊýË¡
dist = sqrt( (ex-mx) * (ex-mx) + (ey-my) * (ey-my) ) ; Ũ¤È¼«µ¡¤È¤Îµ÷Î¥
µ÷Î¥¤òµá¤á¤ë¾ì¹ç¡¢¡Ö»°Ê¿Êý¤ÎÄêÍý¡×¤ò»ÈÍѤ·¤Þ¤¹¡£Ã棳¿ô³Ø¤ÎÈϰϤˤʤê¤Þ¤¹¡£

¤Ä¤¤¤Ç¤Ë¸À¤¦¤È¡¢¾×ÆÍȽÄê¤Î¤·¤­¤¤ÃͤȤ·¤Æ»ÈÍѤ·¤Æ¤¤¤ëms¤Ï¤³¤¦¤¤¤¦¤Õ¤¦¤Ë»È¤¤¤Þ¤¹¡£
if dist<ms : goto *gameover ; ms¤Ï¾×ÆÍȽÄê±ß¤ÎȾ·Â
¡Ö¥µ¥¤¥º¡×¤È½ñ¤¯¤Èľ·Â¤Ê¤Î¤«È¾·Â¤Ê¤Î¤«¤ï¤«¤ê¤Ë¤¯¤¤¤Î¤ÇÌÀ³Î¤Ë¤·¤¿¤Û¤¦¤¬¤¤¤¤¤Ç¤·¤ç¤¦¡£


> Ũ¤ò°ÜÆ°¤¹¤ëÊýË¡
¼«µ¡¤òÆ°¤«¤¹¤È¤­¤ÈƱ¤¸¤Ç¡¢¸½ºßºÂɸ¤ËÂФ·¤Æ°ÜÆ°¤·¤¿¤¤Êý¸þ¤Ëµ÷Î¥¤ò­¤·¤Æ¤¢¤²¤ì¤Ð°ÜÆ°¤Ç¤­¤Þ¤¹¡£
ÌäÂê¤Ï¤É¤ÎÊý¸þ¡ÊX¤ÈY¡Ë¤Ë¤É¤Î¤¯¤é¤¤Â­¤»¤Ð¤¤¤¤¤«¡¢¤Ê¤Î¤Ç


> »ØÄê¤ÎÊý¸þ¤ËÆ°¤«¤¹ÊýË¡
¥Ù¥¯¥È¥ë¤ò½¬¤Ã¤Æ¤¤¤ë¤È´Êñ¤Ê¤ó¤Ç¤¹¤¬¡¢Ãæ³Ø¤ÎÍý²Ê¤È¹â¹»£²Ç¯¡Ê¿ô³Ø£Â¡Ë¤ÎÈϰϤǤ¹¡£
½¬¤Ã¤Æ¤Æ¤â¤è¤¯¤ï¤«¤é¤ó¤È¤¤¤¦¿Í¤â¤¤¤Þ¤¹¡£Âç¾æÉס£


; ÄÉÈø ex = ex + double(mx - ex) / dist * msp ey = ey + double(my - ey) / dist * msp pos ex, ey color mes "Ũ"
¤³¤ì¡Ömx - ex¡×¤¬Êý¸þ¤Ç¤¢¤êŨ¤«¤é¼«µ¡¤Þ¤Ç¤ÎXÊý¸þ¤Îµ÷Î¥¡£
Á´ÂΤε÷Î¥¤Ç³ä¤Ã¤Æ°ÜÆ°¤·¤¿¤¤µ÷Î¥¤ò¤«¤±¤ë¡Ömsp / dist¡×¤³¤È¤ÇxÊý¸þ¤Î°ÜÆ°µ÷Î¥¤¬½Ð¤Þ¤¹¡£¡Ö»°³Ñ·Á¤ÈÈæ¤ÎÄêÍý¡×Ã棳¿ô³Ø¤ÎÈÏ°Ï¡£


> ¼«µ¡¤¬¶á¤¯¤Ë¤¤¤Ê¤¤¾ì¹ç¤½¤Î¾ì¤Ëµï³¤±¡¢¶á¤¯¤Ë¼«µ¡¤¬¤¤¤¿¾ì¹çÄÉÈø¤·Î¥¤ì¤¿¤é°ÜÆ°¤·¤¿¾ì½ê¤Ëµï³¤±¤ë
¾ò·ï¤Ë¤è¤Ã¤ÆÆ°ºî¤òʬ¤±¤ë¤Î¤Çifʸ¤ò»ÈÍѤ·¤Þ¤¹¡£
ʬ´ô¾ò·ï¤Ïµ÷Î¥¤Ê¤Î¤Çdist¤ò»È¤¨¤Ð¤¤¤¤¤Ç¤·¤ç¤¦¡£

¡Ö¤½¤Î¾ì¤Ëµï³¤±¡×¤Ï¡¢ex, ey¤ÎÃæ¿È¤òÊѹ¹¤·¤Ê¤±¤ì¤Ð¤¤¤¤¤À¤±¤Ç¤¹¡£
ÄÉÈø¤Ï¡¢¤µ¤Ã¤­½ñ¤­¤Þ¤·¤¿¤Í¡£



> ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹
> ey=alien(ey,my) ; YºÂɸ¤òÆ°¤«¤¹
¤³¤ì¤À¤±¤Ï²¿¤ò¤·¤è¤¦¤È¤·¤Æ¤¤¤¿¤Î¤«Íý²ò¤Ç¤­¤Þ¤»¤ó¤Ç¤·¤¿¡£
¼«µ¡¤Î­ÀפòÃÙ¤ì¤ÆÄɤ¤¤«¤±¤ë´¶¤¸¤«¤Ê¤È¤â»×¤Ã¤¿¤Î¤Ç¤¹¤¬¤É¤¦¤â°ã¤¦¤è¤¦¤Ç¡Ä³°Éô¥â¥¸¥å¡¼¥ë¤Î´Ø¿ô¤«¤Ê¤Ë¤«¤Ç¤·¤ç¤¦¤«¡£



¤Í¤³

¥ê¥ó¥¯

2020/9/27(Sun) 23:44:37|NO.91462

GENKI¤µ¤ó

²óÅú¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£
ÊÖ¿®¤¬ÂçÊÑÃÙ¤¯¤Ê¤Ã¤Æ¤·¤Þ¤¤¿½¤·Ìõ¤¢¤ê¤Þ¤»¤ó¤Ç¤·¤¿¡£

¡ä¤È¤ê¤¢¤¨¤ºÆ°¤¯¤è¤¦¤Ë¤·¤Æ¤ß¤¿¡£
ÄÉÈøµ¡Ç½¤Ï¤¢¤ê¤Þ¤»¤ó¡£
ʸ»ú¤ËÃÖ¤­´¹¤¨¤Æ¤Î¥×¥í¥°¥é¥à¤ò½ñ¤¤¤Æ¤¯¤À¤µ¤ê¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤·¤¿¡£
ÄÉÈø¤ÎÆ°ºî¤Ï²¿¤È¤«½ñ¤±¤Þ¤·¤¿¡£²¼µ­¤Î¥×¥í¥°¥é¥à¤¬ÄÉÈø¤Î¥×¥í¥°¥é¥à¤Ç¤¹¡£


No.91403¤Ç¡¢»ä¤¬¡Ö¼«µ¡¤¬¶á¤¯¤Ë¤¤¤Ê¤¤¾ì¹ç¤½¤Î¾ì¤Ëµï³¤±¡¢¶á¤¯¤Ë¼«µ¡¤¬¤¤¤¿¾ì¹çÄÉÈø¤·Î¥¤ì¤¿¤é°ÜÆ°¤·¤¿¾ì½ê¤Ëµï³¤±¤ë¤È¤¤¤¦¥×¥í¥°¥é¥à¡×¤ò¼ÁÌ䤵¤»¤Æ¤¤¤¿¤À¤­¡¢¤½¤ì¤ËÂФ·¤ÆGENKI¤µ¤ó¤«¤éºÙ¤«¤¤ÀâÌÀ¤ä¥Ò¥ó¥È¤ò²óÅú¤·¤Æ¤¤¤¿¤À¤¤¤¿¤Î¤Ç¤¹¤¬¿ôÆü¹Í¤¨¤Þ¤·¤¿¤¬¡¢¤É¤¦¤·¤Æ¤â»×¤¦¤è¤¦¤ËÆ°¤­¤Þ¤»¤ó¡£¤³¤³¤Þ¤Ç¾Ü¤·¤¯¶µ¤¨¤Æ¤¤¤¿¤À¤¤¤¿¤Î¤Ë»ä¤ÎÃ챤¬Â­¤é¤º¿½¤·Ìõ¤¢¤ê¤Þ¤»¤ó¡£¤É¤ó¤Ê¼°¤ò½ñ¤±¤Ð¡Ö¡×¤Ç½ñ¤¤¤¿ÆâÍƤÎÆ°¤­¤Ë¤Ê¤ë¤Î¤«¡¢¥Ò¥ó¥È¤Ç¤Ï¤Ê¤¯Àµ²ò¤ò¤¼¤Ò¶µ¤¨¤Æ¤¤¤¿¤À¤­¤¿¤¤¤Ç¤¹¡£²¿ÅÙ¤â²óÅú¤Î¤ª»þ´Ö¤ò¤¤¤¿¤À¤­¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£ºÆÅÙ¤è¤í¤·¤¯¤ª´ê¤¤¤¤¤¿¤·¤Þ¤¹¡£



title "Äɤ¤¤«¤±¤ë"
wx=800:wy=600 ; ²èÌÌ¥µ¥¤¥º
screen 0,wx,wy
color 0,200,100:boxf 0,0,800,800


mx=400:my=300 ; ¥×¥ì¥¤¥ä¡¼¤ÎºÂɸ
msp=4 ; ¥×¥ì¥¤¥ä¡¼¤Î°ÜÆ°¥¹¥Ô¡¼¥É
ms=8 ; ¾×ÆÍȽÄê±ß¤ÎȾ·Â
ex=50:ey=50 ; Ũ¤ÎºÂɸ
frame=0


*game1
redraw 0 ; ²èÌ̹¹¿·³«»Ï
color 0,200,100:boxf 0,0,800,800


;¼«µ¡
stick key,%11111 ; ¥­¡¼ÆþÎÏ
;limit p1,p2,p3(°ìÄêÈÏ°ÏÆâ¤ÎÀ°¿ô¤òÊÖ¤¹) ÂоݤȤʤëÃÍ,ºÇ¾®ÃÍ¡¤ºÇÂçÃÍ
;mx=400:my=300 ¥×¥ì¥¤¥ä¡¼¤ÎºÂɸ :msp=4 °ÜÆ°ÎÌ
;wx=800:wy=600 ²èÌÌ¥µ¥¤¥º
if key&1 : mx=limit( mx-msp, 0, wx ) ; º¸°ÜÆ°
if key&4 : mx=limit( mx+msp, 0, wx ) ; ±¦°ÜÆ°
if key&2 : my=limit( my-msp, 0, wy ) ; ¾å°ÜÆ°
if key&8 : my=limit( my+msp, 0, wy ) ; ²¼°ÜÆ°
pos mx-ms,my-ms
color
mes "¼«"


dist=abs(ex-mx)+abs(ey-my) ; Ũ¤È¤Îµ÷Î¥¤ò´Ê°×Ū¤Ëµá¤á¤ë
if dist<(ms*2) : goto *gameover ; ¾×Æͤ·¤Æ¤¤¤¿¤é*gameover¤Ø

;¿·¤·¤¤ºÂɸ=aline(¸½ºß¤ÎºÂɸ,Äɤ¤¤«¤±¤ëºÂɸ)
ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹
ey=alien(ey,my) ; Ũ¤ÎYºÂɸ¤òÆ°¤«¤¹


;¼Ø1
gsel 0
pos ex-ms,ey-ms ;50-22,50-22
color 255,255,255:gmode 4,0,0,256 ;²èÁüÇطʤÎÆ©ÌÀ²½
color
mes "Ũ"


redraw 1 ; ²èÌ̹¹¿·½ª¤ï¤ê
await 1000/60 ; 1/60ÉäDzèÌ̤ò¹¹¿·
frame++ ; ¥Õ¥ì¡¼¥à¤ò¿Ê¤á¤ë
goto *game1 ; ·«¤êÊÖ¤¹

*gameover
; ¤Ä¤«¤Þ¤Ã¤¿»þ¤Î½èÍý
font msgothic,120
color 0,0,65:pos 50,50
mes "¤Ä¤«¤Þ¤¨¤¿¡ª"
redraw 1
stop

#defcfunc alien int value, int value2

; Ũ¤¬Äɤ¤¤«¤±¤Æ¤¯¤ë´Ø¿ô
esp=2 ; Ũ¤Î°ÜÆ°¥¹¥Ô¡¼¥É
res=limit( value2-value, -esp, esp )
return value+res



GENKI

¥ê¥ó¥¯

2020/9/29(Tue) 01:17:33|NO.91479

¤¹¤Ð¤é¤·¤¤¤Ç¤¹¡£¤Á¤ã¤ó¤ÈÆ°¤¯¥¹¥¯¥ê¥×¥È¤Ë¤Ê¤Ã¤Æ¤¤¤ë¤·¡¢ÄÉÈø¤â½ÐÍè¤Æ¤Þ¤¹¤Í¡£
¤Ê¤ë¤Û¤Éalien ¤Ï¤½¤¦¤¤¤¦¼ÂÁõ¤Î¼«ºî´Ø¿ô¤Ç¤·¤¿¤«¡£¤³¤³¤Þ¤Ç½ÐÍè¤Æ¤ì¤Ð¤¢¤È¿ô¹Ô¤Ç½ÐÍè¤Þ¤¹¡£


> ¡Ö¼«µ¡¤¬¶á¤¯¤Ë¤¤¤Ê¤¤¾ì¹ç¤½¤Î¾ì¤Ëµï³¤±¡¢¶á¤¯¤Ë¼«µ¡¤¬¤¤¤¿¾ì¹çÄÉÈø¤·Î¥¤ì¤¿¤é°ÜÆ°¤·¤¿¾ì½ê¤Ëµï³¤±¤ë¤È¤¤¤¦¥×¥í¥°¥é¥à¡×

Á´¤¯Æ±¤¸¼ÁÌä¡Ä¥¹¥¯¥ê¥×¥È¤ò¸«¤ë¸Â¤ê¤Ï¤Þ¤Ã¤¿¤¯¤¼¤ó¤¼¤óÍý²ò¤Ç¤­¤Ê¤¤¤È¤Ï»×¤¨¤Ê¤¤¤Î¤Ç¤¹¤¬¤½¤¦¤Ç¤¹¤«¡£
¤Ç¤­¤ì¤Ð¡Ö¤³¤³¤Ï¤³¤¦Íý²ò¤·¤¿¤Ä¤â¤ê¤À¤±¤É¡¢·ë²Ì¤¬¤³¤ó¤Ê¤Õ¤¦¤À¤«¤é¤¢¤Ã¤Æ¤¤¤Ê¤¤µ¤¤¬¤¹¤ë¡×¤È¤«¡¢¶µ¤¨¤Æ¤¤¤¿¤À¤±¤ì¤ÐÀâÌÀ¤·¤è¤¦¤¬¤¢¤ë¤Î¤Ç¤¹¤¬¡Ä¡£¤È¤ê¤¢¤¨¤ºÀâÌÀ¤·¤Æ¤ß¤Þ¤¹¡£


¤Þ¤º¤Ï¤ä¤ê¤¿¤¤¤³¤È¤Îʸ¾Ï¤òʬ²ò¤·¤Þ¤¹¡£

¡¦¼«µ¡¤¬¶á¤¯¤Ë¤¤¤Ê¤¤¾ì¹ç¡Ê¤Þ¤¿¤Ï¼«µ¡¤¬Î¥¤ì¤¿¤é¡Ë¡¢¤½¤Î¾ì¤Ëµï³¤±¤ë
¡¦¼«µ¡¤¬¶á¤¯¤Ë¤¤¤¿¾ì¹ç¡¢ÄÉÈø¤¹¤ë

¤³¤Î2¤Ä¤ÎÆ°ºî¤ËÊ̤ì¤Þ¤¹¡£¡Ö¼«µ¡¤¬Î¥¤ì¤¿¤é¡×¤È¡Ö¼«µ¡¤¬¶á¤¯¤Ë¤¤¤Ê¤¤¡×¤Ï¡¢¼«µ¡¤ÈŨ¤Îº£¸½ºß¤Îµ÷Î¥¤Î»ö¤ò»Ø¤·¤Æ¤¤¤Æ¤É¤Á¤é¤â¶á¤¯¤Ë¤¤¤Ê¤¤¾ì¹ç¤ò»Ø¤¹Æ±¤¸¤³¤È¤Ê¤Î¤Ç°ì½ï¤Ë¤·¤Æ¤¤¤Þ¤¹¡£

ʸ¾ÏÁ´ÂΤϡ¢¡Ö¡Ä¤Î¾ì¹ç¤Ï¡Á¤¹¤ë¡£¤½¤¦¤Ç¤Ê¤¤¾ì¹ç¤Ï¡Á¤¹¤ë¡£¡×¤Ê¤Î¤Çifʸ¤ò»È¤¤¤Þ¤¹¡£
ifʸ¤Î»È¤¤Êý¤ÏÂç¾æÉפǤ¹¤è¤Í¡©¾åµ­¤Îʸ¾Ï¤Çifʸ¤òµ¯¤³¤·¤Æ¤ß¤Þ¤¹¡£

if ¼«µ¡¤¬¶á¤¯¤Ë¤¤¤ë { ÄÉÈø¤¹¤ë } else { ¤½¤Î¾ì¤Ëµï³¤±¤ë }
¡ÖÄÉÈø¤¹¤ë¡×¤Ïalien ´Ø¿ô¤Ç¼ÂÁõºÑ¤ß¤Ç¤¹¤Í¡£
¡Ö¤½¤Î¾ì¤Ëµï³¤±¤ë¡×¤Ï¡¢ex,ey¤ÎÃͤÏÁ°²óÃͤò»ÈÍѤ¹¤ì¤Ð¤è¤¤¤Î¤Ç²¿¤â¤¹¤ëɬÍפϤ¢¤ê¤Þ¤»¤ó¡£

if ¼«µ¡¤¬¶á¤¯¤Ë¤¤¤ë { ;¿·¤·¤¤ºÂɸ=aline(¸½ºß¤ÎºÂɸ,Äɤ¤¤«¤±¤ëºÂɸ) ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹ ey=alien(ey,my) ; Ũ¤ÎYºÂɸ¤òÆ°¤«¤¹ }
¤È¡¢¤³¤³¤Þ¤Ç¤ÏÂç¾æÉפǤ¹¤«¡©



¤Í¤³

¥ê¥ó¥¯

2020/9/29(Tue) 03:43:51|NO.91480

GENKI¤µ¤ó

Ëè²óÃúÇ«¤Ë²óÅú¤·¤Æ¤¤¤¿¤À¤­¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£


ifʸ¤Î»È¤¤Êý¤ÏÌäÂꤢ¤ê¤Þ¤»¤ó¡£¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£
Íý²ò¤·¤Æ¤¤¤Ê¤¤¤È¤³¤í¤òÌÀ³Î¤ËÀâÌÀ¤»¤º¼ºÎ餷¤Þ¤·¤¿¡Ä¡£
¤ªÃѤº¤«¤·¤¤¤Î¤Ç¤¹¤¬¡¢¡Ö?¡×¤Ç¼¨¤·¤¿Éôʬ¤¬Ê¬¤«¤é¤Ê¤¤¤Ç¤¹¡£


if(­¡) {
;¿·¤·¤¤ºÂɸ=aline(¸½ºß¤ÎºÂɸ,Äɤ¤¤«¤±¤ëºÂɸ)
ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹
ey=alien(ey,my) ; Ũ¤ÎYºÂɸ¤òÆ°¤«¤¹
} else {
­¢
}

­¡¼«µ¡¤¬¶á¤¯¤Ë¤¤¤ë¡¡¤È¡¡­¢¤½¤Î¾ì¤Ëµï³¤±¤ë¡¡¤Î½ñ¤­Êý¤¬¤ï¤«¤ê¤Þ¤»¤ó¡Ä¡£

²¾¤Ë¶á¤¯¤Ë¤¤¤ë¤È¤­ÄÉÈø¤¹¤ë¤â¤Î¤òŨ2¤Èɽ¤·¤Æ½é´ü°ÌÃÖ¤ò
gx=100:gy=200 ; Ũ2¤ÎºÂɸ
¤È¤·¤Æ¡¢­¡¤ÏŨ¤È¤Îµ÷Î¥¤òµá¤á¤ë¼°¤Î¡¡dist=abs(gx-mx)+abs(gy-my) ¤Ç¤¹¤«¡©

­¢¤Ï½é´ü°ÌÃ֤Ǥ¢¤ë¡¡gx=100:gy=200¡¡¤Ç¤·¤ç¤¦¤«¡©


½ñ¤­Êý¤¬¤á¤Á¤ã¤¯¤Á¤ã¤«¤â¤·¤ì¤Þ¤»¤ó¡Ä
ºÆÅÙ¤´¶µ¼ø¤¤¤¿¤À¤±¤ì¤Ð¹¬¤¤¤Ç¤¹¡£



GENKI

¥ê¥ó¥¯

2020/9/29(Tue) 23:59:09|NO.91489

¤³¤Á¤é¤³¤½Ä¹¡¹¤È¤ªÉÕ¤­¹ç¤¤¤¤¤¿¤À¤­¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£
½ñ¤­Êý¤ÏÂç¾æÉפǤ¹¡£ºÇ½é¤ËÈæ¤Ù¤ì¤Ð¤º¤¤¤Ö¤ó¤ï¤«¤ê¤ä¤¹¤¯¤Ê¤ê¤Þ¤·¤¿¡£


> ­¡¼«µ¡¤¬¶á¤¯¤Ë¤¤¤ë¡¡¡Ê¡Äά¡Ä¡Ë¤Î½ñ¤­Êý¤¬¤ï¤«¤ê¤Þ¤»¤ó¡Ä¡£

¤Þ¤º¤Ï¡Ö¼«µ¡¤¬¶á¤¯¤Ë¤¤¤ë¡×¤ò¹Í¤¨¤Æ¤ß¤Æ¤¯¤À¤µ¤¤¡£
´Êñ¤Ë½ñ¤¤¤Æ¤Ï¤¤¤Þ¤¹¤¬¡¢¾õ¶·Åª¤Ë¤Ï¡Ö¼«µ¡¤Î°ÌÃÖ ¤È Ũ¤Î°ÌÃÖ ¤È¤Îµ÷Î¥¤¬¶á¤¤¡×¤È¤¤¤¦¤³¤È¤Ç¤¹¡£
¡Öµ÷Î¥¤¬¶á¤¤¡×¤È¤Ï¡Öµ÷Î¥¤¬¤¢¤ëÃͤè¤ê¾®¤µ¤¤¡Ê¤Þ¤¿¤Ï°Ê²¼¡Ë¡×¤È¤¤¤¦¤³¤È¤Ç¤¹¡£
¡Ö¤¢¤ëÃ͡פÏïçÃ͡ʤ·¤­¤¤¤Á¡Ë¤È¸Æ¤Ó¤Þ¤¹¡£°ÕÌ£¤Ï¥°¥°¤Ã¤Æ¤¯¤À¤µ¤¤¡£

¤Þ¤È¤á¤ë¤È¡Ö¼«µ¡¤Î°ÌÃÖ ¤È Ũ¤Î°ÌÃÖ ¤È¤Îµ÷Î¥¤¬ ¤·¤­¤¤ÃÍ ¤è¤ê¾®¤µ¤¤¡×¤È¤Ê¤ê¤Þ¤¹¡£
¤È¤¤¤¦¤³¤È¤Ç¡¢¤³¤¦¤Ê¤ê¤Þ¤¹¡£

if ¡Ö¼«µ¡¤Î°ÌÃÖ ¤È Ũ¤Î°ÌÃÖ ¤È¤Îµ÷Î¥¡× < ¡Ö¤·¤­¤¤ÃÍ¡× { ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹ ey=alien(ey,my) ; Ũ¤ÎYºÂɸ¤òÆ°¤«¤¹ }
¤·¤­¤¤ÃͤÎÂ礭¤µ¤ÏÆ°¤«¤·¤Ê¤¬¤éŬÅö¤Ë·è¤á¤Æ¤¯¤À¤µ¤¤¡£100¤È¤«200¤È¤«¤°¤é¤¤¡©


> ­¡¤ÏŨ¤È¤Îµ÷Î¥¤òµá¤á¤ë¼°¤Î¡¡dist=abs(gx-mx)+abs(gy-my) ¤Ç¤¹¤«¡©

gx,gy¤¸¤ã¤Ê¤¯¤Æex,ey¤Ç¤¹¤è¤Í¡£¥¿¥¤¥×¥ß¥¹¤«¤Ê¡£

¡Ö¼«µ¡¤Î°ÌÃÖ ¤È Ũ¤Î°ÌÃÖ ¤È¤Îµ÷Î¥¡×¤ÎÀµ³Î¤ÊÃͤϡ¢¤³¤Î¼°¤Ç¤Ï½Ð¤»¤Þ¤»¤ó¡£
(mx,my)¤ò²¾¤Ë(0,0)¤È¤·¤Æ¡¢dist¤¬Æ±¤¸Ãͤˤʤë¤è¤¦¤Ê(ex,ey)¤ò»æ¤Ë½ñ¤¤¤Æ¤ß¤Æ¤¯¤À¤µ¤¤¡£¤Ò¤··Á¤Î¿Þ·Á¤Ë¤Ê¤ë¤Ï¤º¤Ç¤¹¡£¤³¤Î¤³¤È¤«¤éÀµ³Î¤Êµ÷Î¥¤¬½Ð¤»¤Æ¤¤¤Ê¤¤¤³¤È¤¬¤ï¤«¤ê¤Þ¤¹¤è¤Í¡£¤³¤ÎÄøÅÙ¤ÎÀºÅ٤ǤâÌäÂê¤Ê¤¤¤Î¤Ç¤¢¤ì¤Ð¡¢¤³¤Î¼°¤ò»È¤Ã¤Æ¼ÂÁõ¤·¤Æ¤â¤½¤ì¤Ã¤Ý¤¯Æ°ºî¤·¤Þ¤¹¡£
Àµ³Î¤Êµ÷Î¥¤ÎÊý¤ò»È¤¤¤¿¤¤¾ì¹ç¤Ï¡¢ NO.91407 ¤Ç½ñ¤­¤Þ¤·¤¿¤Î¤Ç¤â¤¦°ìÅÙ³Îǧ¤·¤Æ¤ß¤Æ¤¯¤À¤µ¤¤¡£


> ­¢¤½¤Î¾ì¤Ëµï³¤±¤ë¡¡¤Î½ñ¤­Êý¤¬¤ï¤«¤ê¤Þ¤»¤ó¡Ä¡£

Ũ¤¬¡Ö¤½¤Î¾ì¤Ëµï³¤±¤ë¡×¤È¤¤¤¦¤³¤È¤Ï¡¢Á°¤Î¥ë¡¼¥×¤Ç¡Ömes "Ũ"¡×¤ò¼Â¹Ô¤·¤¿½Ö´Ö¤ÈƱ¤¸ºÂɸ¤Ë¤¤¤ë¤È¤¤¤¦¤³¤È¤Ç¤¹¡£
Á°²ó¡Ömes "Ũ"¡×¤¬¼Â¹Ô¤µ¤ì¤¿¸å¡¢¡Ögoto *game1¡×¤Ç¡Ö*game1¡×¤Ë¥¸¥ã¥ó¥×¤·¤Æ¡¢¡Öex=alien(ex,mx)¡×¤Î¹Ô¤Þ¤ÇÅþÃ夷¤¿¤³¤Î½Ö´Ö¤Þ¤Ç¤Î´Ö¤ËŨºÂɸ(ex,ey)¤ÏÊѲ½¤·¤Æ¤¤¤Þ¤¹¤«¡©
»æ¤Ë¿Þ¤ÈÊÑ¿ô¤ÎÃͥꥹ¥È¤ò½ñ¤­¤Ê¤¬¤é¡¢¥¹¥¯¥ê¥×¥È¤ò1¹Ô¤º¤ÄÄɤ¤¤«¤±¤Æ¤¤¤¯¤È¤ï¤«¤ê¤ä¤¹¤¤¤È»×¤¤¤Þ¤¹¡£


> ­¢¤Ï½é´ü°ÌÃ֤Ǥ¢¤ë¡¡gx=100:gy=200¡¡¤Ç¤·¤ç¤¦¤«¡©

­¡¤¬²ò·è¤·¤¿¤é¤³¤ÎÃͤòÆþ¤ì¤Æ¼Â¹Ô¤·¤Æ¤ß¤Æ¤¯¤À¤µ¤¤¡£É´Ê¹¤Ï°ì¸«¤Ë¤·¤«¤º¤À¤È»×¤¤¤Þ¤¹¡£



¤Í¤³

¥ê¥ó¥¯

2020/9/30(Wed) 04:00:34|NO.91492

GENKI¤µ¤ó

ËÜÅö¤Ë¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£


>gx,gy¤¸¤ã¤Ê¤¯¤Æex,ey¤Ç¤¹¤è¤Í¡£¥¿¥¤¥×¥ß¥¹¤«¤Ê¡£
¥¿¥¤¥×¥ß¥¹¤Ç¤·¤¿¡£¤¹¤ß¤Þ¤»¤ó¡Ä


title "Äɤ¤¤«¤±¤ë"
wx=800:wy=600 ; ²èÌÌ¥µ¥¤¥º
screen 0,wx,wy
color 0,200,100:boxf 0,0,800,800


mx=400:my=300 ; ¥×¥ì¥¤¥ä¡¼¤ÎºÂɸ
msp=4 ; ¥×¥ì¥¤¥ä¡¼¤Î°ÜÆ°¥¹¥Ô¡¼¥É
ms=8 ; ¾×ÆÍȽÄê±ß¤ÎȾ·Â
ex=50:ey=50 ; Ũ¤ÎºÂɸ
frame=0


*game1
redraw 0 ; ²èÌ̹¹¿·³«»Ï
color 0,200,100:boxf 0,0,800,800


;¼«µ¡
stick key,%11111 ; ¥­¡¼ÆþÎÏ
;limit p1,p2,p3(°ìÄêÈÏ°ÏÆâ¤ÎÀ°¿ô¤òÊÖ¤¹) ÂоݤȤʤëÃÍ,ºÇ¾®ÃÍ¡¤ºÇÂçÃÍ
;mx=400:my=300 ¥×¥ì¥¤¥ä¡¼¤ÎºÂɸ :msp=4 °ÜÆ°ÎÌ
;wx=800:wy=600 ²èÌÌ¥µ¥¤¥º
if key&1 : mx=limit( mx-msp, 0, wx ) ; º¸°ÜÆ°
if key&4 : mx=limit( mx+msp, 0, wx ) ; ±¦°ÜÆ°
if key&2 : my=limit( my-msp, 0, wy ) ; ¾å°ÜÆ°
if key&8 : my=limit( my+msp, 0, wy ) ; ²¼°ÜÆ°
pos mx-ms,my-ms
color
mes "¼«"



;Ũ
dist=abs(ex-mx)+abs(ey-my) ; Ũ¤È¤Îµ÷Î¥¤ò´Ê°×Ū¤Ëµá¤á¤ë
if dist<(ms*2) : goto *gameover ; ¾×Æͤ·¤Æ¤¤¤¿¤é*gameover¤Ø

;¿·¤·¤¤ºÂɸ=aline(¸½ºß¤ÎºÂɸ,Äɤ¤¤«¤±¤ëºÂɸ)
ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹
ey=alien(ey,my) ; Ũ¤ÎYºÂɸ¤òÆ°¤«¤¹


;Ũ¤È¼«µ¡¤Îµ÷Î¥
if dist = sqrt( (ex-mx) * (ex-mx) + (ey-my) * (ey-my) ) < 100 {
ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹
ey=alien(ey,my) ; Ũ¤ÎYºÂɸ¤òÆ°¤«¤¹
}else{
dist=abs(ex-mx)+abs(ey-my) ; Ũ¤È¤Îµ÷Î¥¤ò´Ê°×Ū¤Ëµá¤á¤ë
}

;Ũ
gsel 0
pos ex-ms,ey-ms ;50-22,50-22
color 255,255,255:gmode 4,0,0,256 ;²èÁüÇطʤÎÆ©ÌÀ²½
color
mes "Ũ"


redraw 1 ; ²èÌ̹¹¿·½ª¤ï¤ê
await 1000/60 ; 1/60ÉäDzèÌ̤ò¹¹¿·
frame++ ; ¥Õ¥ì¡¼¥à¤ò¿Ê¤á¤ë
goto *game1 ; ·«¤êÊÖ¤¹

*gameover
; ¤Ä¤«¤Þ¤Ã¤¿»þ¤Î½èÍý
font msgothic,120
color 0,0,65:pos 50,50
mes "¤Ä¤«¤Þ¤¨¤¿¡ª"
redraw 1
stop

#defcfunc alien int value, int value2

; Ũ¤¬Äɤ¤¤«¤±¤Æ¤¯¤ë´Ø¿ô
esp=2 ; Ũ¤Î°ÜÆ°¥¹¥Ô¡¼¥É
res=limit( value2-value, -esp, esp )
return value+res


¤¹¤ß¤Þ¤»¤ó¡¢¤É¤¦¤·¤Æ¤â¤ï¤«¤ê¤Þ¤»¤ó¡£
¤É¤¦¤¹¤ì¤Ð¤è¤¤¤Î¤Ç¤·¤ç¤¦¤«¡Ä
¥×¥í¥°¥é¥ß¥ó¥°¤¬¤Ç¤­¤Ê¤µ²á¤®¤ÆËÜÅö¤Ë¿½¤·Ìõ¤Ê¤¤¤Ç¤¹¡£
;Ũ¤È¼«µ¡¤Îµ÷Î¥¡¡¡¡¤Î¤È¤³¤í¤Ç¤¹¡£
¤è¤í¤·¤¯¤ª´ê¤¤¤·¤Þ¤¹¡£



GENKI

¥ê¥ó¥¯

2020/9/30(Wed) 23:11:39|NO.91503

> ¥×¥í¥°¥é¥ß¥ó¥°¤¬¤Ç¤­¤Ê¤µ²á¤®¤ÆËÜÅö¤Ë¿½¤·Ìõ¤Ê¤¤¤Ç¤¹¡£

Âç¾æÉס£Äü¤á¤ºÃµµá¤¹¤ë¤³¤È¤¬½ÐÍè¤ë¤Î¤Ç¤¢¤ì¤Ð¾å㤷¤Þ¤¹¡£


> ;¿·¤·¤¤ºÂɸ=aline(¸½ºß¤ÎºÂɸ,Äɤ¤¤«¤±¤ëºÂɸ)
> ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹
> ey=alien(ey,my) ; Ũ¤ÎYºÂɸ¤òÆ°¤«¤¹

¤³¤ÎÉôʬ¤òifʸ¤ÎÃæ¤Ë°ÜÆ°¤·¤Æ¡¢Å¨¤ÎÆ°¤­Êý¤ò¾ò·ï¤Ë¤è¤Ã¤ÆÀÚ¤êÂؤ¨¤ë¡£¤È¤¤¤¦¤Î¤¬º£²ó¤Î¥Ý¥¤¥ó¥È¤Î°ì¤Ä¤Ç¤¹¡£
¤È¤¤¤¦¤³¤È¤Ç¡¢¤³¤Î3¹Ô¤Ï¤¹¤Ç¤ËifʸÆâ¤Ë°ÜÆ°ºÑ¤ß¤Ê¤Î¤Çºï½ü¤Ç¤¹¡£


> if dist = sqrt( (ex-mx) * (ex-mx) + (ey-my) * (ey-my) ) < 100 {

¤³¡¢¤³¤ì¤Ï¡Ä¡¡ifʸ¤ÈÊÑ¿ô¤òÍý²ò¤·¤Æ¤¤¤Ê¤¤¤È¤¤¤¦¤³¤È¤¬¤Ï¤Ã¤­¤ê¤ÈÆɤ߼è¤ì¤Þ¤¹¡£
¤Ê¤Þ¤³¤µ¡Ä¤¢¤ì¡©¤Í¤³¤µ¤ó¡©¤¤¤Ä¤Î´Ö¤ËÆþ¤ìÂؤï¤Ã¤Æ¡©¡©¡¡¡Ä¤­¤Ã¤ÈÃæ¤ÏƱ¤¸Êý¤Ç¤¹¤è¤Í¡£
¤Í¤³¤µ¤ó¤ÏÉáÃʤϡ¢Â¾¤ÎÊý¤¬½ñ¤«¤ì¤¿¥¹¥¯¥ê¥×¥È¤ò¥³¥Ô¥Ú¤·¤Æ¥×¥í¥°¥é¥à¤ò¤µ¤ì¤Æ¤¤¤ë¤³¤È¤È»×¤¤¤Þ¤¹¡£ºÇ½é¤Î¤¦¤Á¤Ï¤½¤ì¤Ç¤¤¤¤¤Î¤Ç¤¹¤¬¡¢¸Â³¦¤Ï¤¹¤°¤Ë¤ä¤Ã¤Æ¤­¤Þ¤¹¡£¤½¤·¤Æº£¤¬¤½¤Î¸Â³¦¤Ç¤¹¡£¥×¥í¥°¥é¥à¤Îµ­½Ò¤Î°ÕÌ£¤ò¾¯¤·¤º¤ÄÍý²ò¤·¤Æ¤¤¤­¤Þ¤·¤ç¤¦¡£

¤Þ¤º¡¢ifʸ¤È¤¤¤¦¤Î¤Ï¾ò·ï¼°¤¬Àµ¤·¤±¤ì¤Ð¡¢ºÇ½é¤Î{¡Á}Æâ¤ÎÌ¿Îá¤ò¼Â¹Ô¤¹¤ëÌ¿Îáʸ¤Ç¤¹¡£
¤Í¤³¤µ¤ó¤¬½ñ¤«¤ì¤¿¥¹¥¯¥ê¥×¥È¤ò¸«¤ë¤È¾ò·ï¼°¤ÎÉôʬ¤Ï¼¡¤Î¤è¤¦¤Ë¤Ê¤Ã¤Æ¤¤¤Þ¤¹¡£
¡¡¡û¡û = ¢¢¢¢ < ¢¤¢¤
=¤È<¤¬¤¢¤Ã¤Æ¡¢¤³¤ì¤Ç¤Ï²¿¤òÈæ³Ó¤·¤Æ¤¤¤ë¤Î¤«¤ï¤«¤ê¤Þ¤»¤ó¡£¡Ê¡ÖÈæ³Ó¡×¤ÏÂç¾æÉפǤ·¤ç¤¦¤«¡£Ãæ1¿ô³Ø¤ÎÈϰϤǤ¹¡£¡Ë
¤ª¤½¤é¤¯µ÷Î¥¤òµá¤á¤ë¼°¤È¤·¤Æ NO.91407 ¤Ë½ñ¤¤¤¿1¹Ô¤ò²¿¤â¹Í¤¨¤º¤Ë¤½¤Î¤Þ¤Þ¥³¥Ô¥Ú¤·¤¿¤À¤±¤À¤È»×¤¤¤Þ¤¹¡£

NO.91407
> dist = sqrt( (ex-mx) * (ex-mx) + (ey-my) * (ey-my) )

¤Ç¤Ï¼¡¤Ë¡¢¤³¤ì¤¬»ä¤¬Ä󼨤·¤¿µ÷Î¥¤òµá¤á¤ë¼°¤Ç¤¹¡£
¤â¤¦¤³¤ÎºÝ¡¢sqrt°Ê¹ß¤Î¼°¤¬²¿¤ò¤É¤¦·×»»¤·¤Æ¤¤¤ë¤Î¤«¤ÏÍý²ò¤Ç¤­¤Æ¤¤¤Ê¤¯¤Æ¤â¤¤¤¤¤È»×¤¤¤Þ¤¹¡£
¤·¤«¤· sqrt(¡Ä) ¤Î·×»»·ë²Ì¤òÊÑ¿ô dist ¤ËÂåÆþ¤·¤Æ¤¤¤ë¤È¤¤¤¦Éôʬ¤°¤é¤¤¤ÏÆɤ߼è¤ì¤Ê¤±¤ì¤Ðº£¸å¥×¥í¥°¥é¥à¤ò³¤±¤Æ¤¤¤¯¤³¤È¤Ïº¤Æñ¤Ç¤¹¡£¤Þ¤º¤ÏÍî¤ÁÃ夤¤Æ¡¢½ñ¤¤¤Æ¤¢¤ë¥¹¥¯¥ê¥×¥È¤ò²¿Å٤⸫¤Æ¡¢Á°¸å¤Îʸ¾Ï¤âÆɤó¤Ç¡¢Ê¬¤«¤ëÈϰϤǤǤâÍý²ò¤¹¤ë¤è¤¦¤ËÅؤá¤Æ¤ß¤Æ¤¯¤À¤µ¤¤¡£
¤½¤¦¤¹¤ì¤Ð¡¢¾åµ­1¹Ô¤ò¼Â¹Ô¤·¤¿·ë²Ì¡¢ÊÑ¿ôdist¤ËÆþ¤Ã¤Æ¤¤¤ëÃͤ¬²¿¤Ê¤Î¤«¤ï¤«¤ë¤È»×¤¤¤Þ¤¹¡£

½é¿´¤ò»×¤¤½Ð¤·¤Æ¡¢Éü½¬¤·¤Æ¤ß¤ë¤Î¤â¤¤¤¤¤«¤â¤·¤ì¤Þ¤»¤ó¡£¥Ù¥Æ¥é¥ó¤Ç¤âÉü½¬¤¹¤ë¤È¿·¤·¤¤È¯¸«¤Ë½Ð²ñ¤¦¤³¤È¤Ï¤è¤¯¤¢¤ê¤Þ¤¹¡£
HSPÆþÌçÊÔ
https://hsp.tv/make/enroll.html


> }else{
> dist=abs(ex-mx)+abs(ey-my) ; Ũ¤È¤Îµ÷Î¥¤ò´Ê°×Ū¤Ëµá¤á¤ë
> }

NO.91479 ¤ÎºÇ¸å¤Ç¤³¤ó¤Ê»ö½ñ¤¤¤¿¤«¤Ê¡Ä¡£¤É¤¦¤·¤Æ¤³¤³¤ÇŨ¤È¤Îµ÷Î¥¤ò´Ê°×Ū¤Ëµá¤á¤è¤¦¤È¤·¤¿¤Î¤«¡¢¹Í¤¨¤Æ¤ß¤¿¤Î¤Ç¤¹¤¬¤ï¤«¤ê¤Þ¤»¤ó¤Ç¤·¤¿¡£(¡­¡¦¦Ø¡¦¡®)

> ¡Ö¤½¤Î¾ì¤Ëµï³¤±¤ë¡×¤Ï¡¢ex,ey¤ÎÃͤÏÁ°²óÃͤò»ÈÍѤ¹¤ì¤Ð¤è¤¤¤Î¤Ç²¿¤â¤¹¤ëɬÍפϤ¢¤ê¤Þ¤»¤ó¡£
¤È½ñ¤¤¤¿¤È¤ª¤ê¡¢²¿¤â¤¹¤ëɬÍפϤ¢¤ê¤Þ¤»¤ó¡£¤Ä¤Þ¤ê¤³¤¦¤¤¤¦¤³¤È¤Ç¤¹¡£

if ¡Ä { ;¿·¤·¤¤ºÂɸ=aline(¸½ºß¤ÎºÂɸ,Äɤ¤¤«¤±¤ëºÂɸ) ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹ ey=alien(ey,my) ; Ũ¤ÎYºÂɸ¤òÆ°¤«¤¹ }else{ ; ¡ÖÆ°¤«¤µ¤Ê¤¤¡×¤Î¤ÇÁ°²ó¥ë¡¼¥×¤ÎÃͤò¤½¤Î¤Þ¤Þ»È¤¦ ex=ex ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤µ¤Ê¤¤ ey=ey ; Ũ¤ÎYºÂɸ¤òÆ°¤«¤µ¤Ê¤¤ }
else°Ê¹ß¤Ç¤Ï¡¢Æ±¤¸ÊÑ¿ô¤ËƱ¤¸ÊÑ¿ô¤ÎÃæ¿È¤òÂåÆþ¤¹¤ë¤Î¤Ç¡¢¤½¤â¤½¤â½ñ¤¯É¬Íפ¬¤Ê¤¤¤Î¤Ç¤³¤¦½ñ¤±¤Þ¤¹¡£

if ¡Ä { ;¿·¤·¤¤ºÂɸ=aline(¸½ºß¤ÎºÂɸ,Äɤ¤¤«¤±¤ëºÂɸ) ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹ ey=alien(ey,my) ; Ũ¤ÎYºÂɸ¤òÆ°¤«¤¹ }
¤Ä¤Þ¤ê¡¢NO.91479 ¤ÎºÇ¸å¤Ç½ñ¤¤¤¿¤È¤ª¤ê¤Ç¤¹¡£



¤Í¤³

¥ê¥ó¥¯

2020/10/1(Thu) 02:37:36|NO.91505

¡ä¡¡Âç¾æÉס£Äü¤á¤ºÃµµá¤¹¤ë¤³¤È¤¬½ÐÍè¤ë¤Î¤Ç¤¢¤ì¤Ð¾å㤷¤Þ¤¹¡£
¶»¤Ë¤·¤ß¤Þ¤¹¡£¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£

¡ä¡¡¤Í¤³¤µ¤ó¤ÏÉáÃʤϡ¢¡Ä
ÃѤº¤«¤·¤¤¤Ç¤¹¤¬¡¢¤½¤ÎÄ̤ê¤Ç¤¹¡£Â´ÏÀ¤ò¤ä¤ë¤Ë¤¢¤¿¤Ã¤Æ½é¤á¤ÆHSP¤ò»È¤¤¡¢¤¢¤Þ¤êÍý²ò¤·¤Ê¤¤¤Þ¤ÞÄó½Ð´ü¸Â¤¬´Ö¶á¤Ê¤Ã¤Æ¤È¤Æ¤â¾Ç¤Ã¤¿¾õÂ֤ǺîÀ®¤·¤Æ¤¤¤ë¤Î¤¬¸½¼Â¤Ç¤¹¡£ËÜÅö¤Ë¾ð¤±¤Ê¤¤¤Ç¤¹¡£

¡ä¡¡¤Ê¤Þ¤³¤µ¡Ä¤¢¤ì¡©¤Í¤³¤µ¤ó¡©¡Ä
¤Í¤³¤â¤Ê¤Þ¤³¤âƱ°ì¿Íʪ¤Ç¤¹¡£º®Í𤵤»¤Æ¤·¤Þ¤Ã¤Æ¤¹¤ß¤Þ¤»¤ó¡Ä¤¤¤Ä¤Î¤Þ¤Ë¤«º®¹ç¤·¤Æ¤·¤Þ¤¤¤Þ¤·¤¿¡£


¡ä¡¡dist = sqrt( (ex-mx) * (ex-mx) + (ey-my) * (ey-my) )
¤³¤Î¼°¤Ë¿ô»ú¤ò¤¢¤Æ¤Ï¤á¤Æ¹Í¤¨¤¿¤Î¤Ç¤¹¤¬¡¢
dist=sqrt((50-400)*(50-400)+(50-300)*(50-300))
dist=sqrt((-350)*(-350)+(-250)*(-250))
dist=sqrt(122500+62500)
dist=sqrt*60000

¤³¤Î²ò¼á¤Ç¹ç¤Ã¤Æ¤¤¤ë¤Ç¤·¤ç¤¦¤«¡Ä¡©
sqrt¤òÄ´¤Ù¤Æ¡Ö¥ë¡¼¥È(Ê¿Êýº¬)ÃͤòÊÖ¤¹¡×¤È½Ð¤Æ¤­¤¿¤Î¤Ç¤¹¤¬¡¢60000¤ò¥ë¡¼¥È¤Ëľ¤¹¤È¤¤¤¦¤³¤È¤Ê¤Î¤Ç¤·¤ç¤¦¤«¡©
̵ÃΤʻä¤Ë¤³¤³¤Þ¤ÇÇ®¿´¤Ë¶µ¤¨¤Æ¤¯¤À¤µ¤êËÜÅö¤Ë´¶¼Õ¤·¤Æ¤¤¤Þ¤¹¡£
¤¿¤Ó¤¿¤Ó¤¹¤ß¤Þ¤»¤ó¤¬¡¢¤è¤í¤·¤¯¤ª´ê¤¤¤¤¤¿¤·¤Þ¤¹¡£


¡ä¡¡NO.91479 ¤ÎºÇ¸å¤Ç¤³¤ó¤Ê»ö½ñ¤¤¤¿¤«¤Ê¡Ä¡£
¤É¤¦¤·¤Æ¤âʬ¤«¤é¤º¤³¤ì¤Ê¤Î¤Ç¤Ï¤Ê¤¤¤«¤È¶¯°ú¤Ë²ò¼á¤·¤Æ¤·¤Þ¤¤¤Þ¤·¤¿¡£¤¹¤ß¤Þ¤»¤ó¡£



¤¢¤é¤ä

¥ê¥ó¥¯

2020/10/1(Thu) 14:02:56|NO.91507

²£¤«¤é¼ºÎ餷¤Þ¤¹¡£

>dist=sqrt(122500+62500)
>dist=sqrt*60000

(122500+62500)¤Ï¡Ú185000¡Û¤Ç¤¹¤è¤Í¡£¡£¡£
60000¤Ï¤É¤³¤«¤é¡£¡£¡£
¤È¤¤¤¦¿ô»ú¤ÎÆæ¤Ï¤ª¤¤¤Æ¤ª¤­¤Þ¤·¤Æ¡£

sqrt(60000)¡¡¤È½ñ¤¯¤Î¤Ï
¢å60000¡¡¤³¤ì¤È¡Ê¥×¥í¥°¥é¥à¸À¸ì¤È¤·¤Æ¢å¤Îʸ»ú¤Ï»È¤¤¤Þ¤»¤ó¤¬¡Ë¤Û¤ÜƱ¤¸¤Ç¤¹¡£

¤Ä¤Þ¤ê
>dist=sqrt*60000
¢å¡ß60000¡Ê¥ë¡¼¥È³Ý¤±¤ë6Ëü¡ËŪ¤Ê°ÕÌ£ÉÔÌÀ¤Ê½ñ¤­Êý¤Ë¤Ê¤ë¤Î¤Ç¤³¤ì¤Ï°ã¤¤¤Þ¤¹¡£

60000¤ÎÊ¿Êýº¬¤Ï¡Ú244.94897¡Ä¡Ä¡Û¤Ê¤Î¤Ç

dist=sqrt(60000)
dist=244.94897¡Ê°Ê²¼¾Êά¡Ë

¤È¤Ê¤ê¤Þ¤¹¡£



GENKI

¥ê¥ó¥¯

2020/10/1(Thu) 14:44:27|NO.91508

¤Ê¤ë¤Û¤É¡£
¤Þ¤¢¡¢Íî¤ÁÃ夤¤Æ¤¯¤À¤µ¤¤¡£
¾Ç¤Ã¤Æ¤â¶õ²ó¤ê¤¹¤ë¤À¤±¤Ç¤¹¡£
¤Þ¤º¤Ï¡¢¤ªÃã¤Ç¤â°û¤ó¤Ç°ì©¤Ä¤¤¤Æ¤ß¤Æ¤¯¤À¤µ¤¤¡£
¿ç̲»þ´Ö¤Ï­¤ê¤Æ¤Þ¤¹¤«¡©Â­¤ê¤Æ¤Ê¤¤¤Ê¤é¤Þ¤º¿²¤Þ¤·¤ç¤¦¡£»þ´Ö¤¬¤Ê¤¯¤Æ¤â¿²¤Þ¤·¤ç¤¦¡£
¿©»ö¤Ï¤Á¤ã¤ó¤È¼è¤Ã¤Æ¤¤¤Þ¤¹¤«¡©
ÉÔ·ò¹¯¤ÏÉʼÁÉÔÎɤθ¶°ø¤Ë¤Ê¤ê¤Þ¤¹¡£·ò¹¯Âç»ö¡£

Íî¤ÁÃ夤¤¿¤é¤³¤Î¥¹¥ì¤òºÇ½é¤«¤é¤æ¤Ã¤¯¤êÆɤßľ¤·¤Æ¤ß¤Æ¤¯¤À¤µ¤¤¡£
¤½¤¦Æñ¤·¤¤¤³¤È¤Ç¤Ï¤¢¤ê¤Þ¤»¤ó¡£

¤¢¡¢Â®ÆɤϤÀ¤á¤Ç¤¹¤è¡©



GENKI

¥ê¥ó¥¯

2020/10/1(Thu) 22:52:21|NO.91515

¤â¤¦10·î¤Ç¤¹¤«¤éÃæ´Ö¤Î»þ´ü¤Ç¤¹¤Í¡£Áᤤ¤È¤³¤í¤Ï½ª¤ï¤Ã¤Æ¤ë¤È¤³¤í¤â¤¢¤ë¤È»×¤¤¤Þ¤¹¡£
¾Ç¤ëµ¤»ý¤Á¤Ï¤ï¤«¤ê¤Þ¤¹¡£»ä¤â²¼´ü¸åȾ¤ËPC¤¬»à¤ó¤À¤È¤­¤Ï¤É¤¦¤·¤è¤¦¤«¤È»×¤Ã¤¿¤â¤Î¤Ç¤¹¡£

¤µ¤Æ¡¢¥¹¥¯¥ê¥×¥È¤¬¤³¤³¤Þ¤Ç½ñ¤±¤¿Êª¤¬¤¢¤ë¤Ê¤é¡¢¿¿ÌÌÌܤËÀìÇ°¤¹¤ì¤Ð2¡Á3Æü¤¢¤ì¤Ð½½Ê¬¼«Îϲò·è¤Ç¤­¤ëÄøÅÙ¤ÎÌäÂê¤À¤È»×¤¤¤Þ¤¹¡£¡Ê¤È¤Ã¤¯¤ËȾ·î¤¬·Ð²á¤·¤Æ¤¤¤Þ¤¹¤Í¡£¡Ë
¤½¤¦»×¤¦¤Î¤Ç¤¹¤¬¡ÄÃæ³Ø¿ô³Ø¤¬¤ª¤Ü¤Ä¤«¤Ê¤¤¸½¾õ¤ò¸«¤ë¤È¤â¤¦¾¯¤·ÂçÊѤ«¤â¤·¤ì¤Þ¤»¤ó¤Í¡£´èÄ¥¤Ã¤Æ¤¯¤À¤µ¤¤¡£


> dist=sqrt(122500+62500)

¤¢¤é¤ä¤µ¤ó¤Î»ØŦ¤Ë¤¢¤ëÄ̤ꡢ·×»»´Ö°ã¤¨¤Æ¤Þ¤¹¤Í¡£
60000¤Ï¡¢122500-62500 ¤ò¤·¤¿¤Î¤«¤Ê¡©Íî¤ÁÃ夤¤Æ¤¯¤À¤µ¤¤¡£¿¼¸ÆµÛ¤·¤Þ¤·¤ç¤¦¡£


> dist=sqrt*60000

¤Ê¤ë¤Û¤Ésqrt¤òÊÑ¿ô¤À¤È»×¤Ã¤¿¤ï¤±¤Ç¤¹¤Í¡£
¥×¥í¥°¥é¥ß¥ó¥°¤Ç¤Ï°ìÈÌŪ¤Ë¾è»»¤Îµ­¹æ¡Ö*¡×¤Ï¾Êά¤¹¤ë¤³¤È¤¬½ÐÍè¤Þ¤»¤ó¡£¤³¤ì¤â¿ô³Ø¤È¤Ï°ã¤¦ÆÃħ¤Ê¤Î¤ÇÃí°Õ¤¬É¬ÍפǤ¹¤Í¡£

¤¹¤Ç¤Ë¤Í¤³¤µ¤ó¤¬Ä´¤Ù¤é¤ì¤¿¤È¤ª¤ê¡¢sqrt¤ÏÊ¿Êýº¬¤ò·×»»¤¹¤ë¡Ö´Ø¿ô¡×¤Ç¤¹¡£·×»»·ë²Ì¤Î¿ôÃͤϤ³¤ì¤ò¼Â¹Ô¤¹¤ë¤È¤ï¤«¤ê¤ä¤¹¤¤¤È»×¤¤¤Þ¤¹¡£

ex = 50 ey = 50 mx = 400 my = 300 mes (ex-mx) * (ex-mx) mes (ey-my) * (ey-my) mes (ex-mx) * (ex-mx) + (ey-my) * (ey-my) mes sqrt( (ex-mx) * (ex-mx) + (ey-my) * (ey-my) ) dist = sqrt( (ex-mx) * (ex-mx) + (ey-my) * (ey-my) ) mes dist
¼«Ê¬¤ÇÅÅÂî¤òᤤ¤Æ¤ß¤Æ¡¢¿ôÃͤò¸«Èæ¤Ù¤Æ³Îǧ¤·¤Æ¤ß¤Æ¤¯¤À¤µ¤¤¡£
¼«µ¡(400, 300) ¤«¤é Ũ(50, 50) ¤Þ¤Ç¤Îµ÷Î¥ dist ¤Ï 430 ¤È¤Ê¤ê¤Þ¤¹¡£Êý´ã»æ¤Ë¿Þ¤ò½ñ¤¤¤ÆÄ구¤Ç¬¤Ã¤Æ¤ß¤Æ¤¯¤À¤µ¤¤¡£ÂçÂιç¤Ã¤Æ¤ë¤È»×¤¤¤Þ¤¹¡£


¥×¥í¥°¥é¥à¤Ç¤Î¡Ö´Ø¿ô¡×¤Î³µÇ°¤Ë¤Ä¤¤¤Æ¤âÍý²ò¤µ¤ì¤Æ¤¤¤Ê¤¤¤è¤¦¤Ç¤¹¤·¡¢¡ÖÊÑ¿ô¡×¤â²ø¤·¤¤´¶¤¸¤Ê¤Î¤Ç¤³¤Á¤é¤ò½ÏÆɤ¯¤À¤µ¤¤¡£
ºÇÄã¸Â¤Îʸˡ¤Ï¿È¤ËÉÕ¤±¤Ê¤¤¤È¥³¥Ô¥Ú¤Ç¥×¥í¥°¥é¥ß¥ó¥°¤¹¤ë¤Î¤â¸Â³¦¤¬¤¢¤ê¤Þ¤¹¤è¡£¤È¤¤¤¦¤«¡¢¤¹¤Ç¤Ë¸Â³¦¤¬Íè¤Æ¤¤¤Þ¤¹¡£

HSPÆþÌçÊÔ
https://hsp.tv/make/enroll.html

HSP3 ¥×¥í¥°¥é¥ß¥ó¥°¡¦¥Þ¥Ë¥å¥¢¥ë¡¡3.10.´Ø¿ô
http://www.onionsoft.net/hsp/v33/doclib/hspprog.htm#FUNC

HSP3 ¥×¥í¥°¥é¥ß¥ó¥°¡¦¥Þ¥Ë¥å¥¢¥ë¡¡4.4.´Ø¿ô¤ÈÌ¿Îá¤Î°ã¤¤¤Ë¤Ä¤¤¤Æ
http://www.onionsoft.net/hsp/v33/doclib/hspprog.htm#DIFF_FUNC_COMMAND



¾®Ãæ³ØÀ¸¤Ç¤â½¬ÆÀ¤Ç¤­¤Æ¤¤¤ë¸À¸ì¤Ç¤¹¡£Ëܵ¤¤Ë¤Ê¤ì¤ÐÆñ¤·¤¯¤Ï¤Ê¤¤¤Ï¤º¤Ç¤¹¡£



¤Í¤³

¥ê¥ó¥¯

2020/10/2(Fri) 00:30:52|NO.91518

¤¢¤é¤ä¤µ¤ó

²óÅú¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£

·×»»¥ß¥¹¤Ç¡Ü¤ò¡¼¤È¸«´Ö°ã¤¨¤Æ·×»»¤·¤Æ¤·¤Þ¤¤¤Þ¤·¤¿¡£¤¹¤ß¤Þ¤»¤ó¡Ä

sqrt¤Î»È¤¤Êý¤òÀâÌÀ¤·¤Æ¤¯¤À¤µ¤ê¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£
¢å¤òɽ¤·¤Æ¤¤¤ë¤Î¤À¤È¤è¤¦¤ä¤¯Íý²ò¤Ç¤­¤Þ¤·¤¿¡£
¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£



¤Í¤³

¥ê¥ó¥¯

2020/10/2(Fri) 01:15:46|NO.91519

GENKI¤µ¤ó

ÂÎÄ´¤òµ¤¸¯¤Ã¤Æ¤¯¤À¤µ¤êÎÞ¤¬½Ð¤Þ¤¹¡Ä
¿ç̲»þ´Ö¤â¿©À¸³è¤âÌäÂê¤Ê¤¤¤È»×¤¤¤Þ¤¹¡£
ËÜÅö¤Ë¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£
Äó½Ð¤Þ¤Ç»Ä¤ê£±¤«·îȾ¤â¤¢¤ê¤Þ¤»¤ó¤¬Â´¶È¤Ç¤­¤ë¤è¤¦´èÄ¥¤ê¤Þ¤¹¡£


> dist=sqrt(122500+62500)
¤½¤ÎÄ̤ê¤Ç¡¢¡Ü¤È¡¼¤ò¸«´Ö°ã¤¨¤Æ¤·¤Þ¤¤¤Þ¤·¤¿¡£¤¹¤ß¤Þ¤»¤ó¡Ä


> ¼«Ê¬¤ÇÅÅÂî¤òᤤ¤Æ¤ß¤Æ¡¢¿ôÃͤò¸«Èæ¤Ù¤Æ³Îǧ¤·¤Æ¤ß¤Æ¤¯¤À¤µ¤¤¡£
sqrt=¢å¤Ê¤Î¤À¤È¤è¤¦¤ä¤¯Íý²ò¤Ç¤­¤Þ¤·¤¿¡£·×»»¤·¤Æ430¤Ë¤Ê¤ê¤Þ¤·¤¿¡£


GENKI¤µ¤ó¤¬Á÷¤Ã¤Æ¤¯¤À¤µ¤Ã¤¿URL¤ÎÆâÍƤò»þ´Ö¤ò¤«¤±¤Æ¤æ¤Ã¤¯¤êÆɤó¤Ç¥á¥â¤·¤Þ¤·¤¿¡£¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£


¼«µ¡¤ÈŨ¤Îµ÷Î¥¤òɽ¤¹
sqrt( (ex-mx) * (ex-mx) + (ey-my) * (ey-my) ) ¤ò²¼µ­¤Î¡Ö¡×¤Ë¤¤¤ì¤ë¤³¤È¤Ç¤è¤¦¤ä¤¯¤Ç¤­¤¿¤È»×¤Ã¤¿¤Î¤Ç¤¹¤¬¡¢²¿¤¬°ã¤¦¤Î¤Ç¤·¤ç¤¦¤«¡Ä»ä¤Ï¤Þ¤ÀÍý²ò¤¬Â­¤ê¤Ê¤¹¤®¤ë¤Î¤Ç¤·¤ç¤¦¤«¡Ä


if ¡Ö¼«µ¡¤Î°ÌÃÖ ¤È Ũ¤Î°ÌÃÖ ¤È¤Îµ÷Î¥¡× < 100 {
ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹
ey=alien(ey,my) ; Ũ¤ÎYºÂɸ¤òÆ°¤«¤¹
}



GENKI

¥ê¥ó¥¯

2020/10/2(Fri) 23:46:36|NO.91527

> ÂÎÄ´¤òµ¤¸¯¤Ã¤Æ¤¯¤À¤µ¤êÎÞ¤¬½Ð¤Þ¤¹¡Ä

·ò¹¯¤ò·Ú»ë¤·¤Æ¤¤¤Þ¤»¤ó¤«¡©¿´¿È¤È¤â¤Ë·ò¹¯¤Ê¾õÂ֤Ǥʤ¤¾õÂ֤Ǻî¶È¤ò¹Ô¤¨¤Ð¡¢¶È̳¤Ë½ÅÂç¤Ê»³²¤òÍ¿¤¨¤ë¾ì¹ç¤â¤¢¤ê¤Þ¤¹¡£
ÎÞ¤òή¤¹¤¯¤é¤¤¤Ê¤é¼«³Ð¤¬¤ª¤¢¤ê¤À¤È»×¤¦¤Î¤Ç¡¢À®²Ì¤Î¤¿¤á¤ËºÇÄã¸Â¤ÎµÙÍܤò¼è¤ë¤³¤È¤ò¤ª¤¹¤¹¤á¤·¤Þ¤¹¡£
ÂÎÄ´¤òµ¤¸¯¤Ã¤Æ¤¤¤ë¤È¤«¤½¤¦¤¤¤¦ÏäǤϤʤ¯¡¢¿´¿È¤Î·ò¹¯°Ý»ý¤Ï¶È̳¤Î°ì´Ä¤Ç¤¢¤êµÙÍܤϤ½¤Î¼êÃʤΰì¤Ä¤È¤¤¤¦ÏäǤ¹¡£³Ø¶È¤âƱ¤¸¤Ç¤¹¤è¡£·ë²Ì¤Î¤¿¤á¤ËÂÎÄ´´ÉÍý¤·¤Æ¤¯¤À¤µ¤¤¡£


> sqrt( (ex-mx) * (ex-mx) + (ey-my) * (ey-my) ) ¤ò²¼µ­¤Î¡Ö¡×¤Ë¤¤¤ì¤ë¤³¤È¤Ç¤è¤¦¤ä¤¯¤Ç¤­¤¿¤È»×¤Ã¤¿¤Î¤Ç¤¹¤¬¡¢²¿¤¬°ã¤¦¤Î¤Ç¤·¤ç¤¦¤«¡Ä»ä¤Ï¤Þ¤ÀÍý²ò¤¬Â­¤ê¤Ê¤¹¤®¤ë¤Î¤Ç¤·¤ç¤¦¤«¡Ä

¥¹¥¯¥ê¥×¥È¤Ë½ñ¤¤¤Æ¼Â¹Ô¤·¤Æ¤ß¤¿¤Î¤Ç¤¹¤è¤Í¡©
¤É¤ó¤ÊÆ°¤­¤Ë¤Ê¤ê¤Þ¤·¤¿¤«¡©ÀâÌÀ¤â¤Ê¤¤¥¹¥¯¥ê¥×¥È¤â¤Ê¤¤¤Ç¤Ï¸«¤Æ¤¤¤ë²æ¡¹¤È¤·¤Æ¤Ï²¿¤â¤ï¤«¤ê¤Þ¤»¤ó¡£
¼Â¹Ô¤·¤Æ¤ß¤¿¤é¡¢¤É¤ó¤ÊÆ°¤­¤Ë¤Ê¤Ã¤Æ¡¢Æ°¤­¤Î²¿¤ò¸«¤Æ¤É¤¦¤·¤Æ²¿¤«¤¬°ã¤¦¤È»×¤Ã¤¿¤Î¤Ç¤·¤ç¤¦¤«¡©


¥×¥í¥°¥é¥à¤Ë´Ø¤¹¤ë¼ÁÌä¤ò¤¹¤ë¤È¤­¤Ï¡¢¼¡¤Î¤è¤¦¤ÊÆâÍƤò½ñ¤¯¤è¤¦¤Ë¤¹¤ë¤ÈÌäÂê²ò·è¤¬¥¹¥à¡¼¥º¤Ë¹Ô¤¯¤È»×¤¤¤Þ¤¹¡£
¡¦´üÂÔ¤·¤¿Æ°ºî or Æ°¤¤¤Æ¤Û¤·¤¤Æ°ºî
¡¦¼ÂºÝ¤Ë¼«Ê¬¤¬¤ä¤Ã¤¿¤³¤È
¡¦Æ°¤«¤·¤Æ¤ß¤¿·ë²Ì
¡¦´üÂÔ¤·¤¿Æ°ºî¤ÈÆ°¤«¤·¤Æ¤ß¤¿Æ°ºî¤Î°ã¤¤¡Ê¤É¤¦¤¤¤¦¸«Êý¤ò¤·¤¿¤Î¤«¡¢¤É¤¦¤¤¤¦Íýͳ¤Ç°ìÃפ·¤Ê¤¤¤ÈȽÃǤ·¤¿¤Î¤«¡Ë

º£²ó¤Ï¡¢1¤ÄÌܤϤ³¤ì¤Þ¤Ç¤Î¤ä¤ê¼è¤ê¤Ç¤À¤¤¤¿¤¤Ê¬¤«¤Ã¤Æ¤¤¤ë¤Î¤Ç¡¢2¤ÄÌܰʹߤ¬¾ðÊóÉÔ­¤ÇÅú¤¨¤è¤¦¤¬¤¢¤ê¤Þ¤»¤ó¡£



¤Í¤³

¥ê¥ó¥¯

2020/10/3(Sat) 00:25:37|NO.91528

GENKI¤µ¤ó

²óÅú¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£

¿ç̲¤â¿©»ö¤â½½Ê¬¤Ë¼è¤Ã¤Æ¤¤¤ë¤Î¤ÇÌäÂê¤Ê¤¤¤Ç¤¹¡£
ÂÎÄ´´ÉÍý¤Ëµ¤¤òÉÕ¤±¤Æ´ÏÀ¤ò¿Ê¤á¤¿¤¤¤È»×¤¤¤Þ¤¹¡£
¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£

> ¥¹¥¯¥ê¥×¥È¤Ë½ñ¤¤¤Æ¼Â¹Ô¤·¤Æ¤ß¤¿¤Î¤Ç¤¹¤è¤Í¡©¡Ä
¾Ü¤·¤¯ÀâÌÀ¤»¤º¤¹¤ß¤Þ¤»¤ó¤Ç¤·¤¿¡£
²¼µ­¤Î¥×¥í¥°¥é¥à¤Ç¼Â¹Ô¤·¤¿¤Î¤Ç¤¹¤¬¡¢
¡¦ÉáÄ̤ÎÄÉÈø¤Ë¤Ê¤Ã¤Æ¤·¤Þ¤¤¤Þ¤¹¡£»ä¤¬µá¤á¤Æ¤¤¤ë°ìÄê¤Îµ÷Î¥¤Ë¤Ê¤Ã¤¿¤éÄÉÈø¤¹¤ëÆ°ºî¤Ë¤Ï¤Ê¤ê¤Þ¤»¤ó¤Ç¤·¤¿¡£
¡¦¼«µ¡¤Î°ÌÃÖ ¤È Ũ¤Î°ÌÃÖ ¤È¤Îµ÷Î¥¤Î¤È¤³¤í¤Ësqrt( (ex-mx) * (ex-mx) + (ey-my) * (ey-my) ) ¤òÆþ¤ì¤Þ¤·¤¿¡£

if ¡Ö¼«µ¡¤Î°ÌÃÖ ¤È Ũ¤Î°ÌÃÖ ¤È¤Îµ÷Î¥¡× < 100 {
ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹
ey=alien(ey,my) ; Ũ¤ÎYºÂɸ¤òÆ°¤«¤¹
}

¡¦Æ°¤«¤·¤¿·ë²Ì¡¢ÉáÄ̤ÎÄÉÈø¤Ë¤Ê¤Ã¤Æ¤·¤Þ¤¤¤Þ¤¹¡£
¡¦Ã¼¤Èü¤Ë¤¤¤ë¤Ë¤â´Ø¤ï¤é¤º¤º¤Ã¤ÈÄÉÈø¤¹¤ë¤Î¤Ç¡¢µá¤á¤Æ¤¤¤ëÆ°ºî¤Ç¤Ï¤Ê¤¤¤ÈȽÃǤ·¤Þ¤·¤¿¡£


title "Äɤ¤¤«¤±¤ë"
wx=800:wy=600 ; ²èÌÌ¥µ¥¤¥º
screen 0,wx,wy
color 0,200,100:boxf 0,0,800,800


mx=400:my=300 ; ¥×¥ì¥¤¥ä¡¼¤ÎºÂɸ
msp=4 ; ¥×¥ì¥¤¥ä¡¼¤Î°ÜÆ°¥¹¥Ô¡¼¥É
ms=8 ; ¾×ÆÍȽÄê±ß¤ÎȾ·Â
ex=50:ey=50 ; Ũ¤ÎºÂɸ
frame=0


*game1
redraw 0 ; ²èÌ̹¹¿·³«»Ï
color 0,200,100:boxf 0,0,800,800


;¼«µ¡
stick key,%11111 ; ¥­¡¼ÆþÎÏ
;limit p1,p2,p3(°ìÄêÈÏ°ÏÆâ¤ÎÀ°¿ô¤òÊÖ¤¹) ÂоݤȤʤëÃÍ,ºÇ¾®ÃÍ¡¤ºÇÂçÃÍ
;mx=400:my=300 ¥×¥ì¥¤¥ä¡¼¤ÎºÂɸ :msp=4 °ÜÆ°ÎÌ
;wx=800:wy=600 ²èÌÌ¥µ¥¤¥º
if key&1 : mx=limit( mx-msp, 0, wx ) ; º¸°ÜÆ°
if key&4 : mx=limit( mx+msp, 0, wx ) ; ±¦°ÜÆ°
if key&2 : my=limit( my-msp, 0, wy ) ; ¾å°ÜÆ°
if key&8 : my=limit( my+msp, 0, wy ) ; ²¼°ÜÆ°
pos mx-ms,my-ms
color
mes "¼«"



;Ũ
dist=abs(ex-mx)+abs(ey-my) ; Ũ¤È¤Îµ÷Î¥¤ò´Ê°×Ū¤Ëµá¤á¤ë
if dist<(ms*2) : goto *gameover ; ¾×Æͤ·¤Æ¤¤¤¿¤é*gameover¤Ø

;¿·¤·¤¤ºÂɸ=aline(¸½ºß¤ÎºÂɸ,Äɤ¤¤«¤±¤ëºÂɸ)
ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹
ey=alien(ey,my) ; Ũ¤ÎYºÂɸ¤òÆ°¤«¤¹


;Ũ¤È¼«µ¡¤Îµ÷Î¥
;sqrt=¥ë¡¼¥È(Ê¿Êýº¬)ÃͤòÊÖ¤¹
if sqrt( (ex-mx) * (ex-mx) + (ey-my) * (ey-my) ) < 10 {
ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹
ey=alien(ey,my) ; Ũ¤ÎYºÂɸ¤òÆ°¤«¤¹
}else{
ex=ex ;Ũ¤ÎXºÂɸ¤òÆ°¤«¤µ¤Ê¤¤
ey=ey ;Ũ¤ÎYºÂɸ¤òÆ°¤«¤µ¤Ê¤¤
}

;Ũ
gsel 0
pos ex-ms,ey-ms ;50-22,50-22
color 255,255,255:gmode 4,0,0,256 ;²èÁüÇطʤÎÆ©ÌÀ²½
color
mes "Ũ"


redraw 1 ; ²èÌ̹¹¿·½ª¤ï¤ê
await 1000/60 ; 1/60ÉäDzèÌ̤ò¹¹¿·
frame++ ; ¥Õ¥ì¡¼¥à¤ò¿Ê¤á¤ë
goto *game1 ; ·«¤êÊÖ¤¹

*gameover
; ¤Ä¤«¤Þ¤Ã¤¿»þ¤Î½èÍý
font msgothic,120
color 0,0,65:pos 50,50
mes "¤Ä¤«¤Þ¤¨¤¿¡ª"
redraw 1
stop

#defcfunc alien int value, int value2

; Ũ¤¬Äɤ¤¤«¤±¤Æ¤¯¤ë´Ø¿ô
esp=2 ; Ũ¤Î°ÜÆ°¥¹¥Ô¡¼¥É
res=limit( value2-value, -esp, esp )
return value+res



GENKI

¥ê¥ó¥¯

2020/10/3(Sat) 01:03:52|NO.91529

¤Ê¤ë¤Û¤É¡¢¾õ¶·¤¬¤è¤¯¤ï¤«¤ê¤Þ¤·¤¿¡£¤³¤ì¤À¤±¤ï¤«¤ì¤Ð¤¹¤°²óÅú¤Ç¤­¤Þ¤¹¡£

> ¡¦ÉáÄ̤ÎÄÉÈø¤Ë¤Ê¤Ã¤Æ¤·¤Þ¤¤¤Þ¤¹¡£
¤Þ¤º¡¢¾ï¤ËÄÉÈø¤µ¤ì¤Æ¤·¤Þ¤¦ÌäÂê¤Ç¤¹¤¬¡¢¼«µ¡¤ÈŨ¤Î°ÌÃ֤˴ؤï¤é¤º¡¢Å¨¤¬°ÜÆ°¤¹¤ë¤è¤¦¤Ë¥¹¥¯¥ê¥×¥È¤Ë½ñ¤«¤ì¤Æ¤¤¤ë¤Î¤Ç¤½¤ì¤¬¸¶°ø¤Ç¤¹¡£
¼«µ¡¤ÈŨ¤È¤Îµ÷Î¥¤ÇÆ°ºî¤òȽÄꤹ¤ë²Õ½ê¤Î°ì¤Ä¼êÁ°¤Ë;·×¤Êµ­½Ò¤¬¤¢¤ê¤Þ¤¹¡£
¤Ê¤ª¡¢¤³¤ÎÌäÂê¤Ï NO.91503 ¤ÎºÇ½é¤ÎÊý¡Ê2¸Ä¤á¤Î°úÍѤΤ¢¤¿¤ê¡Ë¤Ç»ØŦºÑ¤ß¤Ê¤Î¤Ç¡¢¤É¤³¤ò¾Ã¤¹¤«¤Ï¤½¤Á¤é¤ò»²¾È¤¯¤À¤µ¤¤¡£

> if sqrt( (ex-mx) * (ex-mx) + (ey-my) * (ey-my) ) < 10 {
¥¹¥¯¥ê¥×¥È¤òÇÒ¸«¤·¤Þ¤·¤¿¤¬¡¢¤â¤¦°ì¤ÄÌäÂ꤬¤¢¤ê¤Þ¤·¤¿¡£
10¤¸¤ã¤Ê¤¯¤Æ100¤Ç¤¹¤è¤Í¡£10¤À¤È¶á¤¹¤®¤ÆÄɤ¤¤«¤±¤À¤·¤¿¤éƨ¤²ÀÚ¤ì¤Þ¤»¤ó¡Ä¤È¤¤¤¦¤«Â¿Ê¬¶á¤¹¤®¤Æ¾×ÆÍȽÄê¤ÎÊý¤¬È¿±þ¤¹¤ë¤È»×¤¤¤Þ¤¹¡£¤³¤ì¤Ç¤ÏÀµ¤·¤¯Æ°ºî¤·¤Æ¤¤¤Æ¤âÆ°ºî¤¬³Îǧ¤Ç¤­¤Þ¤»¤ó¡£100¤ä200¤Ê¤ÉŬÅÙ¤ËÂ礭¤ÊÃͤòÀßÄꤷ¤Æ¤¯¤À¤µ¤¤¡£
»î¹Ôºø¸í¤·¤Æ¤¤¤Æ¿ôÃͤòÊѹ¹¤·¤¿¤Þ¤Þ¤¦¤Ã¤«¤ê¸µ¤ËÌ᤹¤Î¤ò˺¤ì¤¿¤Î¤À¤È»×¤¤¤Þ¤¹¡£¤³¤¦¤¤¤¦Ìᤷ˺¤ì¤Ï´Êñ¤ÊÌäÂê¤ò̵ÜÆþ¤ê¤µ¤»¤ë¸¶°ø¤Ë¤Ê¤ê¤Þ¤¹¡£½½Ê¬¤´Ãí°Õ¤¯¤À¤µ¤¤¡£



¤È¤³¤í¤Çº£¹¹¤Ç¤¹¤¬¡¢¤³¤ì¤âÆɤó¤Ç¤ª¤¯¤³¤È¤ò¤ª¤¹¤¹¤á¤·¤Þ¤¹¡£

HSPTV!·Ç¼¨ÈÄ¡¡·Ç¼¨ÈĤλȤ¤Êý¡¡Åê¹Æ»þ¤ÎÃí°Õ
http://hsp.tv/play/pforum.php?mode=about



¤Í¤³

¥ê¥ó¥¯

2020/10/3(Sat) 01:44:14|NO.91530

GENKI¤µ¤ó


> ;¿·¤·¤¤ºÂɸ=aline(¸½ºß¤ÎºÂɸ,Äɤ¤¤«¤±¤ëºÂɸ)
> ex=alien(ex,mx) ; Ũ¤ÎXºÂɸ¤òÆ°¤«¤¹
> ey=alien(ey,my) ; Ũ¤ÎYºÂɸ¤òÆ°¤«¤¹

> ¤³¤ÎÉôʬ¤òifʸ¤ÎÃæ¤Ë°ÜÆ°¤·¤Æ¡¢Å¨¤ÎÆ°¤­Êý¤ò¾ò·ï¤Ë¤è¤Ã¤ÆÀÚ¤êÂؤ¨¤ë¡£¤È¤¤¤¦¤Î¤¬º£²ó¤Î¥Ý¥¤¥ó¥È¤Î°ì¤Ä¤Ç¤¹¡£
¤È¤¤¤¦¤³¤È¤Ç¡¢¤³¤Î3¹Ô¤Ï¤¹¤Ç¤ËifʸÆâ¤Ë°ÜÆ°ºÑ¤ß¤Ê¤Î¤Çºï½ü¤Ç¤¹¡£

¤³¤Î3¹Ô¤òºï½ü¤¹¤ì¤Ð¤è¤«¤Ã¤¿¤Î¤Ç¤¹¤Í¡Ä¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£


> if sqrt( (ex-mx) * (ex-mx) + (ey-my) * (ey-my) ) < 10 {
ľ¤·Ëº¤ì¤Æ¤¤¤Þ¤·¤¿¡£100¤ËÌᤷ¤Þ¤¹¡£¤´»ØŦ¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£


> 7.¼ÁÌä¤Ï¡¢¡Ö¡Á¤Ç¤­¤Þ¤»¤ó¡×¤Î¤è¤¦¤ÊÇùÁ³¤È¤·¤¿ÆâÍƤǤʤ¯¡¢¶ñÂÎŪ¤Ê¾õ¶·¤ò½ñ¤¯¤ÈÊÖÅú¤·¤ä¤¹¤¤¤Ç¤¹¡£
¶ñÂÎŪ¤ÊÀâÌÀ¤ò¤¹¤ë¤è¤¦¿´¤¬¤±¤Þ¤¹¡Ä
¤½¤Î¤Û¤«¤ÎÆâÍƤ⺣¸å¤Î»²¹Í¤Ë¤µ¤»¤Æ¤¤¤¿¤À¤­¤Þ¤¹¡£¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£


¤è¤¦¤ä¤¯µá¤á¤Æ¤¤¤¿Æ°ºî¤¬¤Ç¤­¤Þ¤·¤¿¡Ä¡ª
¤³¤³¤Þ¤ÇĹ¡¹¤È¤ªÉÕ¤­¹ç¤¤¤¤¤¿¤À¤­ËÜÅö¤Ë¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤·¤¿¡£
°ú¤­Â³¤­Â´ÏÀ¤ò¿Ê¤á¤Æ¤¤¤­¤¿¤¤¤È»×¤¤¤Þ¤¹¡£(¤Þ¤¿¥¹¥ì¥Ã¥É¤Ç¤ª¸«¤«¤±¤¹¤ë¤«¤â¤·¤ì¤Þ¤»¤ó¡Ä)
¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤·¤¿¡ª¡ª



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