俺が奮闘しながら初めて0からゲームを製作するスレ
2018/04/22(日) 00:16:43.44ID:h/GNLZ5M
とりあえずお前ら生中かんぱーい!
2018/04/22(日) 00:19:24.11ID:h/GNLZ5M
まぁ、ソフトとかもよう分からんしプログラミングとかもよう分からんからエクセルで生暖かく作っていくよ…酒でも飲みながらね
2018/04/22(日) 00:21:11.55ID:h/GNLZ5M
内容はローグライクに限る!
2018/04/22(日) 00:22:27.19ID:h/GNLZ5M
今日はマップとキャラの当たり判定を作って逝く
2018/04/22(日) 01:47:20.53ID:h/GNLZ5M
Declare Function GetAsyncKeyState Lib "User32.dll" (ByVal vKey As Long) As Long
If GetAsyncKeyState(37) <> 0 Then
MsgBox "←"
End If.........
ダメだ今日はねもい!寝る!仕様は固まった。
キーの割当から明日作ってく
If GetAsyncKeyState(37) <> 0 Then
MsgBox "←"
End If.........
ダメだ今日はねもい!寝る!仕様は固まった。
キーの割当から明日作ってく
2018/04/22(日) 22:16:32.53ID:ixXXVG5k
奮闘終了
また何年も残るクソスレが出来上がったか
また何年も残るクソスレが出来上がったか
2018/04/23(月) 00:05:49.99ID:pLMsD9VJ
ごめんの!仕事と家庭の用事で作れんかったわ
また明日から少しずつ作ってく。
今日はテトリスをVBAで作った人が居てその人のソースコピーしてキー操作まで作った
また明日から少しずつ作ってく。
今日はテトリスをVBAで作った人が居てその人のソースコピーしてキー操作まで作った
2018/04/23(月) 00:20:55.84ID:pLMsD9VJ
Option Explicit
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Declare Function GetAsyncKeyState Lib "User32.dll" (ByVal vKey As Long) As Long
Public Const VK_SPACE = &H20 '[Space]
Public Const VK_A = &H41 '[A]
Public Const VK_S = &H53 '[S]
Public Const VK_LEFT = &H25 '[←]
Public Const VK_UP = &H26 '[↑]
Public Const VK_RIGHT = &H27 '[→]
Public Const VK_DOWN = &H28 '[↓]
Private m_MoveKeyLog As lBlockMove
Private m_SpinKeyLog As lBlockMove
Private m_MoveKeyCount As Long
Private m_SpinKeyCount As Long
Private nDebugCount As Long
Public Function getRnd(ByVal nMin As Long, ByVal nMax As Long) As Long
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Declare Function GetAsyncKeyState Lib "User32.dll" (ByVal vKey As Long) As Long
Public Const VK_SPACE = &H20 '[Space]
Public Const VK_A = &H41 '[A]
Public Const VK_S = &H53 '[S]
Public Const VK_LEFT = &H25 '[←]
Public Const VK_UP = &H26 '[↑]
Public Const VK_RIGHT = &H27 '[→]
Public Const VK_DOWN = &H28 '[↓]
Private m_MoveKeyLog As lBlockMove
Private m_SpinKeyLog As lBlockMove
Private m_MoveKeyCount As Long
Private m_SpinKeyCount As Long
Private nDebugCount As Long
Public Function getRnd(ByVal nMin As Long, ByVal nMax As Long) As Long
2018/04/23(月) 00:21:20.14ID:pLMsD9VJ
Public Function getRnd(ByVal nMin As Long, ByVal nMax As Long) As Long
Randomize
getRnd = Int((nMax - nMin + 1) * Rnd + nMin)
End Function
Randomize
getRnd = Int((nMax - nMin + 1) * Rnd + nMin)
End Function
2018/04/23(月) 00:22:50.00ID:pLMsD9VJ
とかいろいろ…どっかUpろだなかったっけ?その辺初心者なんでご教授お願いします。
2018/04/23(月) 05:37:55.94ID:bGa2Gm35
ほかのすれ読んでりやそれくらいわかりそうなもんだが
ほんとこの板ってggらない、読まないクソが多いな
ttp://fast-uploader.com/
ほんとこの板ってggらない、読まないクソが多いな
ttp://fast-uploader.com/
2018/04/23(月) 06:47:13.22ID:pLMsD9VJ
探してもなかったんじゃい!
あーうぷロダってそれじゃない。それなら知ってる!
ソースだけ貼ってurlだけで見れるやつ
てか出来てから貼りたいだけだから、間の近況報告要らないなくね?と。
このスレが流行って質問でも出てきたりすれば別だが。
あーうぷロダってそれじゃない。それなら知ってる!
ソースだけ貼ってurlだけで見れるやつ
てか出来てから貼りたいだけだから、間の近況報告要らないなくね?と。
このスレが流行って質問でも出てきたりすれば別だが。
2018/04/23(月) 06:58:06.76ID:bGa2Gm35
ていうか写経のソースなんか誰もみないし価値なし写しみるなら元を見るだろ普通は
自分なりの工夫とか機能追加したのなら価値はあるが他人のコード
丸パクリしたのを公開するなんてどっかの国の人みたいだぞ
githubみたいのか?
自分なりの工夫とか機能追加したのなら価値はあるが他人のコード
丸パクリしたのを公開するなんてどっかの国の人みたいだぞ
githubみたいのか?
2018/04/23(月) 07:37:08.33ID:NVnCFnT8
連休終わったら消えるパターンだなこれ
レスを投稿する
ニュース
- 高市首相答弁を“引き出した”立民・岡田克也氏が改めて説明「なぜ慎重な答弁をされなかったのか。非常に残念に思っている」 ★9 [ぐれ★]
- 【news23】小川彩佳アナ「ここまでの広がりになるということを、高市総理はどれだけ想像できていたんでしょうね」 日中問題特集で [冬月記者★]
- 【野球】大谷翔平、佐々木朗希、山本由伸らがWBC辞退なら広がる不協和音… 『過去イチ盛り上がらない大会』になる可能性も★2 [冬月記者★]
- 「町中華」の“息切れ倒産”が増加 ブームにも支えられ職人技で踏ん張ってきたが… 大手チェーンは値上げでも絶好調 [ぐれ★]
- 【国際】ロシアはすでに戦争準備段階――ポーランド軍トップが警告 ★2 [ぐれ★]
- 毛寧(もう・ねい)報道官「中国に日本の水産品の市場は無い」 高市首相の国会答弁に「中国民衆の強い怒り」 ★2 [ぐれ★]
- 高市早苗、約1ヶ月でドル円・10円円安を達成 [256556981]
- 【超絶朗報】高市早苗、月給5万円アップを突如確定させるWWWWW
- なんで日本ってNVIDIAやTSMCみたいな会社が出来ないの? [688331247]
- 【高市核兵器】 小泉コメ防衛大臣「民主党政権 岡田外務大臣の “非核三原則” に関する国会答弁を引き継いでいる」 政策堅持を明言 [485983549]
- するってぇと何かい?2週間前に安全を確認して輸入再開した海産物を食の安全のために輸入停止にしたってのかい?
- 【高市賃上げ】 自民党&維新の会「国会議員の給与を 月5万円アップさせる!」 今国会で歳費法改正。 月129万円→月134万円に [485983549]
