プログラマ専用SNS ミクプラ

コード:

#include "DxLib.h"
#include <string.h>

#define CHAT_LINENUM		20	// チャット中の文字列を表示する行数
#define MAX_STRLENGTH		80	// チャットで1行で入力できる文字数
#define INPUT_LINE		21	// チャットで入力領域となる画面上の行位置
#define FONT_SIZE		16	// フォントのサイズ

int InputHandle ;			// 入力ハンドル
int StringY ;				// 文字列表示領域の次に文字列を表示する時の行位置
int NetHandle ;				// 接続相手のネットワークハンドル

char ScreenString[ CHAT_LINENUM ][ MAX_STRLENGTH + 1 ] ;	// 画面に表示中のチャット文字列


int ScreenStringAdd( char *AddString ) ;	// チャット文字列を追加する
int ScreenStringDraw( void ) ;			// チャットの現在の状態を画面に表示する


int WINAPI WinMain( HINSTANCE hInstance, HINSTANCE hPrevInstance,
						LPSTR lpCmdLine, int nCmdShow )
{
	char Key ;

	// ＤＸライブラリ初期化
	if( DxLib_Init() == -1 )
	{
		return -1 ;
	}

	// 入力領域と文字出力領域との境界線を引く
	DrawLine( 0 , CHAT_LINENUM * FONT_SIZE , 640 , CHAT_LINENUM * FONT_SIZE , GetColor( 255 , 255 , 255 ) ) ;

	// 接続を待つか接続をするか入力してもらう
	ScreenStringAdd( "接続を待つ場合はＺキーを、接続をする場合はＸキーを押してください" ) ;

	// どちらのキーが押されるか監視する
	{
		while( !ProcessMessage() )
		{
			if( CheckHitKey( KEY_INPUT_Z ) )
			{
				Key = 'Z' ;
				break ;
			}
			if( CheckHitKey( KEY_INPUT_X ) )
			{
				Key = 'X' ;
				break ;
			}
		}
	}

	// 押されたキーによって処理を分岐する
	switch( Key )
	{
	// 接続を待つ場合
	case 'Z':

		// 接続待ち状態にする
		PreparationListenNetWork( 9850 ) ;

		// 接続があるまで待つ表示
		ScreenStringAdd( "接続があるまで待ちます" ) ;

		// 接続があるまでここでループ
		while( !ProcessMessage() )
		{
			// 新しい接続があった場合はそのネットハンドルを保存する
			NetHandle = GetNewAcceptNetWork() ;

			// 新しい接続があった場合はループを出る
			if( NetHandle != -1 ) break ;
		}

		// 接続待ちを解除
		StopListenNetWork() ;

		break ;

	// こちらから接続をする場合
	case 'X' :
		{
			char StrBuf[ 81 ] , StrBuf2[ 81 ] ;
			IPDATA IP ;
			int i , j , k ;

			// 入力を行う
			while( !ProcessMessage() )
			{
				// 接続先のＩＰの入力を促す	
				ScreenStringAdd( "接続先のＩＰを入力してください" ) ;
				ScreenStringAdd( "入力は半角で各ＩＰ値は『.』で区切り、隙間は入れないで下さい" ) ;

				// ＩＰの入力を行う
				KeyInputSingleCharString( 0 , INPUT_LINE * FONT_SIZE + 2 , 80 , StrBuf , FALSE ) ;

				// ピリオドが３つあるか調べる
				j = 0 ;
				for( i = 0 ; i < 80 ; i ++ )
				{
					if( StrBuf[ i ] == '.' ) j ++ ;
				}
				
				// もし３つピリオドがなかった場合は入力のし直し
				if( j != 3 )
				{
					ScreenStringAdd( "IP値の数が間違っています" ) ;
					continue ;
				}

				// 文字列からＩＰを抜き出す
				j = 0 ;
				k = 0 ;
				i = 0 ;
				while( !ProcessMessage() )
				{
					if( StrBuf[ i ] == '.' || StrBuf[ i ] == '\0' )
					{
						StrBuf2[ j ] = '\0' ;
						switch( k )
						{
						case 0 :IP.d1 = atoi( StrBuf2 ) ; break ;
						case 1 :IP.d2 = atoi( StrBuf2 ) ; break ;
						case 2 :IP.d3 = atoi( StrBuf2 ) ; break ;
						case 3 :IP.d4 = atoi( StrBuf2 ) ; break ;
						}
						k ++ ;
						if( k == 4 ) break ;

						j = 0 ;
					}
					else
					{
						StrBuf2[ j ] = StrBuf[ i ] ;
						j ++ ;
					}
					i ++ ;
				}

				// 接続中表示
				ScreenStringAdd( "接続中" ) ;

				// 接続を試みる
				NetHandle = ConnectNetWork( IP, 9850 ) ;

				// 接続に成功したらループから抜ける
				if( NetHandle != -1 ) break ;

				// 接続失敗表示
				ScreenStringAdd( "接続は失敗しました" ) ;
			}
		}
		break ;
	}

	// 接続成功表示
	ScreenStringAdd( "接続しました" ) ;

	// 文字列入力ハンドルを作成する
	InputHandle = MakeKeyInput( 80 , FALSE , FALSE , FALSE ) ;

	// 作成した入力ハンドルをアクティブにする
	SetActiveKeyInput( InputHandle ) ;

	// チャットループ
	while( !ProcessMessage() )
	{
		// 切断確認
		if( GetLostNetWork() == NetHandle ) break ;

		// 受信した文字列がある場合は受信する
		if( GetNetWorkDataLength( NetHandle ) > sizeof( int ) )
		{
			int StrLength ;
			char Message[81] ; 

			// 受信した文字列の長さを得る
			NetWorkRecvToPeek( NetHandle , &StrLength , 4 ) ;

			// 受信するはずの文字列長より受信されている文字数が少ない場合は
			// 何もせずもどる
			if( StrLength + 4 <= GetNetWorkDataLength( NetHandle ) )
			{
				// 文字列の長さを得る
				NetWorkRecv( NetHandle , &StrLength , 4 ) ;

				// メッセージを受信
				NetWorkRecv( NetHandle , Message , StrLength ) ;
				
				// 画面に表示
				ScreenStringAdd( Message ) ;
			}
		}

		// 文字列入力
		{
			// 文字列の入力が終っている場合は送信する
			if( CheckKeyInput( InputHandle ) == 1 )
			{
				char Message[ 81 ] ;
				int StrLength ;

				// 入力された文字列を取得する
				GetKeyInputString( Message , InputHandle ) ;

				// 入力された文字列の長さを送信する
				// +1 は終端文字('\0')を含めるため
				StrLength = lstrlen( Message ) + 1 ; 
				NetWorkSend( NetHandle , &StrLength , sizeof( int ) ) ;

				// 文字列を送信
				NetWorkSend( NetHandle , Message , StrLength ) ;

				// 自分のとこにも表示する
				ScreenStringAdd( Message ) ;

				// 入力文字列を初期化する
				SetKeyInputString( "" , InputHandle ) ;

				// 再度インプットハンドルをアクティブにする
				SetActiveKeyInput( InputHandle ) ;
			}

			// 画面に入力中の文字列を描画する
			DrawBox( 0 , INPUT_LINE * FONT_SIZE + 2 , 640 , 480 , 0 , TRUE ) ;
			DrawKeyInputString( 0 , INPUT_LINE * FONT_SIZE + 2 , InputHandle ) ;
			DrawKeyInputModeString( 640 , 480 ) ;
		}

		// 時間待ち
		WaitTimer( 32 ) ;
	}

	// 切断確認処理
	ScreenStringAdd( "切断しました" ) ;

	// 時間待ち
	WaitTimer( 3000 ) ;  

	DxLib_End() ;			// ＤＸライブラリ使用の終了処理

	return 0 ;			// ソフトの終了
}