-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathOptions.cpp
More file actions
40 lines (30 loc) · 1.07 KB
/
Options.cpp
File metadata and controls
40 lines (30 loc) · 1.07 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
#include <vcl\vcl.h>
#pragma hdrstop
#include "Options.h"
#include "Invader.h"
#pragma resource "*.dfm"
TFoptions *Foptions;
__fastcall TFoptions::TFoptions(TComponent *OOwner):TForm(OOwner)
{}
void __fastcall TFoptions::Preset(TObject *Sender)
{
Mus->Checked = Finvade->music;
Snd->Checked = Finvade->sound;
Hard->Position = Finvade->diff;
Bads->Position = Finvade->numbad / 8;
Stars->Position = Finvade->numstars;
Speed->Position = Finvade->gamespeed;
}
void __fastcall TFoptions::okbutClick(TObject *Sender)
{
Finvade->music = Mus->Checked;
Finvade->sound = Snd->Checked;
Finvade->diff = Hard->Position;
Finvade->numbad = 8 * Bads->Position;
Finvade->numstars = Stars->Position;
Finvade->gamespeed = Speed->Position;
if(Finvade->diff < 0 || Finvade->diff > 5) Finvade->diff = 0;
if(Finvade->numstars < 0 || Finvade->numstars > 6) Finvade->numstars = 3;
if(Finvade->gamespeed < 1 || Finvade->gamespeed > 500) Finvade->gamespeed = 1;
if(Finvade->numbad != 8 && Finvade->numbad != 16 && Finvade->numbad != 24) Finvade->numbad = 16;
}