探検
俺が奮闘しながら初めて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みたいのか?
レスを投稿する
ニュース
- 山田邦子 ひょうきん族時代の年収は12億円「ただ税金が80%」 [muffin★]
- 東京の自販機そばに金塊4200万円分、何者かに持ち去られる…札幌の50代が8000万円振り込んだ後に上京して被害 [どどん★]
- 中国・ロシア両軍の爆撃機が東京方面へ向かう「異例のルート」を共同飛行…核も搭載可能、連携して威嚇か ★7 [ぐれ★]
- 【東京】「家族で話題にして」 “世田谷一家殺害から25年 警視庁が呼びかけ [煮卵★]
- 【沖縄】開業4ヵ月でこれは…“国民の税金”投入の『ジャングリア沖縄』で見た衝撃的な光景と、モチベーションが低い一部スタッフの現状 [ぐれ★]
- 【鹿児島】容疑者は大学生。国道3号を横断中の母娘を車ではねる――「太陽がまぶしくて見えなかった」。20歳女を現行犯逮捕 日置署 [ぐれ★]
- クラウドにハメ撮りってあげていいの?
- 高市早苗「定数削減とかすると思ってたの???笑」漢一匹吉村「ざっけんな」反旗を翻す [245325974]
- しかし鈴木農水大臣ほど、見る人によって『イケメン』か『ブサイク』か真っ二つに割れる人間も中々いないよな [762037879]
- ルーナイト第1条!誰よりルーナ(・o・🍬)が好きな人~🙋🏡
- おさかなさんあつまれえ
- 高市「たまたま私が支部長だった。高市早苗に対する献金ではない」→自分の公式サイトで、ガッツリ寄付を呼びかけていた事が判明 [594040874]
