Crazier

Lights!

Nov 19, 04:52 AM

Cause I missed the old qbasic days where we play tune via beep!

Show source code

#include <windows.h>
#include <iostream>
#include <math.h>

using namespace std;

void turn(float hz, int delay){
	float wk;
	bool tap=false;
	wk=floor(hz/100);
	cout << hz << "," << delay << "\r\n";
	if(wk>=0 && wk <=4){
		keybd_event(VK_NUMLOCK,NULL,NULL,NULL);
		keybd_event(VK_NUMLOCK,NULL,KEYEVENTF_KEYUP,NULL); 
	}else if(wk>=5 && wk<=8){
		keybd_event(VK_CAPITAL,NULL,NULL,NULL);
		keybd_event(VK_CAPITAL,NULL,KEYEVENTF_KEYUP,NULL); 
	}else{
		keybd_event(VK_SCROLL,NULL,NULL,NULL);
		keybd_event(VK_SCROLL,NULL,KEYEVENTF_KEYUP,NULL);
	}
	Beep(hz,delay);
	if(tap){
		Sleep(10);
		delay=delay-10;
		if(wk==1){
			keybd_event(VK_NUMLOCK,NULL,NULL,NULL);
			keybd_event(VK_NUMLOCK,NULL,KEYEVENTF_KEYUP,NULL); 
		}else if(wk==2){
			keybd_event(VK_CAPITAL,NULL,NULL,NULL);
			keybd_event(VK_CAPITAL,NULL,KEYEVENTF_KEYUP,NULL); 
		}else{
			keybd_event(VK_SCROLL,NULL,NULL,NULL);
			keybd_event(VK_SCROLL,NULL,KEYEVENTF_KEYUP,NULL);
		}
	}
	Sleep (delay);
}

void main(){
	turn(1480,200);

	turn(1568,200);

	turn(1568,200);

	turn(1568,200);



	turn(739.99,200);

	turn(783.99,200);

	turn(783.99,200);

	turn(783.99,200);



	turn(369.99,200);

	turn(392,200);

	turn(369.99,200);

	turn(392,200);

	turn(392,400);

	turn(196,400);



	turn(739.99,200);

	turn(783.99,200);

	turn(783.99,200);

	turn(739.99,200);

	turn(783.99,200);

	turn(783.99,200);

	turn(739.99,200);

	turn(783.99,200);

	turn(880,200);

	turn(830.61,200);

	turn(880,200);

	turn(987.77,400);


	turn(880,200);

	turn(783.99,200);

	turn(698.46,200);

	turn(739.99,200);

	turn(783.99,200);

	turn(783.99,200);

	turn(739.99,200);

	turn(783.99,200);

	turn(783.99,200);

	turn(739.99,200);

	turn(783.99,200);

	turn(880,200);

	turn(830.61,200);

	turn(880,200);

	turn(987.77,400);

	Sleep(200);
	  
	turn(1108,10);
	turn(1174.7,200);
	turn(1480,10);
	turn(1568,200);


	Sleep(200);
	turn(739.99,200);

	turn(783.99,200);

	turn(783.99,200);

	turn(739.99,200);

	turn(783.99,200);

	turn(783.99,200);

	turn(739.99,200);

	turn(783.99,200);

	turn(880,200);

	turn(830.61,200);

	turn(880,200);

	turn(987.77,400);


	turn(880,200);

	turn(783.99,200);

	turn(698.46,200);


	turn(659.25,200);

	turn(698.46,200);

	turn(784,200);

	turn(880,400);

	turn(784,200);

	turn(698.46,200);

	turn(659.25,200);



	turn(587.33,200);

	turn(659.25,200);

	turn(698.46,200);

	turn(784,400);

	turn(698.46,200);

	turn(659.25,200);

	turn(587.33,200);



	turn(523.25,200);

	turn(587.33,200);

	turn(659.25,200);

	turn(698.46,400);

	turn(659.25,200);

	turn(587.33,200);

	turn(493.88,200);

	turn(523.25,200);


	Sleep(400);
	turn(349.23,400);

	turn(392,200);

	turn(329.63,200);

	turn(523.25,200);

	turn(493.88,200);

	turn(466.16,200);



	turn(440,200);

	turn(493.88,200);

	turn(523.25,200);

	turn(880,200);

	turn(493.88,200);

	turn(880,200);

	turn(1760,200);

	turn(440,200);



	turn(392,200);

	turn(440,200);

	turn(493.88,200);

	turn(783.99,200);

	turn(440,200);

	turn(783.99,200);

	turn(1568,200);

	turn(392,200);



	turn(349.23,200);

	turn(392,200);

	turn(440,200);

	turn(698.46,200);

	turn(415.2,200);

	turn(698.46,200);

	turn(1396.92,200);

	turn(349.23,200);



	turn(329.63,200);

	turn(311.13,200);

	turn(329.63,200);

	turn(659.25,200);

	turn(698.46,400);

	turn(783.99,400);



	turn(440,200);

	turn(493.88,200);

	turn(523.25,200);

	turn(880,200);

	turn(493.88,200);

	turn(880,200);

	turn(1760,200);

	turn(440,200);



	turn(392,200);

	turn(440,200);

	turn(493.88,200);

	turn(783.99,200);

	turn(440,200);

	turn(783.99,200);

	turn(1568,200);

	turn(392,200);



	turn(349.23,200);

	turn(392,200);

	turn(440,200);

	turn(698.46,200);

	turn(659.25,200);

	turn(698.46,200);

	turn(739.99,200);

	turn(783.99,200);

	turn(392,200);

	turn(392,200);

	turn(392,200);

	turn(392,200);

	turn(196,200);

	turn(196,200);

	turn(196,200);



	turn(185,200);

	turn(196,200);

	turn(185,200);

	turn(196,200);

	turn(207.65,200);

	turn(220,200);

	turn(233.08,200);

	turn(246.94,200);
}