俺が奮闘しながら初めて0からゲームを製作するスレat GAMEDEV俺が奮闘しながら初めて0からゲームを製作するスレ - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このスレッドのURL■項目テキスト8:名前は開発中のものです。 18/04/23 00:20:55.84 pLMsD9VJ.net 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 9:名前は開発中のものです。 18/04/23 00:21:20.14 pLMsD9VJ.net Public Function getRnd(ByVal nMin As Long, ByVal nMax As Long) As Long Randomize getRnd = Int((nMax - nMin + 1) * Rnd + nMin) End Function 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch