medlmen

Все поправил.

Круто кастом локи рисуиш?

Я хз как их тут делать.

Спасиб огромное с меня +

Ну мб он до етого момента его не нашол.

спс

Вот CLuck Cluck Boom. prontera,187,209,4 script Stop The Clock::Ev_StopClock 485,{ if (getgmlevel() == 50) goto L_GM; if ($@kc > 0 && @kcid != $@kcid) goto L_eventstarted; mes "[Stop The Clock]"; mes "Здравствуй ^FF0000"+strcharinfo(0)+"^000000, чем могу помочь?"; menu "^FF0000[Stop The Clock]^000000 информация",L_info,"Выход",-; close; L_info: next; mes "[Stop The Clock]"; mes "^FF0000Stop the clock^000000 это игра, где нужно кликать на нпц"; next; mes "[Stop The Clock]"; mes "Человек, который часы ближе к 1000 остановит, победит!"; mes "^FF0000[Note] Чтобы иметь шанс к победе нужно оставить часы от 950 до 1000^000000"; next; mes "[Stop The Clock]"; mes "Приз: ^FF0000["+getitemname($itemid)+"]^000000"; close; L_eventstarted: set @kcid,$@kcid; setd ".timing_" + .number, $@kc; setd ".player_" + .number + "$", strcharinfo(0); set .number, .number+1; if ($@kc == 1000) { announce "ДжекПот! "+strcharinfo(0)+" остановил часы на "+$@kc+".",0,0x00EEFF; } else { announce ""+strcharinfo(0)+" остановил часы на "+$@kc+".",0,0x00EEFF; } end; L_GM: mes "[Stop The Clock]"; mes "Дарова Администратор, что хотели?"; mes "Приз: ^FF0000["+getitemname($itemid)+"]^000000"; menu "Изменить приз",L_configure,"Начать эвент",-,"Остановить эвент",L_stop; if (.start == 1) goto L_started; next; mes "[Stop The Clock]"; mes "Эвент стартовал"; close2; L_startevent: set .start, 1; announce "[Stop The Clock] Старт через 1 минуту!",0,0xE38217; sleep2 30000; if (.start == 0) goto L_suddenstop; announce "[Stop The Clock] Старт через 30 секунд!",0,0xE38217; sleep2 20000; if (.start == 0) goto L_suddenstop; announce "[Stop The Clock] Старт через 10 секунд!",0,0xE38217; sleep2 5000; if (.start == 0) goto L_suddenstop; announce "[Stop The Clock] Старт через 5 секунд!",0,0xE38217; sleep2 5000; if (.start == 0) goto L_suddenstop; announce "[Stop The Clock] Начался! Клик, клик!",0,0xE38217; set .number, 1; set .count, 1000; set .winner, 0; set $@kc,0; set $@kci,0; set $@kcid,rand(100000,999999); while ($@kc < 1100) { set $@kc,$@kc+1; set $@kci,$@kci+1; if ($@kci == 100 || ($@kci == 10 && $@kc > 600) || ($@kci == 1 && $@kc >= 950 && $@kc < 1050)) { if (.start == 0) goto L_suddenstop; announce $@kc,0; set $@kci,0; specialeffect 18; } sleep 10; } set $@kc,0; set .start, 0; set .players, .number+1; onfinish: sleep 1; if (.count == 949) goto onfinish3; if (getd(".timing_" + .number) == .count) goto L_winner1; set .number, .number-1; if (.number != 0) goto onfinish; set .number, 1; if (.winner == 1) goto onfinish3; set .count, .count-1; onfinish2: sleep 1; if (.count == 949) goto onfinish3; if (getd(".timing_" + .number) == .count) goto L_winner2; set .number, .number+1; if (.number != .players) goto onfinish2; set .number, .number-1; if (.winner == 1) goto onfinish3; set .count, .count-1; goto onfinish; L_winner1: if (getd(".timing_" + .number) == 1000) { announce ""+getd(".player_" + .number + "$")+" wins! (Prize x2 for stopping exactly on 1000)",0; charcommand "#item " + $itemid + " 2 " + getd(".player_" + .number + "$"); } else { announce ""+getd(".player_" + .number + "$")+" wins!",0; charcommand "#item " + $itemid + " 1 " + getd(".player_" + .number + "$"); } set .number, .number-1; set .winner, 1; goto onfinish; L_winner2: if (getd(".timing_" + .number) == 1000) { announce ""+getd(".player_" + .number + "$")+" wins! (Prize x2 for stopping exactly on 1000)",0; charcommand "#item " + $itemid + " 2 " + getd(".player_" + .number + "$"); } else { announce ""+getd(".player_" + .number + "$")+" wins!",0; charcommand "#item " + $itemid + " 1 " + getd(".player_" + .number + "$"); } set .number, .number+1; set .winner, 1; goto onfinish2; onfinish3: sleep 1; set .number, .players-1; while (.number != 0) { set getd(".timing_" + .number), 0; set .number, .number-1; } end; L_started: next; mes "[Stop The Clock]"; mes "Эвент уже стартовал!"; close; L_configure: next; mes "[Stop The Clock]"; mes "Пожалуйста введите id приза."; input $itemid; next; mes "[Stop The Clock]"; mes "Уверены что хотите ^FF0000"+getitemname($itemid)+"^000000 изменить приз эвента?"; menu "Да",-,"Нет",L_no; next; mes "[Stop The Clock]"; mes "Приз изменен на ^FF0000["+getitemname($itemid)+"]^000000."; next; goto L_GM; L_no: goto L_configure; L_stop: next; if (.start == 1) { mes "[Stop The Clock]"; mes "Эвент стартовал, уверены что хотите остановить эвент?"; menu "Да",-,"Нет",-; if (@menu == 1) { next; set .start, 0; mes "[Stop The Clock]"; mes "Эвент остановлен"; next; goto L_GM; } else { next; goto L_GM; } } else { mes "[Stop The Clock]"; mes "Эвент уже начался!"; close; } L_suddenstop: announce "[Stop The Clock] Эвент остановлен администрацией",0,0xE38217; end; OnClock1800: if (gettime(4) == 1 || gettime(4) == 3 || gettime(4) == 5 || gettime(4) == 7) end; goto L_startevent; }

