//Code for a minimal screensaver
//
#include <windows.h>
#include <scrnsave.h>

char str[80] = "Windows 98 Screensaver";

int delay = 200;

LRESULT WINAPI ScreenSaverProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
	static HDC hdc;
	static unsigned int timer;
	static RECT srcdim;
	static SIZE size;
	static int X = 0, Y = 0;
	static HBRUSH hBlkBrush;
	static TEXTMETRIC tm;

	switch(message)
	{
	case WM_CREATE:
		timer = SetTimer(hwnd, 1, delay, NULL);
		hBlkBrush = (HBRUSH) GetStockObject(BLACK_BRUSH);
		break;

	case WM_ERASEBKGND:

		hdc = GetDC(hwnd);

		//get coordinates of the screen
		GetClientRect(hwnd, &scrdim);

		//erase the screen
		SelectObject(hdc, hBlkBrush);
		PatBlt(hdc, 0, 0, scrdim.right, scrdim.bottom, PATCOPY);

		//get and save height and length of string
		GetTextMetrics(hdc, &tm);
		GetTextExtentPoint32(hdc, str, strlen(str), &size);

		ReleaseDC(hwnd, hdc);
		break;
		
	case WM_TIMER:
		hdc = GetDC(hwnd);

		//erase previous output
		SelectObject(hdc, hBlkBrush);
		PatBlt(hdc, X, Y, X + size.cx, Y + size.cy, PATCOPY);

		//move the string to a new location
		X += 10; Y += 10;
		if(X > scrdim.right) X = 0
		if(Y > scrdim.bottom) Y = 0

		//output string
		SetBkColor(hdc, RGB(0,0,0));
		SetTextColor(hdc, RGB(0,255,255));
		TextOut(hdc, X, Y, str, strlen(str));

		ReleaseDC(hwnd, hdc);
		break;

	case WM_DESTROY:
		KillTimer(hwnd, timer);
		break;

	default:
		return DefScreenSaverProc(hwnd, message, wParam, lParam);
	}

	return 0;
}


//placeholder dialog box function
BOOL WINAPI ScreenSaverCofigureDialog(HWND, hdwnd, UNIT message, WPARAM wParam, LPARAM lParam)
{
	return 0;
}

//no class to register
BOOL WINAPI RegisterDialogClasses(HANDLE hInst)
{
	return 1;
}


//it requires the following resource file:
/*
#include <windows.h>
#include <scnsave.h>

ID_APP ICON SCRICON.ICO

STRINGTABLE
{
	IDS_DESCRIPTION "My Screen Saver #1"
}

*/
 

#include <windows.h>
#include <scrnsave.h>

char str[80] = "Windows Screensaver";

int delay = 200;

#pragma comment ( lib, "scrnsave.lib" )
#pragma comment ( lib, "comctl32.lib" )


LRESULT WINAPI ScreenSaverProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
	static HDC hdc;
	static unsigned int timer;
	static RECT scrdim;
	static SIZE size;
	static int X = 0, Y = 0;
	static HBRUSH hBlkBrush;
	static TEXTMETRIC tm;

	switch(message)
	{
	case WM_CREATE:
		timer = (UINT) SetTimer(hwnd, 1, delay, NULL);
		hBlkBrush = (HBRUSH) GetStockObject(BLACK_BRUSH);
		break;

	case WM_ERASEBKGND:

		hdc = GetDC(hwnd);

		//get coordinates of the screen
		GetClientRect(hwnd, &scrdim);

		//erase the screen
		SelectObject(hdc, hBlkBrush);
		PatBlt(hdc, 0, 0, scrdim.right, scrdim.bottom, PATCOPY);

		//get and save height and length of string
		GetTextMetrics(hdc, &tm);
		GetTextExtentPoint32(hdc, str, (int) strlen(str), &size);

		ReleaseDC(hwnd, hdc);
		break;
		
	case WM_TIMER:
		hdc = GetDC(hwnd);

		//erase previous output
		SelectObject(hdc, hBlkBrush);
		PatBlt(hdc, X, Y, X + size.cx, Y + size.cy, PATCOPY);

		//move the string to a new location
		X += 10; Y += 10;
		if(X > scrdim.right) X = 0;
		if(Y > scrdim.bottom) Y = 0;

		//output string
		SetBkColor(hdc, RGB(0,0,0));
		SetTextColor(hdc, RGB(0,255,255));
		TextOut(hdc, X, Y, str, (int) strlen(str));

		ReleaseDC(hwnd, hdc);
		break;

	case WM_DESTROY:
		KillTimer(hwnd, timer);
		break;

	default:
		return DefScreenSaverProc(hwnd, message, wParam, lParam);
	}

	return 0;
}


//placeholder dialog box function
BOOL WINAPI ScreenSaverConfigureDialog(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
	return 0;
}

//no class to register
BOOL WINAPI RegisterDialogClasses(HANDLE hInst)
{
	return 1;
}

#include <windows.h>
#include <scrnsave.h>

ID_APP ICON SCRICON.ICO

STRINGTABLE
{
	IDS_DESCRIPTION "My Screen Saver #1"
}