プチコン 非公式コミュニティ
プレイ日記
こういち
◆ou0jbJnEJ0Kb
2019/3/17 21:54 ネタバレ
2019/3/17 21:54 ネタバレ
VAR VX=100,VY=1
VAR R=100,X=200,Y=120
VAR LX=R,LY=0
VAR DLX,DLY
VAR DIST=SQR(VX*VX+VY*VY)
VX=VX/DIST
VY=VY/DIST
REPEAT
WAIT 1
DLX=LX
DLY=LY
LX=DLX*VX-DLY*VY
LY=DLX*VY+DLY*VX
GLINE X+LX,Y-LY,X+DLX,Y-DLY
UNTIL R-LX<R/1E5
VAR R=100,X=200,Y=120
VAR LX=R,LY=0
VAR DLX,DLY
VAR DIST=SQR(VX*VX+VY*VY)
VX=VX/DIST
VY=VY/DIST
REPEAT
WAIT 1
DLX=LX
DLY=LY
LX=DLX*VX-DLY*VY
LY=DLX*VY+DLY*VX
GLINE X+LX,Y-LY,X+DLX,Y-DLY
UNTIL R-LX<R/1E5
コメント
こういち
2019/3/17 21:58
◆ou0jbJnEJ0Kb
二行目を
VAR R=100,X=200,Y=120
6,7行目を
VX=VX/DISt*1.0005
VY=VY/DIST*1.0005
15行目を
UNTIL ABS(VX)>=X||ABS(VY)>=Y
に変えると面白いよ。
VAR R=100,X=200,Y=120
6,7行目を
VX=VX/DISt*1.0005
VY=VY/DIST*1.0005
15行目を
UNTIL ABS(VX)>=X||ABS(VY)>=Y
に変えると面白いよ。
こういち
2019/3/18 8:58
◆ou0jbJnEJ0Kb
VY=VY/DIST*1.00307
にするといい感じの螺旋が描ける。
コメントを書く
- こちらは「プチコン3号」「プチコンBIG」など、プチコンシリーズに関する話題を扱ったコミュニティです
- プチコンシリーズにまったく関係ない書き込みはご遠慮下さい。削除の対象となります
- こちらにはその他のゲームや雑談のコミュニティはなく、作る予定もありません (ひとりで管理できないため)。ごめんなさい
- ユーザー登録なしで書き込みができます
- 秘密の合い言葉は成りすましの防止 (トリップ機能)、書き込みの編集時の本人認証に使用します
- 秘密の合い言葉に他人に推測されやすい言葉、他サービスと同じパスワードは入力しないでください。
- 書き込むと、投稿時に入力したお名前と秘密の暗号が記憶され、ログイン状態になります