08
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
<< >>

スポンサーサイト

--.--.-- *--
上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

hspでRPG風歩行 ver1.01

2012.03.03 *Sat
ソースの前に。

ふわぁぁぁぁ風神録exスコア7億9900万超えたよぉぉw
もう少しで8億だったのにっ><;
てか諏訪大戦でピチュらなかったらノーミス+スペカ全取得で10億は堅かったのにぃぃ><;
風神録exハイスコア

めっちゃ悔しいです。


RPG風歩行 ver1.01 exe
昨日載せたのは実行してもらったらわかるんだけど、わりと挙動不審だったので、修正しました。
これで変なところがなければRPG風歩行プログラム完成ですね。
下ソースです。

・ -+-+-+- ・


title "RPG歩行サンプル ver1.01" ;タイトルはRPG歩行サンプル

screen 0,640,480 ;スクリーンサイズは横640*480

//変数ゾーン

x = 0 : y = 0 ;キャラの位置用の数値
workx = 0 ;キャラの左右移動のスイッチ
worky = 0 ;キャラの上下移動のスイッチ

pos x,y ;x,yのポジションに
mes "■■" ;■■を書く
mes "■■" ;改行して■■を書く。

repeat

//変数ゾーン

getkey left,37 ;←キーの変数はleft
getkey up,38 ;↑キーの変数はup
getkey right,39 ;→キーの変数はright
getkey down,40 ;下キーの変数はdown


//こっから命令ゾーン

pos 570,460
mes "ver1.01" ;ver1.01。右下に描いてるの。この文字を消すときはこの2行を消す。



color 255,255,255 : boxf x,y,x + 33,y + 33 ;白でキャラを塗りつぶす
color 0,0,0 ;ここから黒で描画


if(left = 1 && x \ 32 < 3 || left = 1 && y \ 32 < 3 && x \ 32 < 3 ){ ;←キーを1回押し、且つxを32で割って余りが5以下、または←キーを1回押し、且つyを32で割って余りが5以下且つxを32で割って余りが5以下の時
workx = 1 ;workxを1(左のスイッチをON)にする。
}

if(up = 1 && y \ 32 < 3 || up = 1 && x \ 32 < 3 && y \ 32 < 3 ){ ;↑キーを1回押し、且つxを32で割って余りが5以下、または↑キーを1回押し、且つyを32で割って余りが5以下且つxを32で割って余りが5以下の時
worky = 1 ;workyを1(上のスイッチをON)にする。
}

if(right = 1 && x \ 32 < 3 || right = 1 && y \ 32 < 3 && x \ 32 < 3 ){ ;→キーを1回押し、且つxを32で割って余りが5以下、または→キーを1回押し、且つyを32で割って余りが5以下且つxを32で割って余りが5以下の時
workx = 2 ;workxを2(右のスイッチをON)にする。
}

if(down = 1 && y \ 32 < 3 || down = 1 && x \ 32 < 3 && y \ 32 < 3 ){ ;↓キーを1回押し、且つxを32で割って余りが5以下、または↓キーを1回押し、且つyを32で割って余りが5以下且つxを32で割って余りが5以下の時
worky = 2 ;workyを2(下のスイッチをON)にする。
}


if (workx = 1 && x > 0){ ;workxが1(左のスイッチがON)で、且つxの座標が0より大きい数であれば
x = x - 1 ;変数xに入れられた数に1を引く。
}

if (worky = 1 && y > 0){ ;workyが1(上のスイッチがON)で、且つyの座標がより0大きい数であれば
y = y - 1 ;変数yに入れられた数に1を引く。
}

if (workx = 2 && x < 608){ ;workxが2(右のスイッチがON)で、且つxの座標が448より小さい数であれば
x = x + 1 ;変数xに入れられた数に1を足す。
}

if (worky = 2 && y < 448){ ;workyが2(下のスイッチがON)で、且つyの座標が448より小さい数であれば
y = y + 1 ;変数yに入れられた数に1を足す。
}

if (x \ 32 = 0){ ;xを32で割った余りが0の場合
workx = 0 ;workxの変数を0にする
}

if (y \ 32 = 0){ ;yを32で割った余りが0の場合
worky = 0 ;workyの変数を0にする
}

