知識も無し。他言語の経験も無し。金も無し。
あるのは時間とやる気だけのヒッキーな漏れが、
HSPで戦略シミュレーションを作ろうと思う。
漏れの進行度に合わせて、
おまいらが具体的な課題を出して欲しい。
ググる。それで分からなければココで質問する。
課題をうpする。間違っていたら改良してうpする。
HSPの知識はテキストを表示させるところまで。
宜しく頼む。
まとめページ
ttp://www.geocities.jp/ttanihata/index.html
じゃあまず適当な入門講座で基礎を一通り覚えて来い。
話はそれからだ。
2ゲット。
いくらまとめサイトを作れば、何でもスレ立てしていいというもんじゃないぞ。
修正
いくらなんでもまとめサイトさえ作れば、何でもスレ立てしていいというもんじゃないぞ。
>>2 基礎って何だ?
覚えてきた証拠にどんなものをうpすればいいんだ?
具体的に頼む。
どうせ一月もしないうちに1が飽きて終了
「今日は
>>6にいじめられた。」
と出力するプログラム作ってこい。
;「今日は
>>6にいじめられた。」と出力するプログラム作ってこい。
mes "「今日は
>>6にいじめられた。」"
wait 300
mes "欝だ死のう"
stop
とりあえずソース晒し。死んでたまるか。
ええと、
戦略SLGが三国志や信長の野望みたいなやつで、
戦術SLGがファイアーエムブレムやタクティクスオウガのようなやつだっけ。
>>9 えーと。あれだ。
何も考えずに「戦略」と言っていた。
漏れが目指してるのはファーアーエムブレムとかタクティクスオウガみたいなもの。
三国志や信長はどうも好きになれん。
12 :
名前は開発中のものです。:04/12/21 20:31:16 ID:ElF7yBuU
>>10 課題:
戦術と作戦と戦略の違いを300文字程度にまとめて、それを20文字1行で1行づつ表示し、Enterを押すたびに次の行が表示されるようなアプリを作れ
>>5 戦略SLGをうぷすれば過程がどうであろうと大概丸く収まる。
目標物こそが最も有効な証拠。
課題とかやらないで、いきなりゲーム作りに突っ込んで挫折するのも得られるものがあってGOOD。
まあ、がんばってください。
>>12 試しに作ってみた。
途中までしか出来てないが頼む。
;Enterを押すたびに次の行が表示されるようなアプリを作れ
font"MS ゴシック",20,1
mes"戦略と戦術の違い"
*kadai1
getkey enter,13
if enter=1 : goto *kadai2
wait 1
goto *kadai1
*kadai2
font"MS ゴシック",15
mes"戦略とは"
*kadai3
getkey key,13
if key=1 : goto *kadai4
wait 1
goto *kadai3
*kadai4
font"MS ゴシック",12
mes"なんちゃらかんちゃら"
stop
kadai1でenterを押すと
"戦略とは"と"なんちゃらかんちゃら"が一気に表示されてしまうわけだが。
おまいら何でですか?
>>15 ;Enterを押すたびに次の行が表示されるようなアプリを作れ
font"MS ゴシック",20,1
mes"戦略と戦術の違い"
*kadai1
stick key
if key&32 : goto *kadai2
wait 1
goto *kadai1
*kadai2
font"MS ゴシック",15
mes"戦略とは"
*kadai3
stick key
if key&32 : goto *kadai4
wait 1
goto *kadai3
*kadai4
font"MS ゴシック",12
mes"長期的・全体的展望に立った闘争の準備・計画・運用の方法。"
*kadai5
stick key
if key&32 : goto *kadai6
wait 1
goto *kadai5
*kadai6
font"MS ゴシック",12
mes"戦略の具体的遂行である戦術とは区別される。"
stop
なんとなく理解できたような希ガス。
だがもっとスマートにはできんのだろうか。
;Enterを押すたびに次の行が表示されるようなアプリを作れ
;短くしたけどもっと効率の良い方法は無いかな?
flg = 0
font"MS ゴシック",20,1
mes"戦略と戦術の違い"
repeat
stick key
if key = 32 {
if flg = 2 : font"MS ゴシック",12 : mes"戦略の具体的遂行である戦術とは区別される。" : flg = 3
if flg = 1 : font"MS ゴシック",12 : mes"長期的・全体的展望に立った闘争の準備・計画・運用の方法。" : flg = 2
if flg = 0 : font"MS ゴシック",15 : mes"戦略とは" : flg = 1
}
wait 1
loop
>>17 激しくthx。自分のがどれだけ稚拙な造りか分かったよ。
;enterを押すたびに次の行が表示されるようなアプリを作れ
;短くしたけどもっと効率の良い方法は無いかな?
flg = 0
font"MS ゴシック",20,1
mes"戦略と戦術の違い"
repeat
stick key
if key = 32 {
if flg = 2 : font"MS ゴシック",12 : mes"戦略の具体的遂行である戦術とは区別される。" : flg = 3 : if flg=3 : break
if flg = 1 : font"MS ゴシック",12 : mes"長期的・全体的展望に立った闘争の準備・計画・運用の方法。" : flg = 2
if flg = 0 : font"MS ゴシック",15 : mes"戦略とは" : flg = 1
}
wait 1
loop
repeat
stick key
if key = 32 {
if flg = 5 : font"MS ゴシック",12 : mes"(2)一定の目的を達成するためにとられる手段・方法" : flg = 6
if flg = 4 : font"MS ゴシック",12 : mes"(1)個々の具体的な戦闘における戦闘力の使用法。普通、長期・広範の展望をもつ戦略の下位に属する。" : flg = 5
if flg = 3 : font"MS ゴシック",15 : mes"戦術とは" : flg = 4
}
wait 1
loop
こんな感じだろうか。
19 :
17:04/12/22 20:46:33 ID:HJ48VNnJ
;note系命令で文の追加が簡単に?
flg = 0 : max = 0 : index = 0
sdim message,1024
message={"
・戦略とは
長期的・全体的展望に立った闘争の準備・計画・運用の方法。
戦略の具体的遂行である戦術とは区別される。\n
・戦術とは
(1)個々の具体的な戦闘における戦闘力の使用法。普通、長期・広範の展望をもつ戦略の下位に属する。
(2)一定の目的を達成するためにとられる手段・方法
"}
notesel message : notemax max
font"MS ゴシック",20,1 : mes"戦略と戦術の違い"
font"MS ゴシック",12
repeat
stick key
if key = 32 : if index!max : noteget add,index : mes add : index++
wait 1
loop
20 :
ヒッキー ◆ZbgFtxog9g :04/12/23 08:51:05 ID:t4atCt0S
>>19 うほっ。配列変数とかわけわかんね。
一応調べてみるが、どこがどうなってるか解説してくれんだろうか。
>>20 解説付けたけど読みにくいしワケワカランかも(;´Д`)
//変数の値を設定しておく。0だから別にいらないけどね。変数の意味は
//flg=使ってない。消すの忘れた○| ̄|_ max=文字列の行数を入れる変数。index=現在の行番号を入れる変数。
flg = 0 : max = 0 : index = 0
//オーバーフロウするので1024だけ確保。配列1つなのでalloc message,1024でもいいけどsdim使う癖をつけた方がイイと思う。
sdim message,1024
//変数messageに複数行の文字列を突っ込む。{"から"}で囲むと複数行出来るって覚えとくと便利。
message={"
・戦略とは
長期的・全体的展望に立った闘争の準備・計画・運用の方法。
戦略の具体的遂行である戦術とは区別される。\n
・戦術とは
(1)個々の具体的な戦闘における戦闘力の使用法。普通、長期・広範の展望をもつ戦略の下位に属する。
(2)一定の目的を達成するためにとられる手段・方法
"}
//noteselでメモリノートパッド命令を使う変数に指定してnotemaxで行数を調べる。HSP3.0だとmax=noteinfo(0)
notesel message : notemax max
font"MS ゴシック",20,1 : mes"戦略と戦術の違い"
font"MS ゴシック",12
//repeat-loop間を無限ループ
repeat
stick key
//Enterキーonで、indexとmaxの値が違う場合に、変数addに行indexの文字列を突っ込む。変数addを出力し、indexに+1
//indexがmaxと同じ値になるということは最後の行まで出力したことになる。
//index++はindex+1と同じ意味。確か++の方が高速だったとか。気にする事ではないのでどっちでもいい。
if key = 32 : if index!max : noteget add,index : mes add : index++
wait 1
loop
変数messageに文を適当に足してもEnterで出力出来るのでおk。
bloadとかで突っ込むなどの応用も効く。
Enterを押すたびに次の行が表示されるようなアプリの完成。
どうよ
>>12
>>21 Thx!!
とりあえずnote系の命令についてもう少し勉強してくるよ。
こういう物を見るとショート作品てのは
かなり難しい物だと実感するよ。
24 :
ブレイクアウト:04/12/23 12:40:31 ID:CmhsfGG2
オイおまいら!俺にも教えてください!
if at<0 mes "ノーダメージ" : goto *sentou
計算式でエラーが出るんだがどうスレばいいデすか?
>>24 if at<0 : mes "ノーダメージ" : goto *sentou
ifの次に:入れて命令してね。
0未満はノーダメージ
at<0
0以下はノーダメージ
at<=0
27 :
ブレイクアウト:04/12/23 14:12:51 ID:CmhsfGG2
>>25,26
ありがとう!
おまいらイイヤシだなぁ。
課題
画像表示してキー入力で動かす。
ヒッキーガンガレ。
>>28 今日と明日と用事があって出かける。
決して逃げるわけでは無いから宜しく。
ヒッキーが外に出るのか?という突っ込みは無しで。
クリスマスぐらいは外へ出るんだよ('A`)
ヒッキー逃げたか…
そういえば「ヒッキーのクリスマス」ってあったな。
>>30 逃げてないYO!!
画像表示から勉強してんだよバカヤロ('A`)
今日にでも講座本買ってきまつorz
そして逃亡
やっべ。全く分からない。
本買おうとも思ったが、金も無いしこのスレの趣旨がぶち壊しだ。
とりあえず画像の表示のさせ方は
picload "test.jpg"
stop
でおkだな?
も少し調べてくるよ('A`)
逃げたと思われたら悔しいのでとりあえずtestアップ。
;キー入力で動かすテスト
screen 0,320,320,0
cls 4
x=10:y=10:vx=1:vy=0:s=0
*main
stick key,0,1
if key=1:vx=-1:vy= 0
if key=4:vx= 1:vy= 0
if key=2:vx= 0:vy=-1
if key=8:vx= 0:vy= 1
x=x+vx:y=y+vy
color 255,255,255
boxf x*16,y*16,x*16+15,y*16+15
await 100
goto *main
スネークみたいな簡単なgameを作ろうと思う。
まだ不完全だがな('A`)
とりあえずgameとして問題なのは
・画面の端っこをはみ出す。
・点数表示が無い。
・自分にぶつかっても死なない
ぐらいだろうか。
もっと頑張ってくるよ!ヽ(`д´)ノ
37 :
名前は開発中のものです。:05/01/04 01:32:28 ID:+PFofrHe
1は名誉を傷つけられるのを嫌がっているようだ。
あ、ちなみにループはrepeat〜loopでやった方が良いよ。
サブルーチンのネストが一つ浮くだけだけど。
38 :
名前は開発中のものです。:05/01/10 13:22:35 ID:BN0mLnES
で?どうなったの。
シラネ
逃げた……のか?
戻ってくるなら戻ってこい。
ヒッキー、お前の根性はドシタドシタ。
>>35を改造してみました。
*saisho
wx=200:wy=200
screen 0,wx,wy,0:cls
x=wx/2:y=wy/2:ix=0:iy=1:tensu=0
*main
x+=ix:y+=iy
pget x,y
if rval=0:goto *owari
if (x<0)|(x>wx):goto *owari
if (y<0)|(y>wy):goto *owari
pset x,y
stick key
if key ! 0 : gosub *check
wait 1
goto *main
*check
if key=1:ix=-1:iy=0
if key=2:iy=-1:ix=0
if key=4:ix=1:iy=0
if key=8:iy=1:ix=0
tensu++
return
*owari
mes "GAME OVER スコア"+tensu+"点"
button "RESTART",*saisho
stop
スマソスマソ。激しくスマソ。
今の状況説明させてくれ。うざいと思う香具師はスルーで。
フリースクールに通うことになった。というか今現在通ってる。
クリスマスにフリースクールのイベントに出かけたわけだ。
皆いい香具師で、そこに通うことになった。
正月から行き始めて、今必死になって学力の遅れを取り戻そうとしてるとこ。
電車に乗って、何時間か勉強をする。当たり前なんだけど、
引き篭もってた漏れにとってかなりきつくて。
今までこのスレを覗くどころか、PCをつける余裕さえなかった。
帰ったら即寝る、状態。今ようやっと余裕がでてきて、状況を書き込んだ次第。
やる気はまだあるんで、書き込む速度は落ちるだろうが、
これからも宜しく頼むおまいら。
スマソがちょいとageとく。
つーか、一気に色んなこと始めようと思うと飛ぶぞ。
引きこもってなかった人間でも新しいことを複数始めようとするとキツイ。
フリースクールの生活に慣れてから始めては?
3ヶ月もあれば慣れるじゃろ。
何フリースクールって?
ま、フリスになれて余裕が出来てこのスレがdat落ちしてなかったらまた来い
>>42 同じくヒッキ-から抜け出した者です。
なんか応援したくなった。
ゆっくり頑張って。
>>17 見てたら作りたくなったんでHSP速攻落としてきて、俺なりに作ってみた。戦術について書くの忘れた。
;Msg_Next_001
;**********************************変数定義START*******************************
int Int_Msg_No : Int_Msg_No = 0 ;メッセージ番号
;**********************************変数定義END*********************************
;**********************************本処理START*********************************
;メッセージ送り処理
goto *Mes_Int_Msg_No_Cln ;変数初期化
*Main_Msg_Next
mes "さあはじまるよ"
goto *Ent_Msg_Next
*Main_Sam_Msg_1
if Int_Msg_No <= 1 : mes "といってもねぇ" : goto *Ent_Msg_Next
if Int_Msg_No <= 2 : mes "ラベル名に変数つかえたら" : goto *Ent_Msg_Next
if Int_Msg_No <=3 : mes "もっとすっきりするんだがな" : goto *Ent_Msg_Next
stop
;**********************************本処理END************************************
;**********************************メソッドSTART********************************
;メッセージENTER送り
*Ent_Msg_Next
stick key
if key&32 : Int_Msg_No += 1 :goto *Main_Sam_Msg_1
wait 1
goto Ent_Msg_Next
;メッセージ番号初期化
*Mes_Int_Msg_No_Cln
Int_Msg_No = 0
goto Main_Msg_Next
;**********************************メソッドEND**********************************
49 :
48:05/03/06 15:47:55 ID:4iJFfu3u
すまん動かなかった。ちと修正するわー
;Msg_Next_001
;**********************************変数定義START*******************************
int Int_Msg_No : Int_Msg_No = 0 ;メッセージ番号
;**********************************変数定義END*********************************
;**********************************本処理START*********************************
;メッセージ送り処理
;goto *Mes_Int_Msg_No_Cln ;変数初期化
;*Main_Msg_Next
mes "さあはじまるよ"
goto *Mes_Ent_Msg_Next
*Main_Msg_Print
if Int_Msg_No <= 1 : mes "といってもねぇ" : goto *Mes_Ent_Msg_Next
if Int_Msg_No <= 2 : mes "ラベル名に変数つかえたら" : goto *Mes_Ent_Msg_Next
if Int_Msg_No <=3 : mes "もっとすっきりするんだがな" : goto *Mes_Ent_Msg_Next
stop
;**********************************本処理END************************************
;**********************************メソッドSTART********************************
;メッセージENTER送り
*Mes_Ent_Msg_Next
stick key
if key&32 : Int_Msg_No += 1 :goto *Main_Msg_Print
wait 1
goto *Mes_Ent_Msg_Next
;メッセージ番号初期化
;*Mes_Int_Msg_No_Cln
;Int_Msg_No = 0
;goto *Main_Msg_Next
;**********************************メソッドEND**********************************
変数初期化に飛ぶと、ラベルが無いみたいなエラーがでるからコメントにしといた。
なぜだ!?エディター探そ・・・
50 :
48:05/03/06 16:01:34 ID:4iJFfu3u
わかった。全角スペース入っていたわ。
このへんに
↓
goto *Mes_Int_Msg_No_Cln ;変数初期化
51 :
ヒッキー@抜け出し奮闘中 ◆ZbgFtxog9g :05/03/11 13:53:29 ID:8YWu8NpC
少しずつ
ほんの少しずつだけれど
多少慣れてきたような気がしないでもない。
それでもまだ通うだけで精一杯なんだけども。
今の気分はなんだか世界が広まった感でいっぱい。
ギターに手をだしたり。絵を描いたり。
もちろん勉強もなんだけれども。
引き篭もってたせいで、これだけ自分をダメにしてたんだなぁ、と実感。
復帰はまだもうしばらくかかりそうです
SLGって言ったってピンからキリまであるから、
短いのならほんの数行で作れるわけであって・・・
ごめん、何が言いたいのかわからない。
このスレまだあったの
55 :
名前は開発中のものです。:2005/05/21(土) 20:06:38 ID:rrjkfHGK
たしかに囲碁は戦略シミュレーションだが…
囲碁も好きだからいいんだけどね
ただHSPで作れるのかなと・・
1が帰ってくるまでの間、
俺がHSPでSLGを作れるようになるまで頑張ってみるか
59 :
名前は開発中のものです。:2005/10/19(水) 03:25:02 ID:fClgdkP0
あげ
今のんびりと作ってる途中なんだが、砲兵最強になってしまった。
俺なんかマップチップ画像の配置の方法で悩んでる
HEXマップのデータ管理ってどうやればいい?
>>62 スクウェアマップを一列づつ1/2マスだけずらせばよい
HSPでユニットの管理はどうしたらいい?
やっぱりインデックスを持って、HP.index. MP.index, ATK.index, DEF.index
これしかない?どうにかしてまとめらんないかな。
65 :
名前は開発中のものです。:2006/05/23(火) 17:15:08 ID:ieq7r7UT
*main
print"鬱だ死のう"
goto *main
まずこれ書け
66 :
名前は開発中のものです。:2006/05/23(火) 19:43:02 ID:uWJlgSIB
wait入れとけ
>>57 アクションとかSTGならHSPだと他の言語に比べてだいぶ楽できるんだけどね・・・
SLGだと敵AIの確立やらユニット管理やらで、反ってHSPのが難しくなっちゃうかも。
そういえばHSPって構造体あったっけ?
前ちょっと触ろうとしてそれが無さそうなので
ツカエネーと思ってやめたような記憶が…
それないのってかなりキツいよねー
ないね。俺もそれがネックでちょっと触っただけだわ
配列を定数でインデックス指定して、仮想連想配列として扱う以外やり易い方法なさそうだな
クラスがほしいよママソ
71 :
名前は開発中のものです。:2006/05/26(金) 15:15:18 ID:BwTgptjP
>>66 waitはいらないだろ・・・・・
きれいな顔してるだろ。
死んでるんだぜ、それで…嘘みたいだろ。
たいした怪我もないのに、ただ、ちょっと打ち所が悪かっただけで
動かないんだぜ。な、嘘みたいだろ。
関数を無理矢理、構造体に見立てて扱え
>>64 文字列型配列に全部まとめて押し込め
ステータス0\nステータス1\n…
取り出すのとかがめんどうか。
ならば、10000倍とかして足せ。…オーバーフローするな。
age
75 :
名前は開発中のものです。:2006/09/21(木) 22:27:43 ID:A82GeSKk
おもしろそうなスレをageて逝く。
御雷は参考にならんかの
あれはHSPで作ってたと思ったが
あれはメイン・戦闘・イベントをそれぞれ別個に作ってたが
と思ったが1が作りたいのはFEやオウガ系か
なら参考にはならんな・・・
うぜえ
>>79 がんばれ。
しかし、いくつプロジェクトの失敗を見てきただろう。
なので、ちょっとしたものでいいから完成させてくれ。
終了(AA略
まあがんばれ
84 :
防衛軍:2007/01/27(土) 17:55:10 ID:iSoHVglg
地球防衛軍タクティクスもどき作ろうぜ。
知識も無し。HSPの経験も無し。金も無し。
あるのは時間とやる気だけのヒッキーな漏れが監督な。
>>84 監督やるのは結構だがプログラマとかも兼任するんだよね?当然
86 :
名前は開発中のものです。:2007/01/27(土) 20:59:22 ID:nwBOFXaI
o
/  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ /
/ このスレは無事に /
/ 終了いたしました /
/ ありがとうございました /
/ /
/ モララーより /
/ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄/
∧_∧ / /∧_∧
( ・∀・) / /(・∀・ )
( )つ ⊂( )
| | | | | |
(__)_) (_(__)
civは既にフリーで作られているようなので
HSPでしょぼいシミュレーションゲーム作ってみるわ。
頑張ろうぜ…俺一人で。
別にHSPじゃなくてもいいか
>既にフリーで作られている
これは禁句
ぬっ、そいつは失礼した。
HSP・SLGって何よ?
ブッブー
93 :
名前は開発中のものです。:
10年経ってもう死んだかなage