¡¡¸½¾õ¤Ç¡¢newmodÌ¿Îá¡¢¥â¥¸¥å¡¼¥ëÊÑ¿ô¤Ï¡¢android¤äwebgl¤Ç¤Ï¥µ¥Ý¡¼¥È¤µ¤ì¤Æ¤¤¤Ê¤¤¤è¤¦¤Ç¤¹¡£
¡¡ÉáÃʤÏwindows¥á¥¤¥ó¤Ê¤Î¤Ç¡¢ÌäÂê¤Ê¤¤¤Î¤Ç¤¹¤¬¡¢ÃΤê¹ç¤¤¤«¤é·ÈÂÓÈǤäwebÈǤÏ̵¤¤¤Î¤«¤È¸À¤ï¤ì¡¢ÀÛºî¤Î°Ü¿¢¤äº£¸å¤ÎÂбþ¤ò¹Í¤¨¤Æ¤¤¤Þ¤¹¡£
¡¡ÇÛÎó¤Ë¤è¤ë¥²¡¼¥à¥¥ã¥é¥¯¥¿¡¼¤Î´ÉÍý¤Ï¡¢º£¤Î»ä¤Ë¤Ï¸Â³¦¤¬¤¢¤ê¡¢¥â¥¸¥å¡¼¥ëÊÑ¿ô¤ò»È¤Ã¤¿¥â¥¸¥å¡¼¥ë·¿ÊÑ¿ô¤ò¥¯¥é¥¹¤Î¥¤¥ó¥¹¥¿¥ó¥¹¤Î¤è¤¦¤Ë°·¤Ã¤Æ¤¤¤Þ¤¹¡£
¡¡³§¤µ¤ó¤Ï¡¢¤³¤¦¤¤¤Ã¤¿Â¿¿ô¤ÎÇÛÎóÊÑ¿ô¤ä¡¢¥¯¥é¥¹¥á¥½¥Ã¥É¤ò¤É¤Î¤è¤¦¤Ë´ÉÍý¤·¤Æ¤¤¤ë¤Î¤Ç¤·¤ç¤¦¤«¡£¡£
°Ê²¼¤Ï¡¢ÉáÃÊ¤Î¥×¥í¥°¥é¥à¹½Â¤¤Î¥Æ¥ó¥×¥ì¡¼¥È¤Î¤è¤¦¤Ê¤â¤Î¤Ç¤¹¡£
¡¡¸Ä¿ÍŪ¤Ë¤ÏÈó¾ï¤Ë»È¤¤¾¡¼ê¤¬Îɤ¤¤È¹Í¤¨¤Æ¤ª¤ê¡¢android³«È¯¤Ë¤â»È¤¤¤¿¤¤¤Ç¤¹¤¬¡¢
¡¡¤ä¤Ï¤êÆñ¤·¤¤¤Ç¤·¤ç¤¦¤«¡£²¿¤«ÂåÂØŪ¤Êµ½ÒÊýË¡¤¬¤¢¤ì¤ÐÃΤꤿ¤¤¤Ç¤¹¡£
¡¡¤¤¤í¤¤¤íƬ¤ò¤Ò¤Í¤Ã¤¿¤Î¤Ç¤¹¤¬¡¢¤¦¤Þ¤¯¤Ç¤¤Þ¤»¤ó¤Ç¤·¤¿¡£
¡¡
;===¥â¥¸¥å¡¼¥ëA=== ;¥â¥¸¥å¡¼¥ëÊÑ¿ô¤òÄêµÁ #module mod_A m_id ;¥â¥¸¥å¡¼¥ëÁ´ÂΤνé´ü²½½èÍýÍÑ=== #deffunc local class_init return ;==¥â¥¸¥å¡¼¥ëÊÑ¿ô½é´ü²½½èÍý=== #modinit m_id=getModuleID(thismod) return m_id ;==¥ë¡¼¥×½èÍýÍѥᥤ¥ó=== #modfunc local update color:pos 0,50+(15*m_id):mes "»ä¤Ï¥â¥¸¥å¡¼¥ëA("+m_id+")" logmes m_id return #global ;===¥â¥¸¥å¡¼¥ëB=== ;¥â¥¸¥å¡¼¥ëÊÑ¿ô¤òÄêµÁ #module mod_B m_id ;¥â¥¸¥å¡¼¥ëÁ´ÂΤνé´ü²½½èÍýÍÑ=== #deffunc local class_init return ;==¥â¥¸¥å¡¼¥ëÊÑ¿ô½é´ü²½½èÍý=== #modinit m_id=getModuleID(thismod) return m_id ;==¥ë¡¼¥×½èÍýÍѥᥤ¥ó=== #modfunc local update color:pos 0,100+15*m_id:mes "»ä¤Ï¥â¥¸¥å¡¼¥ëB("+m_id+")" logmes m_id return #global ;---------------------------------------------- ;¥â¥¸¥å¡¼¥ë¤Î½é´ü²½½èÍý ;³Æ¥â¥¸¥å¡¼¥ëÁ´ÂΤǻÈÍѤ¹¤ëÊÑ¿ô¤ò½àÈ÷¤·¤¿¤ê¡¢²èÁü¤òÆɤ߹þ¤ó¤À¤ê¤¹¤ë class_init@mod_A class_init@mod_B ;¥â¥¸¥å¡¼¥ë·¿ÊÑ¿ô¤Î½àÈ÷ dimtype var_A,5 dimtype var_B,5 ;¥â¥¸¥å¡¼¥ë¤Î¿·µ¬Äɲà newmod var_A,mod_A newmod var_A,mod_A newmod var_B,mod_B newmod var_B,mod_B newmod var_B,mod_B *main redraw 0 ;Åо쥥ã¥é¥¯¥¿¡¼¤Îupdate¹¹¿·¤ò¤³¤³¤Ë½¸Ìó¤·¤Þ¤¹ ;¥×¥í¥°¥é¥à¤¬¤¹¤´¤¯µ¡Ç½Ê̤ˤ¹¤Ã¤¤ê¤·¡¢ ;µ¡Ç½¤ä¥¥ã¥é¥¯¥¿¡¼¤ÎÄɲ䬤ä¤ê¤ä¤¹¤¤¤Ç¤¹¡Ê¸Ä¿Í¤Î´¶ÁÛ¡Ë foreach var_A:update@mod_A var_A(cnt):loop foreach var_B:update@mod_B var_B(cnt):loop redraw 1 await 1000/60 goto *main ;============================================================ ;ÇÛÎócntÈÖ¹æ¼èÆÀ¥â¥¸¥å¡¼¥ë¡Ê¤ªÌó«¡Ë ;============================================================ #module #defcfunc getModuleID var In_module, local Out_ID mref Out_ID, 1 return Out_ID #global ¡¡