> > じゃあ貴殿何か作ってくれよ(´ー`) > 10 CLS 3 > 20 DIR_X=-1:X=20 > 30 DIR_Y=1:Y=25 > 40 CIRCLE(X,Y),20,2:CIRCLE(X,Y),1,ABS(X) MOD 16 > 50 IF X<1 OR X>640 THEN DIR_X=DIR_X*-1 > 60 IF Y<1 OR Y>400 THEN DIR_Y=DIR_Y*-1 > 70 CIRCLE(X,Y),20,0 > 80 X=X+RND(10)*DIR_X > 90 Y=Y+RND(10)*DIR_Y > 100 GOTO 40 > 貴殿のをちょっとだけいじったよ、軌跡が表示されて酔っ払った動きをするよ これどうやって貼り付ければいいの? さっきのBASICはファイルが独自形式でよくわからん 参考:2004/07/20(火)04時10分05秒