npc_job_wizard.txt

传奇3源程序, 用vc开发的

		next;
		mes "[カトリーヌ]";
		mes "頑張って！";
		mes "試験官のおじさんが待ってるよ！";
		close;
		end;

//--------------------------------------------------------------試験３失敗
L_PART8:
	if (job_wizard_q != 6) goto L_PART9;
		mes "[カトリーヌ]";
		mes "テストを途中でやめちゃったの？";
		mes "そんなに弱い人とは思って無かったよ。";
		next;
		if (Sex != 1) goto L_IsFemale9;
			mes "[カトリーヌ]";
			mes "いくら力のないマジシャンだからって";
			mes "そんなに簡単にやられてどうするの！";
			mes "もう一度行ってきなさい。";
			goto L_Continue9;
		L_IsFemale9:
			mes "[カトリーヌ]";
			mes "女だからって弱いふりしてちゃだめよ！";
			mes "ウィザードになるんでしょう？";
			next;
			mes "[カトリーヌ]";
			mes "私もすごく難しいと思ったけど、";
			mes "あきらめるほどじゃなかったわよ！";
			mes "困難にもちゃんと立ち向かって！";
	L_Continue9:
		next;
		mes "[カトリーヌ]";
		mes "頑張って！";
		mes "試験官のおじさんが待ってるよ！";
		close;

//--------------------------------------------------------------試験３成功
L_PART9:
	if (job_wizard_q != 7) goto L_QuitScript;
		if (SkillPoint == 0) goto L_NoSkPoints;
			mes "[カトリーヌ]";
			mes "試験は終わったのね？";
			mes "うーん、でも、まだスキルポイントが";
			mes "残っているわよ。";
			mes "使い切ってからまた来てね！";
			close;
			end;
	L_NoSkPoints:
		mes "[カトリーヌ]";
		mes "すごいわ！試験終了よ！";
		mes "おめでとう、おめでとう、おめでとう！";
		next;
		mes "[カトリーヌ]";
		mes "っと、そんなことより、";
		mes "早く転職させてあげないとね！";
		next;
		set job_wizard_q,0;
		jobchange Job_Wizard;
		mes "[カトリーヌ]";
		mes "もう君はウィザードよ！";
		mes "ウィザードらしく振舞ってね！";
		mes "私たちは強力な魔法を持ってるから、";
		mes "使うときは気をつけないといけないの。";
		next;
		mes "[カトリーヌ]";
		mes "街でいたずらに魔法を乱射しちゃだめ。";
		mes "ラグの原因になるし、";
		mes "魔法はモンスターに使うものだからね。";
		next;
		mes "[カトリーヌ]";
		mes "他の人とパーティを組みながら";
		mes "成長していってね。";
		mes "ああ、それと、これはプレゼントよ！";
		next;
		mes "[カトリーヌ]";
		mes "ごそごそ???";
		mes "ごそごそ???";
		next;
		getitem "Blue_Potion",6;
		mes "[カトリーヌ]";
		mes "うまく使ってね！";
		mes "私からのプレゼントなんだから、";
		mes "ちゃんと全部飲んでよね！";
		next;
		mes "じゃあ、ウィザードとして";
		mes "素敵に生きていってね";
		close;
L_QuitScript:
	close;
}

