探検
俺が奮闘しながら初めて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
連休終わったら消えるパターンだなこれ
レスを投稿する
ニュース
- 【サッカー】J1昇格PO決勝戦 千葉、来季のJ1昇格が決定 17年越しの悲願叶える…オリジナル10が05年以来のJ1にそろう [久太郎★]
- 南京で「大虐殺」追悼式典 中国、高市政権をけん制 (共同通信) [少考さん★]
- 中国・ロシア両軍の爆撃機が東京方面へ向かう「異例のルート」を共同飛行…核も搭載可能、連携して威嚇か ★5 [ぐれ★]
- 【日銀】0.75%に利上げへ 来週の決定会合で、30年ぶり水準 賃金改善の継続見込む [ぐれ★]
- 京都のホテル大幅値下げ 訪日中国人客、年1000万人目前で急ブレーキ ★3 [蚤の市★]
- 緊急入院のゆたぼん「人身事故は嘘」はデマ 「滑稽ですね」救急車写真で証明、法的措置も検討 [少考さん★]
- 小野田紀美「外国人帰れ!って言って石を投げられるのは毎日のように。もう殴る蹴るは当たり前でした。それで喧嘩強いんですよ、私。」 [856698234]
- >>5で貼られたスレにみんなで凸するスレ
- 【高速高市感想】野原みさえの昼メシの流儀スレ4時30分から [699577814]
- 日本人、気づきはじめる「庶民の生活が苦しいのは金持ちが節税したりして金溜め込んでるから。大企業の内部留保もどうにかしろ」 [434776867]
- 【実況】博衣こよりのえちえちドラクエ1&2リメイク🧪★3🏡
- トランプ大統領、エプスタンイン邸宅で美女に囲まれご満悦の写真見つかる コンドームの山も [907981868]
