Nie ma problemu
Zrobiłem to teraz na szyko, więc efekt jest troche brzydki ale nad designem popracować można
Skiptime.sqs . W inicjacji np: można taki wstawić: [] exec "skiptime.sqs"
- Kod: Zaznacz cały
_ok = createDialog "skip_time"
?!(_ok) : hint "Error";exit
@skip_time_dialog_end
exit
Do wklejenia w description.ext:
- Kod: Zaznacz cały
#define ST_LEFT 0
#define ST_RIGHT 1
#define ST_CENTER 2
#define ST_MULTI 16
#define ST_SHADOW 256
#define ST_NO_RECT 512
#define CT_STATIC 0
#define ST_PICTURE 48
#define FontM "tahomaB36"
#define FontHTML "CourierNewB64"
#define CT_ACTIVETEXT 11
#define CT_BUTTON 1
#define ST_FRAME 64
#define CT_EDIT 2
#define CT_COMBO 4
#define CT_LISTBOX 5
#define CT_SLIDER 3
#define ST_HPOS 0x0F
class RscText
{
type = CT_STATIC;
idc = -1;
style = ST_LEFT;
colorBackground[] = {0, 0, 0, 0};
colorText[] = {1, 1, 1, 1};
font = FontM;
sizeEx = 0.04;
};
class RscPicture
{
type = CT_STATIC;
idc = -1;
style = ST_PICTURE;
colorBackground[] = {0, 0, 0, 0};
colorText[] = {1, 1, 1, 1};
font = FontM;
sizeEx = 0.04;
};
class RscActiveText
{
type = CT_ACTIVETEXT;
idc = -1;
style = ST_LEFT;
color[] = {1, 1, 1, 1};
colorActive[] = {1, 0, 0, 1};
font = FontM;
sizeEx = 0.04;
soundEnter[] = {"ui\ui_over", 0.2, 1};
soundPush[] = {, 0.2, 1};
soundClick[] = {"ui\ui_ok", 0.2, 1};
soundEscape[] = {"ui\ui_cc", 0.2, 1};
default = false;
};
class RscButton
{
type = CT_BUTTON;
idc = -1;
style = ST_CENTER;
colorText[] = {0, 0, 0, 1};
font = FontHTML;
sizeEx = 0.025;
soundPush[] = {, 0.2, 1};
soundClick[] = {"ui\ui_ok", 0.2, 1};
soundEscape[] = {"ui\ui_cc", 0.2, 1};
default = false;
};
class RscFrame
{
type = CT_STATIC;
idc = -1;
style = ST_FRAME;
colorBackground[] = {0, 0, 0, 0};
colorText[] = {1, 1, 1, 1};
font = FontM;
sizeEx = 0.04;
};
class RscEdit
{
type = CT_EDIT;
idc = -1;
style = ST_LEFT;
font = FontHTML;
sizeEx = 0.02;
colorText[] = {0, 0, 0, 1};
colorSelection[] = {0.5, 0.5, 0.5, 1};
autocomplete = false;
text = ;
};
class RscLB_C
{
style = ST_LEFT;
idc = -1;
colorSelect[] = {0.4, 0.4, 0.4, 1};
colorSelectBackground[] = {0.2, 0.2, 0.2, 1};
colorText[] = {0.2, 0.2, 0.2, 1};
colorBackground[] = {0.4, 0.4, 0.4, 1};
font = FontHTML;
sizeEx = 0.025;
rowHeight = 0.04;
};
class RscListBox: RscLB_C
{
type = CT_LISTBOX;
};
class RscCombo: RscLB_C
{
type = CT_COMBO;
wholeHeight = 0.3;
};
class RscSliderH
{
type = CT_SLIDER;
style = ST_HPOS;
color[] = {0.2, 0.2, 0.2, 1};
idc = -1;
sizeEx = 0.025;
};
class skip_time
{
idd = 00100;
movingEnable = true;
controlsBackground[] = {backg, frame};
objects[] = { };
controls[] = {slider, guzik};
class backg: RscText
{
colorBackground[] = {0.4, 0.4, 0.4, 0.75};
text = ;
x = 0.0125;
y = 0.02534;
w = 0.18125;
h = 0.23392;
};
class frame : RscText
{
x = 0.0125
y = 0.02534
idc = -1
w = 0.18125
h = 0.23392
style = ST_FRAME
colorText[] = {0, 0, 0, 1};
colorBackground[] = {0.4, 0.4, 0.4, 0.75};
SizeEX = 0.025
text = "Skip Time"
};
class slider : RscSliderH
{
x = 0.02
y = 0.1
idc = 00101
w = 0.15
h = 0.04
style = ST_HPOS
colorText[] = {0.2, 0.2, 0.2, 1};
SizeEX = 0.025
};
class guzik : RscButton
{
x = 0.02
y = 0.2
idc = 00102
w = 0.16
h = 0.04
style = ST_CENTER
colorText[] = {0, 0, 0, 1};
font = "CourierNewB64"
SizeEX = 0.025
text = "OK"
action = "skip_hour=sliderPosition 00101;skip_time_dialog_end=true;closeDialog 00100"
default = false
};
};
I zmieniony lekko skrpyt script.sqs:
- Kod: Zaznacz cały
onMapSingleClick {}
_pos = _this select 0
_unit = _this select 1
@(speed _unit >= 190)
titletext[" ","WHITE OUT",.1]
~.01
skipTime skip_hour
_unit setpos _pos
~.01
titletext[" ","WHITE IN",.1]
exit
I pozatym wszystko jest tak jak w pierwszym poście
Jakby co...to mam jeszcze w wersji rar...nie chciało mi się do pbo zapisywać
http://mpsg.boo.pl/files/humve.Intro.rar