こう？ while 1 color ,rnd(14) locate rnd(49-3),rnd(29) ? "エラー" wend コンピュータウィルスなんて、かしこくない限り手を出さないほうが無難よ やめときんさい