探検
俺が奮闘しながら初めて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
連休終わったら消えるパターンだなこれ
2018/04/23(月) 07:50:47.10ID:dU/k4p/8
レスを投稿する
ニュース
- 「中国人の訪日熱は冷めた」 人気旅行先から日本外れる 14日で自粛呼びかけ1カ月 ★2 [蚤の市★]
- 高市首相の答弁書に「台湾有事答えない」と明記 存立危機発言当時 ★7 [蚤の市★]
- 最新版Z級クソ映画ランキングが決定! [牛丼★]
- 【STARTO ENTERTAINMENT】SUPER EIGHTの横山裕、フジ『ドッキリGP』ロケで全治2ヶ月の重傷 [Ailuropoda melanoleuca★]
- 「1800万円の売り上げゼロに…」中国インバウンドに特化の宿の今 ★2 [蚤の市★]
- 公用車カーナビのNHK受信料「全額免除を」 千葉市議会、国に制度創設求める意見書可決 [少考さん★]
- この時間のおまえらって異常性癖多そうだよな
- フライドポテトでマクドナルドに勝てるやつあんの?
- 【朗報】南鳥島のレアアース、中国産の「20倍の純度」青山繁晴氏「日本は資源大国」日本復活のファンファーレが鳴り響く! [673057929]
- 愛国者「釘を使わない日本独自の伝統工法スゴイ!」X民「それ中国起源ですよ」→批判殺到 [834922174]
- 口角炎痛すぎ
- 【朗報】愛国保守党の公約、ガチでアリだと話題にwwwwwwwwww