pos x,y ;x,yのポジションに
mes "■■" ;■■を書く
mes "■■" ;改行して■■を書く。

wait 1 ;0,01秒待つ
;wait処理がないとフリーズ。

loop ;repeatに戻る

・ -+-+-+- ・


プログラミングってやってると楽しくて完成した後の達成感もすごいんだけど、疲労と脱力感もすごくって、完成後の無気力状態になるのって、ぼくだけかなぁ。。。
スポンサーサイト
| 日記 |

COMMENT

Comment Form


秘密にする
 

TRACKBACK

TrackBack List


*Links*



*Profile*

梗霧

Author:梗霧
へたれ絵師にして東方へたれシューター。
そしてケモナーな人の気まぐれなブログです。


HARD
針巫女・レザマリでクリアー


LUNATIC
咲夜(幻)でクリアー
HARD
霊夢・咲夜でクリアー
NORMAL
全機体でクリアー
EXTRA
全機体でクリアー
PHANTASM
咲夜(幻)でクリアー


LUNATIC
ゆかれいむでクリアー
HARD
ゆかれいむ・ゆゆみょんでクリアー
NORMAL
魔理沙単体でクリアー
EASY
全機体でクリアー
EXTRA
ゆかれいむ・さくレミ・紫単体でクリアー


LUNATIC
針巫女でクリアー
HARD
ホーミング・針巫女・妖怪バスター・レザマリでクリアー
NORMAL
全機体でクリアー
EXTRA
全機体でクリアー


LUNATIC
紫でクリアー
HARD
紫・萃香・文・にとりでクリアー
NORMAL
全機体でクリアー
EXTRA
紫でクリアー


HARD
霊夢A・Bでクリアー
NORMAL
全機体でクリアー
EXTRA
レザマリでクリアー


HARD
霊夢でクリアー
NORMAL
全機体でクリアー
EXTRA
全機体でクリアー


4までは何とか。
5から苦戦。


なんだかなぁ。



*Counter*



*Blog Fliends Petition Form*

この人とブロともになる



*Blog Fliends Gallary*


REVERIE!!

ぐりーんマジック

あやた絵日記

闇夜に煌めく月

標準装備で。

《 AMBIVALENCE 》

YeeJin Hou

My Heart Is In Your Heart

紅き雲 ~Crimson Cloud~

うなぎにレインボー!!

大阪の元工房が弐寺、BMS、DDR、麻雀、艦これ、WoTで地道に高みを目指すblog

変化系フリーダムちょう

昔話の詠う茶屋

オオカミしゃんの・・・

りんご飴

妖精さんのありふれた生存状況Plus

蒼い疾風~Blue Gale~

らが屋

あーと ふる LIFE!!!

オンラインの汐っぽいあれこれ

Wind Diary

白い華の咲く夜に。

This is the one

香月のLove☆HOLiC

徒然なるままに ~適当に行こう~

おもに、東方とか雑記だよう。

T-坊!の変化したい!

黒猫の昼休み



*Mair Form*

名前:
メール:
件名:
本文:



*wreathclock*



*Month Archive*



*Search Form*



*Category*

未分類 (19)
絵の更新状況 (68)
日記 (93)
ちょっとした報告 (31)
東方転変人 (2)
東方リプレイ報告 (5)
リンク (6)
バトン (30)
パソコン (1)
バトンを作ってみた (3)
相互リンク絵 (1)
絵・音楽・日記 (21)
音楽 (1)
日記・音楽 (7)
日記・絵 (135)
リプレイ (1)
About (1)
TOP (1)
sai描画ファイル配布 (2)
ぬいぐるみ化SS (1)
メラニー法(?) (0)
生存報告 (0)



*Access Ranking*

[ジャンルランキング]
ブログ
8776位
アクセスランキングを見る>>

[サブジャンルランキング]
イラストブログ
530位
アクセスランキングを見る>>



*Pika_Mouse*

powered by
3ET



色合わせ(高難易度)

presented by
とあるゲーマーの手抜日記



*@games*



*げん玉*

ポイントを貯めて換金するサイトです。 支援!!



Copyright © 駆け出しネット住民のごく平凡な日常話 All Rights Reserved.
テンプレート配布者: サリイ   素材: Bee  ・・・ 
上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。