Дело в том што на локацыи не ламаитца бб што нужно зделать штобы Ламалось вот скрипт. // Branch Rooms warper with password for private rooms. // Scripted by: [Leon] prontera,140,182,1 script Branch Arena 107,{ //NPC SETTINGS ~ //Сколька нужно zeny чтобы попасть на приватную комнату? set @privatezeny, 10000000; //Сколька нужно zeny чтобы попасть на публичную комнату? set @publiczeny, 5000000; //Какого npc имя ты хотел написать сообщение? set @npcname$, "Branch Room"; L_start: set @header$,"[^0000ff" + @npcname$ + "^000000]"; mes @header$; mes "Привет. Чтобы вы хотели сделать?"; next; switch (select("Зарезервируйте частную комнату", "Использовать публичную комнату [^ff0000" + getmapusers("pvp_y_1-5") + "^000000]", "Выйти")){ case 1: mes @header$; mes "Чтобы зарезервировать частную арену вам требуется иметь ^ff0000" + @privatezeny + " zeny^000000."; mes "Пожалуйста выберите частную комнату."; next; set @room, select("Частная комната 1 [^ff0000" + getmapusers("pvp_n_1-1") + "^000000]", "Частная комната 2 [^ff0000" + getmapusers("pvp_n_1-2") + "^000000]", "Частная комната 3 [^ff0000" + getmapusers("pvp_n_1-3") + "^000000]", "Частная комната 4 [^ff0000" + getmapusers("pvp_n_1-4") + "^000000]", "Частная комната 5 [^ff0000" + getmapusers("pvp_n_5-1") + "^000000]", "Частная комната 6 [^ff0000" + getmapusers("pvp_n_6-1") + "^000000]", "Частная комната 7 [^ff0000" + getmapusers("pvp_n_7-1") + "^000000]", "Частная комната 8 [^ff0000" + getmapusers("pvp_n_8-1") + "^000000]"); set @mapname$, "pvp_n_" + @room + "-1"; if (zeny < @privatezeny){ mes @header$; mes "Жаль, но вы не имеете достаточного количества zeny. Хотели бы вы использовать общественную комнату? [^ff0000" + getmapusers("pvp_y_1-5") + "^000000]"; next; if (select("Да","Нет") == 1) goto L_publicroom; goto L_start; } if (getmapusers(@mapname$) < 1){ mes @header$; mes "Пожалуйста введите пороль. Люди которые не знают пороля, не смогут зайти в эту частную комнату."; next; input @pass$; if (getmapusers(@mapname$) > 0){ mes @header$; mes "Жаль, но комната была взята, в то время как мы болтали."; goto L_start; } set .pass$[@room],@pass$; warp @mapname$,0,0; set zeny, zeny - @privatezeny; end; } else { mes @header$; mes "В этой комнате есть уже кто - то. Пожалуйста введите его пароль, чтобы попасть туда."; next; input @pass$; if (@pass$ != .pass$[@room]) { mes @header$; mes "Извените, но пороль не правильныйt."; next; goto L_start; } warp @mapname$,0,0; end; } case 2: L_publicroom: mes @header$; mes "Вход в общественную комнату будит стоить ^ff0000" + @publiczeny + " zeny^000000."; next; if (zeny < @publiczeny){ mes @header$; mes "Извените, но вы не имеете достаточно количества zeny."; next; goto L_start; } menu "Войти в общественную комнату",-; mes @header$; mes "Пожалуйста имейте в виду.Администрация не несет отвественности на случай, если у вас украли монстра, используя общественную комнату."; close2; set zeny, zeny - @publiczeny; warp "pvp_y_1-5",0,0; end; case 3: mes @header$; mes "Приходите ещё."; close; } } //Nowarpto mapflags, so you won't be able to @warp to those maps. pvp_n_1-1 mapflag nowarpto pvp_n_1-2 mapflag nowarpto pvp_n_1-3 mapflag nowarpto pvp_n_1-4 mapflag nowarpto pvp_n_5-1 mapflag nowarpto pvp_n_6-1 mapflag nowarpto pvp_n_7-1 mapflag nowarpto pvp_n_8-1 mapflag nowarpto pvp_y_1-5 mapflag nowarpto

Спс огромное.