[過去ﾛｸﾞ] ズブの初心者がゲーム作れるまで勉強するスレ (990ﾚｽ)
上下前次1-新
抽出解除 必死ﾁｪｯｶｰ(本家) (べ) 自ID ﾚｽ栞 あぼーん
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡
436: 432 [sage] 04/04/10 09:23 ID:J1HEKCQ/(1/4) AAS
登れるようにはできると思いますが・・・自信ありません。
screen 0,256,224,1,dispx/2-125,dispy/2-112
buffer 2,200,200,1;バッファー
picload ".bmp"
gsel 0,1
title "ジャンプ付きマリオ"
carapos=20;キャラクタの位置(x座標)
caramuki=0;キャラクタの向いている方向、0が右、1が左
jumpryou=0
zimen=200;地面の高さ。
repeat
redraw 0
stick k,47
color 255,255,255:boxf 0,0,winx,winy
color 0,0,0:line 0,200,winx,200
gosub *jump
gosub *walk
gosub *mario;マリオを描写する。
redraw 1
await 16
loop
*mario
if kasoku=0:caraani=0
if jumpryou!0:caraani=5
pos carapos,zimen-16:gmode 2,16,16:gcopy 2,caraani*16,caramuki*16,16,16
return
437: 432 [sage] 04/04/10 09:26 ID:J1HEKCQ/(2/4) AAS
*walk
walkchk+=1
if walkchk<2:return;ジャンプと同じ速さで移動すると速くなりすぎるから、
walkchk=0;2回に1回しか書き換えたりしないようにする。
kasoku3+=1;ボタンを押した後何回書き換えたか。
if kasoku3\2=0{
if (k=0)|(k=5):{
carabreak=0
kasoku3=0
if kasoku<0:kasoku+=1
if kasoku>0:kasoku-=1
}
if k&4:{
carabreak=0
if jumpryou=0:caramuki=0
if kasoku<0:caraani=4:carabreak=1
if kasoku<6:kasoku+=1:
}
if k&1{
carabreak=0
if jumpryou=0:caramuki=1
if kasoku>0:caraani=4:carabreak=1
if kasoku>-6:kasoku-=1
}
if (kasoku!0)&(carabreak=0){
caraani+=1
if caraani>=4:caraani=1
}
}
kasoku2=kasoku/2;移動量の推移を2回に1回にする。（１，１，２，２、３，３というように）
carapos+=kasoku2
return
438: 432 [sage] 04/04/10 09:32 ID:J1HEKCQ/(3/4) AAS
*jump
if k&32{
if (jumpryou=0)&(jumpstop=0):jumpstop=1
}else{
if (jumpryou=0)&(jumpstop!1):jumpstop=0
if (jumpstop=1)&(jumpryou>=30):jumpstop=3
}
if jumpstop>=3:jumpstop+=1:goto *jump↑↓
if (jumpstop=2):goto *jump↓
if jumpstop=0:return
goto *jump↑
*jump↑
if jumpryou<=19:jumpkasoku=4:goto *jump↑2
if jumpryou<=40:jumpkasoku=3:goto *jump↑2
if jumpryou<=58:jumpkasoku=2:goto *jump↑2
if jumpryou<=65:jumpkasoku=1:goto *jump↑2
if jumpryou>=67:jumpkasoku=0:jumpstop=2
*jump↑2
if jumpryou=51:jumpkasoku=4
if jumpryou=16:jumpkasoku=3
if jumpryou=38:jumpkasoku=2
if jumpryou=57:jumpkasoku=1
;title ""+jumpstop+" "+jumpryou+" "
jumpryou+=jumpkasoku
zimen-=jumpkasoku
return
439: 432 [sage] 04/04/10 09:41 ID:J1HEKCQ/(4/4) AAS
*jump↓
if jumpryou>=62:jumpkasoku=1:goto *jump↓2
if jumpryou>=51:jumpkasoku=3:goto *jump↓2
if jumpryou>=4:jumpkasoku=4:goto *jump↓2
*jump↓2
if jumpryou=62:jumpkasoku=2
if jumpryou=51:jumpkasoku=4
if jumpryou=47:jumpkasoku=5
if jumpryou=22:jumpkasoku=5
if jumpryou<=5:jumpkasoku=jumpryou
jumpryou-=jumpkasoku
zimen+=jumpkasoku
return
*jump↑↓
if jumpstop<=4:jumpryou+=1:zimen-=1
if jumpstop>66(3): 名無しさん＠お腹いっぱい。 [] 01/11/07 20:34 ID:ClGYxpg6(1/2) AAS
とりあえずコンパイラをダウンロードしてゲームを打ち込みたいと思うのですが
何か初心者にお勧めなソースはありませんか？
:jumpryou-=1:zimen+=1
if jumpstop=9:jumpstop=2
return このプログラムで逝こうかと思ってるのですが。
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.033s