//================= 試験官：ラウル?エクスパガラス ========================
//=============== ミッション１、ミッション２、アリーナへ ==================
gef_tower.gat,102,24,2	script	陰気なウィザード	735,{
// ---------------------------------------------------------------JOBの確認
   	if (Class == 2) goto L_PART2;
		if (Class == 9) goto L_IsWizard;
		if (Class == 8) goto L_IsPriest;
		if (Class == 0) goto L_IsNovice;
		
		mes "[ラウル]";
		mes "あぁ、全身が苦しい…";
		mes "まるで氷の中にいるようだ…";
		next;
		mes "[ラウル]";
		mes "何だお前は？あっちに行ってくれ。";
		close;
		end;
	L_IsWizard:
		mes "[ラウル]";
		mes "ゴホッゴホッ、俺に何のようだ？";
		mes "ふむ、お前も魔法を使うようだな。";
		next;
		mes "[ラウル]";
		mes "遊んでばかりいると、";
		mes "いずれ魔法を制御できなくなるだろう。";
		if (Sex != 1) goto L_IsFemale;
			mes "そうなりたくなければ、";
			mes "もっと正しい使い方を学んで";
			mes "おくんだな。";
			next;
			mes "[ラウル]";
			mes "女なんかに気をとられてると、";
			mes "いずれ廃人になるだろうな。クク。";
			close;
			end;
		L_IsFemale:
			mes "全力で学ぶんだな。それがいやなら";
			mes "ウィザードなんてやめちまえ。";
			next;
			mes "[ラウル]";
			mes "そんなに勉強したくないなら、";
			mes "主婦でもなれ。";
			close;
			end;
		
	L_IsPriest:
		mes "[ラウル]";
		mes "失せろ、聖職者め！";
		mes "魔法は神の力なんかじゃない。";
		next;
		mes "[ラウル]";
		mes "そうでなくても、俺は気分がよくない。";
		mes "さっさと失せろ！";
		close;
		end;
	L_IsNovice:
		mes "[ラウル]";
		mes "なんでガキがこんなところにいるんだ？";
		mes "とっとと失せろ！";
		close;
		warp "geffen.gat",120,110;

//-------------------------------------------------------------------未登録
L_PART2:
	if (job_wizard_q != 0) goto L_PART3;
		mes "[ラウル]";
		mes "ゴホッ、誰だが知らんが、";
		mes "お前に付き合ってる時間は無い。";
		next;
		mes "[ラウル]";
		mes "あっちへいけ。";
		close;
		end;

//-------------------------------------------------------------試験１の途中
L_PART3:
	if (job_wizard_q != 1 && job_wizard_q != 2) goto L_PART4;
		mes "[ラウル]";
		mes "フン！お前がウィザードになりに";
		mes "来た奴か？ええ？";
		next;
		mes "[ラウル]";
		mes "マジシャンのままで、こつこつと";
		mes "生活したほうがいいぞ？";
		next;
		mes "[ラウル]";
		mes "ウィザードはもっと高尚な職業だ。";
		close;
		end;

//---------------------------------------------------------------試験２開始
L_PART4:
	if (job_wizard_q != 3) goto L_PART5;
		set @wizard_r,0;
		mes "[ラウル]";
		mes "最初の試験に合格したようだな。";
		mes "そう、俺が試験官のラウル?エクスパガラス様だ。";
		next;
		mes "[ラウル]";
		mes "まだ遅くないぞ？  故郷に帰って";
		mes "平和な生活を送ったらどうだ？";
		next;
		mes "[ラウル]";
		mes "お前はまだ理解していないのだな。";
		mes "魔法がどんなに危険なものなのか。";
		next;
		menu "平凡なのマジシャンとして生きます",-,"転職試験を続けます",L_BeWiz;

			mes "[ラウル]";
			mes "賢明な判断だな。ゴホッゴホッ";
			mes "ウィザードは難しい職業だ。";
			mes "魔法は本来人間が使うものではないの";
			mes "だから。";
			next;
			mes "[ラウル]";
			mes "塔を降りろ。そして振り返るな。";
			mes "今使える魔法を使って";
			mes "平和に生きることだ。";
			close;
			end;
	L_BeWiz:
		mes "[ラウル]";
		mes "ハハハ、ここに馬鹿がいるぞ！";
		mes "お前がどれだけできるか見せて貰おう。";
		next;
//-----------------------------------------------------------------筆記試験
	L_M2Start:
	mes "[ラウル]";
	mes "それでは試験を開始しよう！";
	mes "１つでも間違えれば脱落だからな！";
	next;
	mes "[ラウル]";
	mes "10問だすから全て正解して見せろ！";
	mes "間違えても何を間違えたかは";
	mes "教えてやらんからな。";
	next;
	set @wizard_m2,rand(3);
	set @wizard_t,0;
	mes "[ラウル]";
	mes "ゴホッ、それでは問題だ！";
	next;

//	-----------------筆記試験：魔法問題----------------
	if (@wizard_m2 != 0) goto L_M2_P2_Q1;
	L_M2_Q1:
		mes "[ラウル]";
		mes "1. ファイヤーウォールの";
		mes "所得条件では無いものは？";
		next;
		menu "ファイヤーボルト Lv 4",L_M2_Q2, "ファイヤーボール Lv 5",L_M2_Q2, "サイト Lv 1",L_M2_Q2, "ナパームビート Lv 4",-;
		set @wizard_t,@wizard_t + 10;
	L_M2_Q2:
		mes "[ラウル]";
		mes "2. フロストダイバで凍らせた";
		mes "敵の属性はどうなる？";
		next;
		menu "水属性になる",-, "地属性になる",L_M2_Q3, "火属性になる",L_M2_Q3, "風属性になる",L_M2_Q3;
		set @wizard_t,@wizard_t + 10;
	L_M2_Q3:
		mes "[ラウル]";
		mes "3. ナパームビートをマスターすると";
		mes "ダメージはMATKの何倍になる？";
		next;
		menu "1.6倍",L_M2_Q4, "1.7倍",-, "2倍",L_M2_Q4, "20倍",L_M2_Q4;
		set @wizard_t,@wizard_t + 10;
	M2_Q4:
		mes "[ラウル]";
		mes "4. ストーンカースに必要なものは？";
		next;
		menu "レッドブラッド",M2_Q5, "ブルージェムストーン",M2_Q5, "イエロージェムストーン",M2_Q5, "レッドジェムストーン",-;
		set @wizard_t,@wizard_t + 10;
	L_M2_Q5:
		mes "[ラウル]";
		mes "5. セイフティウォールをマスター";
		mes "するために必要ではないものは？";
		next;
		menu "ナパームビート Lv 4",L_M2_Q6, "ソウルストライク Lv 5",L_M2_Q6, "SP回復力向上 Lv. 6",-, "セイフティウォール Lv 7",L_M2_Q6;
		set @wizard_t,@wizard_t + 10;
	L_M2_Q6:
		mes "[ラウル]";
		mes "6. SP回復力向上Lv 7のとき、";
		mes "10秒間に回復するint加重値なしの";
		mes "SP回復量は？";
		next;
		menu "14",L_M2_Q7, "21",-, "28",L_M2_Q7, "35",L_M2_Q7;
		set @wizard_t,@wizard_t + 10;
	L_M2_Q7:
		mes "[ラウル]";
		mes "7. SPが50%残っている場合、";
		mes "エネルギーコートのダメージ減少量と";
		mes "SP消費量は？";
		next;
		menu "ダメージ18% SP1.5%",L_M2_Q8, "ダメージ18% SP2%",-, "ダメージ24% SP1.5%",L_M2_Q8, "ダメージ24% SP2%",L_M2_Q8;
		set @wizard_t,@wizard_t + 10;
	L_M2_Q8:
		mes "[ラウル]";
		mes "8. セイフティウォールLv6の使用SPと";
		mes "防御回数は？";
		next;
		menu "SP 40, 6回",L_M2_Q9, "SP 35, 6回",L_M2_Q9, "SP 40, 7回",-, "SP 35, 7回",L_M2_Q9;
		set @wizard_t,@wizard_t + 10;
	L_M2_Q9:
		mes "[ラウル]";
		mes "9. サンダーストームLv10の";
		mes "SP消費量は？";
		next;
		menu "84",L_M2_Q10, "74",-, "64",L_M2_Q10, "54",L_M2_Q10;
		set @wizard_t,@wizard_t + 10;
	L_M2_Q10:
		mes "[ラウル]";
		mes "10. イズルードダンジョンで效果的な";
		mes "スキルはどれか？";
		next;
		menu "ライトニングボルト",-, "ファイヤーボルド",M2_End, "コールドボルト",M2_End, "サイト",M2_End;
		set @wizard_t,@wizard_t + 10;
		goto L_M2_End;
//	-----------------筆記試験：モンスター問題----------------
	L_M2_P2_Q1:
	if (@wizard_m2 != 1) goto L_M2_P3_Q1;
		mes "[ラウル]";
		mes "1. スロット付きガードを落とすのは？";
		next;
		menu "盗蟲",L_M2_P2_Q2, "ペコペコ",L_M2_P2_Q2, "プパ",-, "鈍器コボルド",L_M2_P2_Q2;
		set @wizard_t,@wizard_t + 10;
	L_M2_P2_Q2:
		mes "[ラウル]";
		mes "2. 次のうちマジシャンが一番";
		mes "倒しやすいモンスターは？";
		next;
		menu "フローラ",-, "ガイアス",L_M2_P2_Q3, "ゴーレム",L_M2_P2_Q3, "ミスト",L_M2_P2_Q3;
		set @wizard_t,@wizard_t + 10;
	L_M2_P2_Q3:
		mes "[ラウル]";
		mes "3. ストーンカースが全く通じない";
		mes "モンスターは？";
		next;
		menu "エルダーウィロー",L_M2_P2_Q4, "イービルドルイド",-, "白蓮玉",L_M2_P2_Q4, "マルク",L_M2_P2_Q4;
		set @wizard_t,@wizard_t + 10;
	L_M2_P2_Q4:
		mes "[ラウル]";
		mes "風属性で水属性Lv.3モンスターを";
		mes "攻撃する場合のダメージ補正は？";
		next;
		menu "125%",L_M2_P2_Q5, "150%",L_M2_P2_Q5, "175%",L_M2_P2_Q5, "200%",-;
		set @wizard_t,@wizard_t + 10;
	L_M2_P2_Q5:
		mes "[ラウル]";
		mes "5. 子デザートウルフと";
		mes "ファーミリアが闘ったら、";
		mes "どちらが勝つか？";
		next;
		menu "子デザートウルフ",-, "ファミリア",L_M2_P2_Q6, "引き分け",L_M2_P2_Q6, "わからない",L_M2_P2_Q6;
		set @wizard_t,@wizard_t + 10;
	L_M2_P2_Q6:
		mes "[ラウル]";
		mes "6. ペットに出来ないモンスターは？";
		next;
		menu "ポポリン",L_M2_P2_Q7, "ロッダフロッグ",-, "スモーキー",L_M2_P2_Q7, "ポイズンスポア",L_M2_P2_Q7;
		set @wizard_t,@wizard_t + 10;
	L_M2_P2_Q7:
		mes "[ラウル]";
		mes "7. 火に弱いモンスターは？.";
		next;
		menu "短剣ゴブリン",L_M2_P2_Q8, "鈍器ゴブリン",L_M2_P2_Q8, "鉄鎖ゴブリン",L_M2_P2_Q8, "斧ゴブリン",-;
		set @wizard_t,@wizard_t + 10;
	L_M2_P2_Q8:
		mes "[ラウル]";
		mes "8. 次のうち最も魔法防御力が";
		mes "高いモンスターは？";
		next;
		menu "ホロン",L_M2_P2_Q9, "チョンチョン",L_M2_P2_Q9, "アンドレ",L_M2_P2_Q9, "キャラメル",-;
			set @wizard_t,@wizard_t + 10;
	L_M2_P2_Q9:
		mes "[ラウル]";
		mes "9. 種族の違うモンスターは？";
		next;
		menu "ポリン",L_M2_P2_Q10, "マスターリング",L_M2_P2_Q10, "ゴーストリング",-, "スポア",L_M2_P2_Q10;
		set @wizard_t,@wizard_t + 10;
	L_M2_P2_Q10:
		mes "[ラウル]";
		mes "10. アンデッドではないのは？";
		next;
		menu "ドレイク",L_M2_End, "メガロドン",L_M2_End, "デビアス",-, "カーリッツバーグ",L_M2_End;
		set @wizard_t,@wizard_t + 10;
		goto L_M2_End;

//	-----------------筆記試験：マジシャン問題----------------
	L_M2_P3_Q1:
		mes "[ラウル]";
		mes "1. マジシャンに一番重要な";
		mes "ステータスは？";
		next;
		menu "INT",-, "AGI",L_M2_P3_Q2, "DEX",L_M2_P3_Q2, "VIT",L_M2_P3_Q2;
		set @wizard_t,@wizard_t + 10;
	L_M2_P3_Q2:
		mes "[ラウル]";
		mes "2. ボルト系魔法で抜けている属性は？";
		next;
		menu "水属性",L_M2_P3_Q3, "地属性",-, "火属性",L_M2_P3_Q3, "風属性",L_M2_P3_Q3;
		set @wizard_t,@wizard_t + 10;
	L_M2_P3_Q3:
		mes "[ラウル]";
		mes "3. マジシャンの特徴でないものは？";
		next;
		menu "体力が低い",L_M2_P3_Q4, "遠距離攻撃する",L_M2_P3_Q4, "お金儲けしやすい",-, "魔法防御力が高い",L_M2_P3_Q4;