コード:

TARGETNAME=ゲームコード

C_FLAGS=/c /TP /EHsc /D "_MBCS" /MT  /Ic:\dxlib /D "WIN32" /D "NDEBUG" /D "_WINDOWS" /W3 

LINK_FLAGS=/SUBSYSTEM:WINDOWS /LIBPATH:c:\dxlib "kernel32.lib" "user32.lib" "gdi32.lib" "winspool.lib" "comdlg32.lib" "advapi32.lib" "shell32.lib" "ole32.lib" "oleaut32.lib" "uuid.lib" "odbc32.lib" "odbccp32.lib" 

ALL:
	cl $(C_FLAGS) $(TARGETNAME).txt sub_02.txt
	link /out:$(TARGETNAME).exe $(LINK_FLAGS) $(TARGETNAME).obj sub_02.obj 
	$(TARGETNAME).exe

コード:

#include "DxLib.h"
#include "Math.h"

void sub_02( void );

// プログラムは WinMain から始まります
int WINAPI WinMain(HINSTANCE,HINSTANCE,LPSTR,int)
{
	AllocConsole();
	FILE* out = 0; freopen_s( &out, "CON", "w", stdout );
	FILE* in = 0; freopen_s( &in, "CON", "r", stdin );


	printf("Hello World!\n");

	printf("%16.15f\n", 3.141592653589793);

	int x, y;

	ChangeWindowMode( TRUE );		// ウィンドウモードに設定
	if( DxLib_Init() == -1 )		// ＤＸライブラリ初期化処理
	{
		return -1 ;			// エラーが起きたら直ちに終了
	}

	for(x = 0; x < 640; x++) DrawPixel( x , 240 , GetColor( 0,0,255 ) ) ; // 点を打つ
	for(y = 0; y < 480; y++) DrawPixel( 320 , y , GetColor( 0,255,0 ) ) ; // 点を打つ


	sub_02();


	WaitKey() ;				// キー入力待ち

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


	//コンソール解放
	fclose( out ); fclose( in ); FreeConsole();



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

コード:

#include "DxLib.h"
#include "Math.h"

void sub_02( void )
{
	double PI = 3.141592653589793;		// 産医師異国に向こう産後厄なく産・

	printf("正弦波・・・\n");

	for(int x = 0; x < 640; x++) DrawPixel( x , 220*sin((float)x*(2.0*PI/320.0))+240 , GetColor( 0,255,255 ) ) ;

	printf("余弦波・・・\n");

	for(int x = 0; x < 640; x++) DrawPixel( x , 220*cos((float)x*(2.0*PI/320.0))+240 , GetColor( 0,255,255 ) ) ;
}

コード:

#include "DxLib.h"
#include "Math.h"

// プログラムは WinMain から始まります
int WINAPI WinMain(HINSTANCE,HINSTANCE,LPSTR,int)
{
	AllocConsole();
	FILE* out = 0; freopen_s( &out, "CON", "w", stdout );
	FILE* in = 0; freopen_s( &in, "CON", "r", stdin );


	printf("Hello World!\n");

	printf("%lf\n", 3.141592653589793);


	int x,y;
	double PI = 3.141592653589793;		// 産医師異国に向こう産後厄なく産・
	ChangeWindowMode( TRUE );		// ウィンドウモードに設定
	if( DxLib_Init() == -1 )		// ＤＸライブラリ初期化処理
	{
		return -1 ;			// エラーが起きたら直ちに終了
	}

	for(x = 0; x < 640; x++) DrawPixel( x , 240 , GetColor( 0,0,255 ) ) ; // 点を打つ
	for(y = 0; y < 480; y++) DrawPixel( 320 , y , GetColor( 0,255,0 ) ) ; // 点を打つ

	printf("正弦波・・・\n");

	for(x = 0; x < 640; x++) DrawPixel( x , 220*sin((float)x*(2.0*PI/320.0))+240 , GetColor( 0,255,255 ) ) ;

	WaitKey() ;				// キー入力待ち

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


	//コンソール解放
	fclose( out ); fclose( in ); FreeConsole();



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

コード:

#include "DxLib.h"
#include "Math.h"

// プログラムは WinMain から始まります
int WINAPI WinMain(HINSTANCE,HINSTANCE,LPSTR,int)
{
	int x,y;
	double PI = 3.14159265358979;		// 産医師異国に向こう産後厄なく産・
	ChangeWindowMode( TRUE );		// ウィンドウモードに設定
	if( DxLib_Init() == -1 )		// ＤＸライブラリ初期化処理
	{
		return -1 ;			// エラーが起きたら直ちに終了
	}

	for(x = 0; x < 640; x++) DrawPixel( x , 240 , GetColor( 0,0,255 ) ) ; // 点を打つ
	for(y = 0; y < 480; y++) DrawPixel( 320 , y , GetColor( 0,255,0 ) ) ; // 点を打つ

	for(x = 0; x < 640; x++) DrawPixel( x , 220*sin((float)x*(2.0*PI/320.0))+240 , GetColor( 0,255,255 ) ) ;

	WaitKey() ;				// キー入力待ち

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

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

コード:

// マルチスレッド中の描画処理
void __fastcall MyThread::UpdateDrawing()
{
    Application->ProcessMessages();

	// 描画領域のY軸幅を計算
	haba = DrawHeightY2 / 20;
	haba = haba *10;        //小数点切り捨てられてるので戻さないと罫線とずれる
 // 	MainFrame->TImgBG->Canvas->Pen->Color = clRed;


	Ypoint0 = (DrawHeightY + haba);
	Xpoint0 = DrawLeftX;
	x = 0;

	haba = DrawLeftX2 - DrawLeftX;
	// 描画領域のX軸幅を計算
	ms = haba / 10000;
	// ten = 0;

	// データ取得
	// 共有メモリ(メモリマップトファイル)を開く
	HANDLE hMapping = OpenFileMapping(FILE_MAP_READ, FALSE, L"NI-Data_test");
	if ( hMapping == NULL ) {
		ShowMessage("共有メモリが見つかりません");
		return;
	}
	// マッピング開始
	char *dat = (char *)MapViewOfFile(hMapping,
					FILE_MAP_READ,	// 読込モード
					0,
					0,
					0);		// 上限まで読込
	if ( dat == NULL ) {
		ShowMessage("共有メモリのデータがありません");
		return;
	}

	// データ読込
	AnsiString ebuff = AnsiString(dat);

	// マッピング解除
	UnmapViewOfFile(dat);

	//int cnt = 1;

	//int gou2 = 1000 * Tspan;
	int gou2 = 1000 * MainFrame->Tspan * MainFrame->pages;

	//gou = 0;

	 //カンマ区切りの文字列
	//結果格納用のTStringListを用意
	TStringList* splittedResult = new TStringList();
	//CommaTextプロパティにセット
	splittedResult->CommaText = ebuff;


	for(int i= DataCnt; i < splittedResult->Count-1; i++)
	{
		switch(chCnt)
		{
		  case 1:
			x2 = x2 + ms;

			// ten1_1 = (array[DataCnt].ToDouble() * -10.0 )  * MainFrame->correctValue;
			ten1_1 = (splittedResult->Strings[DataCnt].ToDouble() * -10.0 )  * MainFrame->correctValue;
			MainFrame->TImgBG->Canvas->Pen->Color = clRed;
			// TImgBG->Canvas->MoveTo(Xpoint0 + x, Ypoint0 + (ten1 * Vspan));
			MainFrame->TImgBG->Canvas->MoveTo(Xpoint0 + X_time, Ypoint0 + (ten1 * MainFrame->V_valueUP));
			MainFrame->TImgBG->Canvas->LineTo(Xpoint0 + x2*(10.0/MainFrame->Tspan), Ypoint0 + (ten1_1 * MainFrame->V_valueUP));
			chCnt = 2;

			ten1 = ten1_1;
			break;
		  case 2:
			// ten2_1 = (array[DataCnt].ToDouble() * -10.0 )  * MainFrame->correctValue;
			ten2_1 = (splittedResult->Strings[DataCnt].ToDouble() * -10.0 )  * MainFrame->correctValue;
			MainFrame->TImgBG->Canvas->Pen->Color = TColor("$001763FF");
			// TImgBG->Canvas->MoveTo(Xpoint0 + x, Ypoint0 + (ten2 * Vspan));
			MainFrame->TImgBG->Canvas->MoveTo(Xpoint0 + X_time, Ypoint0 + (ten2 * MainFrame->V_valueUP));
			MainFrame->TImgBG->Canvas->LineTo(Xpoint0 + x2*(10.0/MainFrame->Tspan), Ypoint0 + (ten2_1 * MainFrame->V_valueUP));
			chCnt = 1;

			ten2 = ten2_1;
            gou = gou + ms;
			//x = x2*(10.0/Tspan);
			X_time = x2*(10.0/MainFrame->Tspan);


			//  右端まで行ったら次ページとして先頭にカーソルを戻す。
			if ((MainFrame->TImgBG->Width) < gou * (10 / MainFrame->Tspan) )
			{

                Sleep(50);
				MainFrame->pages = MainFrame->pages + 1;
				gou = 0;
				X_time = 1;
				x2 = 1;
				// 縦横の罫線を再描画する。
				MainFrame->TImgBG->Picture = NULL;
				MainFrame->DrawingArea();
			}

			break;
		  case 3:
  //			ten3_1 = array[DataCnt].ToDouble() * -10.0 ;
			MainFrame->TImgBG->Canvas->Pen->Color = TColor("$$00800040");;
			// TImgBG->Canvas->MoveTo(Xpoint0 + x, Ypoint0 + (ten3 * Vspan));
			MainFrame->TImgBG->Canvas->MoveTo(Xpoint0 + X_time, Ypoint0 + (ten3 * MainFrame->Vspan));
			MainFrame->TImgBG->Canvas->LineTo(Xpoint0 + x2*(10.0/MainFrame->Tspan), Ypoint0 + (ten3_1 * MainFrame->Vspan));
			chCnt = 4;

			ten3 = ten3_1;
			break;
		  case 4:
  //			ten4_1 = array[DataCnt].ToDouble() * -10.0 ;
			MainFrame->TImgBG->Canvas->Pen->Color = TColor("$clBlue");;
			// TImgBG->Canvas->MoveTo(Xpoint0 + x, Ypoint0 + (ten4 * Vspan));
			MainFrame->TImgBG->Canvas->MoveTo(Xpoint0 + X_time, Ypoint0 + (ten4 * MainFrame->Vspan));
			MainFrame->TImgBG->Canvas->LineTo(Xpoint0 + x2*(10.0/MainFrame->Tspan), Ypoint0 + (ten4_1 * MainFrame->Vspan));
			chCnt = 5;

			ten4 = ten4_1;
			break;
		  case 5:
  //			ten5_1 = array[DataCnt].ToDouble() * -10.0 ;
			MainFrame->TImgBG->Canvas->Pen->Color = TColor("$$00FF8000");;
			// TImgBG->Canvas->MoveTo(Xpoint0 + x, Ypoint0 + (ten5 * Vspan));
			MainFrame->TImgBG->Canvas->MoveTo(Xpoint0 + X_time, Ypoint0 + (ten5 * MainFrame->Vspan));
			MainFrame->TImgBG->Canvas->LineTo(Xpoint0 + x2*(10.0/MainFrame->Tspan), Ypoint0 + (ten5_1 * MainFrame->Vspan));
			chCnt = 6;

			ten5 = ten5_1;
			break;
		  case 6:
  //			ten6_1 = array[DataCnt].ToDouble() * -10.0 ;
			MainFrame->TImgBG->Canvas->Pen->Color = TColor("$$00408000");;
			// TImgBG->Canvas->MoveTo(Xpoint0 + x, Ypoint0 + (ten6 * Vspan));
			MainFrame->TImgBG->Canvas->MoveTo(Xpoint0 + X_time, Ypoint0 + (ten6 * MainFrame->Vspan));
			MainFrame->TImgBG->Canvas->LineTo(Xpoint0 + x2*(10.0/MainFrame->Tspan), Ypoint0 + (ten6_1 * MainFrame->Vspan));
			chCnt = 7;

			ten6 = ten6_1;
			break;
		  case 7:
  //			ten7_1 = array[DataCnt].ToDouble() * -10.0 ;
			MainFrame->TImgBG->Canvas->Pen->Color = TColor("$$0040FF00");;
			// TImgBG->Canvas->MoveTo(Xpoint0 + x, Ypoint0 + (ten7 * Vspan));
			MainFrame->TImgBG->Canvas->MoveTo(Xpoint0 + X_time, Ypoint0 + (ten7 * MainFrame->Vspan));
			MainFrame->TImgBG->Canvas->LineTo(Xpoint0 + x2*(10.0/MainFrame->Tspan), Ypoint0 + (ten7_1 * MainFrame->Vspan));
			chCnt = 8;

			ten7 = ten7_1;
			break;
		  case 8:
  //			ten8_1 = array[DataCnt].ToDouble() * -10.0 ;
			MainFrame->TImgBG->Canvas->Pen->Color = TColor("$clOlive");;
		   //	TImgBG->Canvas->MoveTo(Xpoint0 + x, Ypoint0 + (ten8 * Vspan));
			MainFrame->TImgBG->Canvas->MoveTo(Xpoint0 + X_time, Ypoint0 + (ten8 * MainFrame->Vspan));
			MainFrame->TImgBG->Canvas->LineTo(Xpoint0 + x2*(10.0/MainFrame->Tspan), Ypoint0 + (ten8_1 * MainFrame->Vspan));
			chCnt = 1;

			ten8 = ten8_1;
			gou = gou + ms;
			//x = x2*(10.0/Tspan);
			X_time = x2*(10.0/MainFrame->Tspan);
			break;
		  default:
			chCnt = 1;
			break;
		}

		if((i % 10) == 0)
		{
			MainFrame->TImgBG->Update();
			MainFrame->TImgWave->Left = Xpoint0 + x2*(10.0/MainFrame->Tspan);
			MainFrame->TImgWave->Update();
			if (Terminated)
			break;
		}
		DataCnt += 1;

		if (Terminated)
			break;
	}
}
//---------------------------------------------------------------------------
void __fastcall MyThread::Execute()
{
	gou;
	haba;			                               			// 描画領域のXY幅
	DrawLeftX = 0;                                          // 描画領域左端
	DrawLeftX2 = MainFrame->TImgBG->Width;                	// 描画領域右端
	DrawHeightY = 0;                     					// 描画領域上端
	DrawHeightY2 = MainFrame->TImgBG->Height;				// 描画領域下端

	Ypoint0;
	Xpoint0;


	//---- ここにスレッド コードを記述します ----
	while(1)
	{
		// VCLコンポーネントに対する操作は、Synchronize() メソッド経由で行わなければならない。
		Synchronize(&UpdateDrawing);
		// Queue(&UpdateDrawing);
			// Sleep(10);

		if (Terminated)
			break;
			// return;

	}
}