ご意見の程をよろしくおねがいします
ちなみに東方風のゲームを目指していて
ゲームの途中に会話イベントを入れる
長押しで打ち続けられる
などができたらいいと思っています。
公文は以下のとおりです
screen 0,720,480 #define winx 60 #define winy 60 #define mm 8 ;間隔 ? f #define xcls0 color 0, 0, 0 : boxf 0, 0, winx * mm , winy * mm #define xcls1 color 0, 30, 50 : boxf winx * mm, 0 : bul=10 xcls0 : xcls1 : dim bulx,bul : dim buly,bul *reset plx=220 : ply=440 *kihonsousa repeat redraw 0 xcls0 color 0,0,0 : xcls0 : xcls1 color 0,255,00 : pos plx,ply : gmode 4,,,255 : celput 1 redraw 1 await gosub *key_input gosub *tama_m loop *key_input getkey migi,39 getkey hidari,37 getkey ue,38 getkey shita,40 /*if hidari=1 : plx=plx-2 : if plx<0 : plx=0 if migi=1 : plx=plx+2 : if plx>445 : plx=445 if shita=1 : ply=ply+2 : if ply>435 : ply=435 if ue=1 : ply=ply-2 : if ply<0 : ply=0*/ if shita=1 { if shitacnt\10=0 : ply+2 : if ply>435 : ply=435 ;shitacnt+1 };if shita=0 : shitacnt=0 if ue=1 { if uecnt\10=0 : ply-2 : if ply<0 : ply=0 ;uecnt+1 };if ue=0 : uecnt=0 if migi=1 { if migicnt\10=0 : plx+2 : if plx>445 : plx=445 ;migicnt+1 };if migi=0 : migicnt=0 if hidari=1 { if hidaricnt\10=0 : plx-2 : if plx<0 : plx=0 ;hidaricnt+1 };if hidari=0 : hidaricnt=0 getkey return *tama_m getkey tori,90 return