Тема: Смена профессии

Назад

Смена профессии

Автор: ????: Дата: 02.11.2009

Этот сменщик просто меняет профессию за деньги)) Ну + добавляет немного джобов, то есть за профу 2-2 )

prontera,147,168,5 script Смена профы 832,{ 

mes "[Смена профы]"; 

mes "Привет я могу поменять твою профессию"; 

mes "Естественно за бабло"; 

mes "Чтобы поменять профессию тебе надо последнюю профу и лв 200"; 

mes "Ты хочеш поменять профессию это стоит 30кк"; 

menu "Да поменяй",-,"Не зачем?",L_No; 

next; 

mes "Выбирай профессию"; 

menu "Профессор",L_pro,"Сталкер",L_Sta,"Ассасин Кросс",L_Sin,"Хай Виззард",L_Wiz,"Лорд Кнайт",L_Lord,"Паладин",L_Pal,"Креатор",L_Kreo,"Вайтсмит",L_Smit,"Хай Прист",L_Prist,"Чампион",L_Champ,"Снайпер",L_Snaip,"Клоун",L_Klo,"Гипси",L_Gip; 



L_pro: 

mes "Ты уверен что хочеш стать Профессором?"; 

menu "Да",-,"Нет",L_No; 

if (Zeny < 30000000) goto L_Zeny; 

if (Baselevel < 200) goto L_Mal; 

if (class == 4017) goto L_Net; 

if (class < 4008) goto L_Prof; 

mes "Начинаем сменять профу"; 

atcommand "@job 4017"; 

atcommand "@joblvl 60"; 

set Zeny,Zeny-30000000; 

mes "Вроде всё"; 

close; 



L_Sta: 

mes "Ты уверен что хочеш стать Сталкером?"; 

menu "Да",-,"Нет",L_No; 

if (Zeny < 30000000) goto L_Zeny; 

if (Baselevel < 200) goto L_Mal; 

if (class == 4018) goto L_Net; 

if (class < 4008) goto L_Prof; 

mes "Начинем сменять профу"; 

atcommand "@job 4018"; 

atcommand "@joblvl 60"; 

set Zeny,Zeny-30000000; 

mes "Вроде всё"; 

close; 



L_Sin: 

mes "Ты уверен что хочеш стать Ассасином Кроссом?"; 

menu "Да",-,"Нет",L_No; 

if (Zeny < 30000000) goto L_Zeny; 

if (Baselevel < 200) goto L_Mal; 

if (class == 4013) goto L_Net; 

if (class < 4008) goto L_Prof; 

mes "Начинаем сменять профу"; 

atcommand "@job 4013"; 

atcommand "@joblvl 60"; 

set Zeny,Zeny-30000000; 

mes "Вроде всё"; 

close; 



L_Wiz: 

mes "Ты уверен что хочеш стать Хай-Визом?"; 

menu "Да",-,"Нет",L_No; 

if (Zeny < 30000000) goto L_Zeny; 

if (Baselevel < 200) goto L_Mal; 

if (class == 4010) goto L_Net; 

if (class < 4008) goto L_Prof; 

mes "Начинаем сменять профу"; 

atcommand "@job 4010"; 

atcommand "@joblvl 60"; 

set Zeny,Zeny-30000000; 

mes "Вроде всё"; 

close; 



L_Lord: 

mes "Ты уверен что хочеш стать Лорд Кнайтом?"; 

menu "Да",-,"Нет",L_No; 

if (Zeny < 30000000) goto L_Zeny; 

if (Baselevel < 200) goto L_Mal; 

if (class == 4008) goto L_Net; 

if (class < 4008) goto L_Prof; 

mes "Начинаем сменять профу"; 

atcommand "@job 4008"; 

atcommand "@joblvl 60"; 

set Zeny,Zeny-30000000; 

mes "Вроде всё"; 

close; 



L_Pal: 

mes "Ты уверен что хочеш стать Паладином?"; 

menu "Да",-,"Нет",L_No; 

if (Zeny < 30000000) goto L_Zeny; 

if (Baselevel < 200) goto L_Mal; 

if (class == 4015) goto L_Net; 

if (class < 4008) goto L_Prof; 

mes "Начинаем сменять профу"; 

atcommand "@job 4015"; 

atcommand "@joblvl 60"; 

set Zeny,Zeny-30000000; 

mes "Вроде всё"; 

close; 



L_Kreo: 

mes "Ты уверен что хочеш стать Креатором?"; 

menu "Да",-,"Нет",L_No; 

if (Zeny < 30000000) goto L_Zeny; 

if (Baselevel < 200) goto L_Mal; 

if (class == 4019) goto L_Net; 

if (class < 4008) goto L_Prof; 

mes "Начинаем сменять профу"; 

atcommand "@job 4019"; 

atcommand "@joblvl 60"; 

set Zeny,Zeny-30000000; 

mes "Вроде всё"; 

close; 



L_Smit: 

mes "Ты уверен что хочеш стать Вайтсмитом?"; 

menu "Да",-,"Нет",L_No; 

if (Zeny < 30000000) goto L_Zeny; 

if (Baselevel < 200) goto L_Mal; 

if (class == 4011) goto L_Net; 

if (class < 4008) goto L_Prof; 

mes "Начинаем сменять профу"; 

atcommand "@job 4011"; 

atcommand "@joblvl 60"; 

set Zeny,Zeny-30000000; 

mes "Вроде всё"; 

close; 



L_Prist: 

mes "Ты уверен что хочеш стать Пристом?"; 

menu "Да",-,"Нет",L_No; 

if (Zeny < 30000000) goto L_Zeny; 

if (Baselevel < 200) goto L_Mal; 

if (class == 4009) goto L_Net; 

if (class < 4008) goto L_Prof; 

mes "Начинаем сменять профу"; 

atcommand "@job 4009"; 

atcommand "@joblvl 60"; 

set Zeny,Zeny-30000000; 

mes "Вроде всё"; 

close; 



L_Champ: 

mes "Ты уверен что хочеш стать Чампом?"; 

menu "Да",-,"Нет",L_No; 

if (Zeny < 30000000) goto L_Zeny; 

if (Baselevel < 200) goto L_Mal; 

if (class == 4016) goto L_Net; 

if (class < 4008) goto L_Prof; 

mes "Начинаем сменять профу"; 

atcommand "@job 4016"; 

atcommand "@joblvl 60"; 

set Zeny,Zeny-30000000; 

mes "Вроде всё"; 

close; 



L_Snaip: 

mes "Ты уверен что хочеш стать Снайпом?"; 

menu "Да",-,"Нет",L_No; 

if (Zeny < 30000000) goto L_Zeny; 

if (Baselevel < 200) goto L_Mal; 

if (class == 4012) goto L_Net; 

if (class < 4008) goto L_Prof; 

mes "Начинаем сменять профу"; 

atcommand "@job 4012"; 

atcommand "@joblvl 60"; 

set Zeny,Zeny-30000000; 

mes "Вроде всё"; 

close; 



L_Klo: 

mes "Ты уверен что хочеш стать Клоуном?"; 

menu "Да",-,"Нет",L_No; 

if (Zeny < 30000000) goto L_Zeny; 

if (Baselevel < 200) goto L_Mal; 

if (class == 4020) goto L_Net; 

if (class < 4008) goto L_Prof; 

if (sex == f) goto L_sex; 

mes "Начинаем сменять профу"; 

atcommand "@job 4020"; 

atcommand "@joblvl 60"; 

set Zeny,Zeny-30000000; 

mes "Вроде всё"; 

close; 



L_Gip: 

mes "Ты уверен что хочеш стать Гипси?"; 

menu "Да",-,"Нет",L_No; 

if (Zeny < 30000000) goto L_Zeny; 

if (Baselevel < 200) goto L_Mal; 

if (class == 4021) goto L_Net; 

if (class < 4008) goto L_Prof; 

if (sex == m) goto L_sex; 

mes "Начинаем сменять профу"; 

atcommand "@job 4021"; 

atcommand "@joblvl 60"; 

set Zeny,Zeny-30000000; 

mes "Вроде всё"; 

close; 



L_No: 

mes "[Хирург]"; 

mes "Как хош если что приходи"; 

close; 



L_Zeny: 

mes "У тя не хватает зени"; 

close; 



L_Mal: 

mes "Твой лвл маловат чтобы сменить профу"; 

close; 



L_Net: 

mes "У тебя и так эта профессия"; 

close; 



L_Prof: 

mes "У тебя не последняя профессия приходи когда получищ её"; 

close; 



L_sex: 

mes "Ты не того пола чтобы получить эту профессию"; 

close; 

}

Сам писал )

Автор: : Дата: 01.01.1970