//-----------------------------------------------------------------------------+
//元「DF40_Action_TEST.txt」　DF402用に改修
//潜伏ゲームの再検討用の戦闘試験
//-----------------------------------------------------------------------------+


CALL DF402/LOAD.txt,L_LOAD;//シーン間の読み込み
//LoadingMSG DF40_startup.png;

//DataLoad3 G_save0.txt;
//DatAutoSave true;

//------------------------------------------------------------------------------
INI seen;

//Music LOAD,7yu.mid;
//Music PLAY,true;


//CALL DF37_char_set.txt,SET_BODY-CS;//SET_CPFT-02_1-BODY2;
//CALL DF37_char_set.txt,SET_CPFT-02_1-FACE01;//顔
//CALL DF37_char_set.txt,SET_MEGA-CS;//メガネ
//CALL DF37_char_set.txt,SET_HAIR-CS;//髪の毛
//CALL DF37_char_set.txt,SET_CPFT-01_1cHUKU2制服;
//CALL DF37_char_set.txt,SET_SHORTS-CS;//●3:下着・水着

////▼ｷｬﾗｸﾀｰﾛｰﾄﾞ・カスタムに応じて読み込む
////CALL DF37_char_set.txt,SET_LayerALL_CS;

CALL DF37_char_set.txt,SET_LayerALL_CS;//140621
// アイテム類を除外に何か意味が？←アイテムもロードされてる
//  SET_Layer6_CS;の重複を除外する為か？
// 従来方式だと拡張ｶｽﾀﾑ無効時に痴漢鉄標準モデルになる対策

XFile4_ID 0,true;

//パラメーター設定すると初期値で非表示になっていた？
//XFile4_ID 0,true;
//XFile4_ID 1,true;
//マップ名ロード画面だ・・・；
//マップ名表示の段階で一度ﾓﾃﾞﾙを非表示にしてたの忘れてた


//Menu_CLS ;

//Menu_INI ;//メニューの設定をクリアする
//Menu_SetPos 10,250;
//Menu_Sprite DF402/top_menu_2.png;
//Menu_SetType 0,120,30,12;

//DF37PAR_Visible false,false,false,1,1,0;//性感ｹﾞｰｼﾞ,不快感,危険 1=上昇時表示


//IconDELL ;//ｱｲｺﾝを消して開放
////IconADD ;
//
//IconADD 録画+オプション+射精+隠蔽スイッチ+速度+OPB+MousePowerCharge;
////IconADD 不快感ゲージ;
//IconADD 快感ゲージ;
//IconADD 自動再生;//DF408
//
////IconADD ｶﾒﾗ404;
////IconADD カメラ男;//DF408
//IconADD カメラ;//DF408
////IconADD 男快感ゲージ;//402 内部的には不快感ゲージとして扱う
//IconADD 男感ゲージ;//402 内部的には不快感ゲージとして扱う
//
//IconMenu KeyInput,false;//キーボードで操作不可！
//↑
CALL DF402/set.txt,Set_icon;


Menu KeyInput,false;//キーボードで操作不可！
4HS_Menu KeyInput,false;//キーボードで操作不可！

//------------------------------------------------------------------------------


//------------------------------------------------------------------------------
* top;
//CALL DF402/set.txt,LOAD;

FPS ini;
FPS Set_CharMAX,2;


FPS FileName,./DF402/saveFPS_dt_Auto.txt;
FPS AutoSave,false;

	//FPS FileName,./DF402/saveFPS_dt_001.txt;
	//FPS Load;//位置や現在のパラメータを再現
	//CALL DF402/set.txt,LOAD;の内部で同時に処理する様に変更

//AIｽｸﾘﾌﾟﾄを使用しない
//FPS_AI SetScriptC,DF40_Action_AIc_00.txt;
//FPS_AI SetScriptA,DF40_Action_AIa_00.txt;
//FPS_AI SetScriptM,DF40_Action_AIm_00.txt;

//CALL DF402/FPS_Action_map_set.txt,Ｄ公園2;
//CALL DF402/FPS_Action_map_set.txt,DF40_駅改札付近;//DF40_AYTR;
//CALL DF402/FPS_Action_map_set.txt,DF40_室内;
//CALL DF402/FPS_Action_map_set.txt,DF40_駅入口;
//CALL DF402/FPS_Action_map_set.txt,DF40_駅入口階段;

//CALL DF402/FPS_Action_map_set.txt,orMAP_駅入口階段_IN1;
//CALL DF402/FPS_Action_map_set.txt,orMAP_駅入口階段_IN2;



//------------------------------------------------------------------------------
* キャラ設定;
//CALL DF402/FPS_Action_char_set.txt,SET_GM4_主人公;
CALL DF402/FPS_Action_char_set.txt,FPS_主人公;


CALL DF402/FPS_Action_char_set.txt,FPS_DF40_ヒロイン1;



FPS mode402;//DF402の仕様に変更する

FPS HUD_Type,経過時間,false;//ﾃﾞﾊﾞｯｸ中は時間表示が有った方が便利
  //経過時間の表示を止める。ｹﾞｰﾑ内時間とも違うしHｼｰﾝはｶｳﾝﾄされないし誤解を防ぐ


//-----------------------------------------------------------------------------+
//FPS Load;//位置や現在のパラメータを再現
CALL DF402/set.txt,LOAD;//トップから移動。ステータスアップを反映する為。


FPS Set_CharViVsr,0,max;//ゲーム開始時は視野率を最大にする

//-----------------------------------------------------------------------------+
//初期のマップ位置

//ロードでのマップの再現
switch @,p_MAP_ID;//0初期　1自宅　2隠れ家ボロ和室　3駅前マンション 4住宅地(外)
switch case,0;
	CALL DF402/FPS_Action_map_set.txt,orMAP_DF40_matiA3_IN1;//駅ビル入り口一階
switch case,1;
	CALL DF402/FPS_Action_map_set.txt,orMAP_DF402_MyHomeB_IN2;//(402自宅２階)自室　（移動じゃない　セーブ用）
switch case,2;
	CALL DF402/FPS_Action_map_set.txt,orMAP_DF402_wasitu_IN1;//(和室)出入り口
switch case,3;
	CALL DF402/FPS_Action_map_set.txt,orMAP_DF402_NEWroom_IN1;//(駅前マンション)出入り口
switch case,4;
	CALL DF402/FPS_Action_map_set.txt,orMAP_DF40_juutakuti_IN6;//（住宅地）セーブ
switch case,5;
	CALL DF402/FPS_Action_map_set.txt,orMAP_DANhome_IN2;//(ダンボールハウスhome)//ロード時
switch case,6;
	CALL DF402/FPS_Action_map_set.txt,orMAP_GOmon1_IN3;//(地下拷問部屋)セーブポイント・ロード再開時
switch case,7;
	CALL DF402/FPS_Action_map_set.txt,orMAP_DF402_GOLDroom_IN2;//(金部屋)セーブ
switch case,8;
	CALL DF402/FPS_Action_map_set.txt,orMAP_SUPERroom_IN2;//(高級マンション)//ロード時
switch end;

//デバック
//CALL DF402/FPS_Action_map_set.txt,orMAP_DF402_PRISON_IN2;//(監禁部屋)拉致された場合


//CALL DF402/FPS_Action_map_set.txt,orMAP_DF40_densya2_IN2;//電車の車内(ジャンプポイント)
//CALL DF402/FPS_Action_map_set.txt,orMAP_DF40_yousitu2_IN1;//自宅？
//CALL DF402/FPS_Action_map_set.txt,orMAP_DF40_matiA3_IN1;//駅ビル入り口一階

//ソープのデバック用
//CALL DF402/FPS_Action_map_set.txt,orMAP_DF40_matiA2_IN7;//（駅北口）夜の店


//------------------------------------------------------------------------------
* メインメニュー;

//FPS Set_CharRETURN,0;//生き返らせる
//FPS Set_CharRETURN,1;

//自動で前回のｵｰﾄｾｰﾌﾞから始める場合
//FPS Load;//位置や現在のパラメータを再現
//ここで再現すると、マップでのｷｬﾗ設定を前回の状態で上書きするので↑に移動

GOTO 戦闘開始;//080202直ぐに戦闘始める。デバック




//------------------------------------------------------------------------------
* 戦闘開始;
//XFile4_ID 6,true;
//Motion_Load DF402/M_stand01_man.txt,false,,30;//テスト

Loop_FPS 1;
//FPS mode402;//↑移動　　DF402の仕様に変更する

//FPS_EF Set_PosDir,サテライター4,1,0,  0,0,0  ,0.3665,0.1128,0.9235;

//FPS ini,EOF;//終了条件のみ初期化
FPS ini,EOF_MAPnot;//MAP関係以外の条件のみ初期化
FPS EOF_Type,自分死亡,0,GAME結果_負HP;
//FPS EOF_Type,敵精神崩壊,0,GAME結果_負SeP;//自分の精神崩壊
FPS EOF_Type,自分精神崩壊,0,GAME結果_負SeP;//DF402。↑では余剰時間に追加攻撃を受けるので
//FPS EOF_Type,敵死亡,1,GAME結果_勝1;
//FPS EOF_Type,敵精神崩壊,2;
//FPS EOF_Type,敵精神崩壊,1,GAME結果_勝2;//080129 数字はキャラID?
FPS EOF_Type,FPSmenu4,0,GAME結果_menu;//
FPS EOF_Type,ComRet,1,内部変更;//ゲーム内コマンドから応答値を返す
FPS EOF_Type,ComRet,0,内部変更;//170423 プレイヤー側からの応答値も拾う！更衣室など
//FPS EOF_Type,時間経過＋隠3,600,GAME結果_time;//10秒に一回ターン処理する。公開時
FPS EOF_Type,時間経過＋隠3,1200,GAME結果_time;//20秒に一回ターン処理する
//FPS EOF_Type,時間経過＋隠3,90,GAME結果_time;//1.5秒。天候変更確認ﾃﾞﾊﾞｯｸ
//FPS EOF_Type,時間経過＋隠3,90,L_戦闘LOOP;//1.5秒。天候変更確認ﾃﾞﾊﾞｯｸ


//------------------------------------------------------------------------------
* L_戦闘LOOP;

Loop_FPS ;
//SelectFPS_GOTO 負け,勝ち１,勝ち２;
Goto@ @RetFps_Word,GAME結果_time,GAME結果_time;//←バカじゃないの？
Goto@ @RetFps_Word,GAME結果_負HP,L_GAME結果_負HP;//負け;
Goto@ @RetFps_Word,GAME結果_負SeP,L_GAME結果_負SeP;//負け;
//Goto@ @RetFps_Word,GAME結果_勝1,勝ち１;
//Goto@ @RetFps_Word,GAME結果_勝2,勝ち２;
Goto@ @RetFps_Word,GAME結果_menu,L_FPSmenu;
Goto@ @RetFps_Word,移動B_1,L_EV001;

//↓Ctrl+Aなどで着替えた場合の警戒。将来はココで？
IconDELL ;//ｱｲｺﾝを消して開放
CALL DF402/set.txt,Set_icon;//アイコンを再準備！

//HEVaaa系　　強姦などの単一攻撃
//HEVMaa系　　派生。顧客からのメニューEVﾒﾆｭｰ
//HEVSaa系　　ﾏｯﾌﾟ店からのメニュー。EVｼｮｯﾌﾟ
//HEVPaa系　　追加。プレイヤー側から襲う合体//P系は戻る時にコマンドを戻さない。
Goto@ @RetFps_Word,HEV001,L_HEV001;//強姦合体
Goto@ @RetFps_Word,HEV003,L_HEV003;//3 痴漢合体
Goto@ @RetFps_Word,HEV005,L_HEV005;//強姦魔２合体
Goto@ @RetFps_Word,HEV006,L_HEV006;//痴漢ダッシュ合体
Goto@ @RetFps_Word,HEVP01,L_HEVP01;//プレイヤー側から襲う合体//P系は戻る時にコマンドを戻さない。
Goto@ @RetFps_Word,HEVP02,L_HEVP02;//監禁魔の合体。レイプ
Goto@ @RetFps_Word,HEVP03,L_HEVP03;//監禁時にプレイヤーから合体する。奉仕タイプ
Goto@ @RetFps_Word,HEVM01,L_HEVM01;//一般客。ﾒﾆｭｰ
Goto@ @RetFps_Word,HEVM02,L_HEVM02;//ここでスル。ﾒﾆｭｰ
Goto@ @RetFps_Word,HEVM03,L_HEVM03;//敵キャラを変更する
Goto@ @RetFps_Word,HEVM04,L_HEVM04;//ｽﾄｰｶｰ。ﾒﾆｭｰ
Goto@ @RetFps_Word,HEVM05,L_HEVM05;//お泊り。ﾒﾆｭｰ
Goto@ @RetFps_Word,HEVM06,L_HEVM06;//ビーチのヤリチン君に声を掛けられるﾒﾆｭｰ
Goto@ @RetFps_Word,HEVM07,L_HEVM07;//兄。接近メニュー
Goto@ @RetFps_Word,HEVM08,L_HEVM08;//痴漢ダッシュ。逃走を捕まえた場合ﾒﾆｭｰ
Goto@ @RetFps_Word,HEVS01,L_HEVS01;//ﾏｯﾌﾟ店からの
Goto@ @RetFps_Word,HEVS02,L_HEVS02;//ﾏｯﾌﾟ兄。話しかける
Goto@ @RetFps_Word,HEVS03,L_HEVS03;//ﾏｯﾌﾟ父。話しかける
Goto@ @RetFps_Word,HEVS04,L_HEVS04;//ﾏｯﾌﾟ公園ボーイ




//-----------------------------------------------------------------------------+
//▼ターン処理
//-----------------------------------------------------------------------------+
//* GAME結果_time;//時間経過のターン処理。マップ移動時の処理は廃止
//CALL DF402/set.txt,DIM_LOOP;//パラメータのターン変化
//GOTO L_戦闘LOOP;

//↓負荷低減の為に展開テスト　←開発性を優先
* GAME結果_time;//時間経過のターン処理。マップ移動時の処理は廃止
* DIM_LOOP;

LET p_汚れ,=,p_汚れ,+,1;

LET p_空腹,=,p_空腹,+,1;//2;//3;

LET p_睡眠,=,p_睡眠,+,1;

LET p_便意,=,p_便意,+,1;

LET p_分間,=,p_分間,+,20;

switch @,p_汚れ;
switch case_d,A<p,100;	RET p_汚れ,=,100;
switch case_d,p<A,0;	RET p_汚れ,=,0;		switch end;

switch @,p_睡眠;
switch case_d,A<p,100;	RET p_睡眠,=,100;
switch case_d,p<A,0;	RET p_睡眠,=,0;		switch end;

switch @,p_空腹;
switch case_d,A<p,100;	RET p_空腹,=,100;
switch case_d,p<A,0;	RET p_空腹,=,0;		switch end;

switch @,p_便意;
switch case_d,A<p,100;	RET p_便意,=,100;
switch case_d,p<A,0;	RET p_便意,=,0;		switch end;


switch @,p_分間;
switch case_d,A<=p,60;
	RET p_分間,=,0;
	LET p_時間,=,p_時間,+,1;
switch end;

switch @,p_時間;
switch case_d,A<=p,24;
	RET p_時間,=,0;
	LET p_日数,=,p_日数,+,1;
	LET p_日齢,=,p_日齢,+,1;
switch end;

RET p_汚れ,int,p_汚れ;
RET p_睡眠,int,p_睡眠;
RET p_空腹,int,p_空腹;
RET p_便意,int,p_便意;

RET p_時間,int,p_時間;
RET p_分間,int,p_分間;
RET p_日数,int,p_日数;
RET p_日齢,int,p_日齢;



//FPS Set_CharCOM_Deff,0,歩行402;
FPS Set_CharCOM_Deff,0,@[p_COM_Deff];
FPS Set_CharST,0,,,,,,,0;//HP自動回復値

switch @,p_睡眠;
switch case_d,A<=p,100;
	FPS Set_CharCOM_Deff,0,歩行402_2;
	FPS Set_CharST_add,0,,,,,,,-1;//HP自動回復値
switch end;

switch @,p_空腹;
switch case_d,A<=p,100;
	FPS Set_CharCOM_Deff,0,歩行402_3;
	FPS Set_CharST_add,0,,,,,,,-1;//HP自動回復値
switch end;

switch @,p_便意;
switch case_d,A<=p,100;
	FPS Set_CharCOM_Deff,0,歩行402_4;
	FPS Set_CharST_add,0,,,,,,,-1;//HP自動回復値
switch end;

// - - - - - - - - - - - - - - - - - - 
DF37PAR_GOTO @[p_時速],=,0,DIM_LOOP_2;

// - - - - - - - - - - - - - - - - - - 
switch @,p_時間;//定期ループでのマップの天候は負荷を考慮してコチラに記述する
switch case_d,p<=A,4;			Map_FPS_Fog 2,ReNot;//夜
switch case_d,A<=p<=B,5,6;		Map_FPS_Fog 3,ReNot;//夕暮れ
switch case_d,A<=p<=B,7,16;		Map_FPS_Fog 6,ReNot;//通常の晴天。
switch case_d,A<=p<=B,17,18;	Map_FPS_Fog 3,ReNot;//夕暮れ
switch case_d,A<=p,19;			Map_FPS_Fog 2,ReNot;//夜
switch end;
GOTO L_天候;//L_戦闘LOOP;

// - - - - - - - - - - - - - - - - - - 
* DIM_LOOP_2;//マップの天候を変更しない場合
Map_FPS_Fog 6,ReNot;//通常の晴天。
GOTO L_天候;//L_戦闘LOOP;

// - - - - - - - - - - - - - - - - - - 
* L_天候;
DF37PAR_GOTO @[p_屋外],=,0,L_天候_no;
// - - - - - - - - - - - - - - - - - - 
RAND@ 0,300;// 0 1 
RET p_A1,=,@RAND;
switch @,p_A1;
switch case_d,p<=A,30;
	Load_MapEFFile map_EF_ame4.x,6;//雨
	CloneReF_MapFile EF;
switch case_d,A<=p<=B,31,40;
	Load_MapEFFile map_EF_yuge2.x,4;//霧・湯気
	CloneReF_MapFile EF;
switch case_d,A<=p<=B,41,100;//晴天に戻す
	Load_MapEFFile ,0;
//switch case_d,A<=p<=B,31,40;//else時は変更しない
switch end;
switch end;
// - - - - - - - - - - - - - - - - - - 
* L_天候_no;
GOTO L_戦闘LOOP;











//-----------------------------------------------------------------------------+
//▼ゲーム内からのコマンドリターン。敵からイベント
//-----------------------------------------------------------------------------+
FPS_AI AI_control,false;//スクリプトＨ中はAI処理を一時止める
FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える

MSG_Cls ;
MSG_Print キャラコマンドからＥＯＦされた;
Loop_MSG true;

GOTO L_戦闘LOOP;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEV_Set;
FPS_AI AI_control,false;//スクリプトＨ中はAI処理を一時止める
//FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える
FPS anime_ParCopy,4;//DF402。cl_anime ← p_FPS  //animeクラスとFPS側のﾊﾟﾗﾒｰﾀ連動
//  Hイベント時に、FPSとanime快感ｹﾞｰｼﾞの連動をﾄｯﾌﾟで纏めずｺﾁﾗで逐一記述するのは
//  携帯ﾒﾆｭｰや他のイベントでFPSｹﾞｰﾑ値が更新される可能性を考慮するため
DF37PAR_SETzet 0;//絶頂数を常に非表示にする工夫
MSG_Cls ;
Menu_CLS ;

IconMenu KeyInput,false;//キーボードで操作不可！
Menu KeyInput,false;//キーボードで操作不可！
4HS_Menu KeyInput,false;//キーボードで操作不可！
RETURN ;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEV_Ret;
FPS anime_ParCopy,3;//DF402。cl_anime → p_FPS  //animeクラスとFPS側のﾊﾟﾗﾒｰﾀ連動
FPS Set_DeffCom,0;//キャラを通常行動に戻す(公開時)
//↑互換性が心配なのでこの記述はこのまま残し、↓はp系イベントとして分離する
//　↑更衣室や強姦ルームなどでイベントコールされた場合、現状の行動コマンドを維持したい為
//　↑ケイタイ経由で呼ばれた場合などは、呼び時にデフォコマンドに戻るはず？
FPS Set_DeffCom,1;//キャラを通常行動に戻す
//FPS Set_CharCOM,0,;//再度即座に合体させない為に、硬直処理を設ける
FPS Set_CharCOM_Hit,1,402M硬直1;
Sound STOP;//ﾋﾟｽﾄﾝ音などを止める
Voice CLS_Buffer;//喘ぎ声などを止める
Loop_4_ft 0,30,1.0;
GOTO L_戦闘LOOP;






// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEV001;//強姦合体入り口  イベント開始点
CALL DF402/set.txt,ADD_レＨ;//夜の公園レイプ被害回数
//入り口はナンバリングせず別に独立して設けようかと思ったが、
//呼び元に分岐を仕込んだ方が自然か？検討中のためこのまま残す

GOTO L_HEV004;






// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEV003;//痴漢合体入り口  イベント開始点
CALL DF402/set.txt,ADD_痴Ｈ;//痴漢被害回数
//GOTO L_HEV002;
//RAND@ 0,2;// 0 1 
RAND@ 0,4;// 0 1 
RET p_A1,=,@RAND;
//Select@ p_A1,GOTO,L_HEV001_1,L_HEV002;
Select@ p_A1,GOTO,L_HEV001_1,L_HEV002,L_HEV002_2,L_HEV002_3;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEV001_1;//抱きつき
GOSUB L_HEV_Set;
FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.01, 0.01, 0;//時間に応じて増える値
XFile4_ID 0,true;
Motion_Load DF402/LM_HEV001.txt,false,,30;//良く考えたら痴漢では？
XFile4_ID 6,true;
Motion_Load DF402/LM_HEV001_man.txt,false,,30;//

	CALL DF402/set_VOICE.txt,L_re_hit;//被害。タッチ　抱きつき・尻・胸など

4HS_EOF_CLS ALL;//EOF全てリセット
4HS_MenuMode 6,;//マウス連打でアクション
4HS_EOF_ADD FPS_DM,1,;//FPSでダメージを受ける
//4HS_EOF_ADD MOUSE_PRESS_L,,;//左ボタン押される
//4HS_EOF_ADD MOUSE_PowerGaugeMIN,,;//マウスのゲージが最小になる
4HS_EOF_ADD MOUSE_PowerGaugeMAX,,;//マウスのゲージが最大になる
4HS_EOF_ADD Gauge_kaikan,100,L_HEV_Ret;//快感ゲージが指定値を超える・精神崩壊
Loop_4_Hscene true;

GOTO L_HEV_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEV002;//痴漢スマタ
GOSUB L_HEV_Set;
FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.01, 0.01, 0;//時間に応じて増える値
XFile4_ID 0,true;
Motion_Load DF402/LM_HEV002.txt,false,,30;//良く考えたら痴漢では？
XFile4_ID 6,true;
Motion_Load DF402/LM_HEV002_man.txt,false,,30;//

	CALL DF402/set_VOICE.txt,L_re_te;//被害。手コキ音声　スマタ

4HS_EOF_CLS ALL;//EOF全てリセット
4HS_MenuMode 6,;//マウス連打でアクション
4HS_EOF_ADD FPS_DM,1,;//FPSでダメージを受ける
4HS_EOF_ADD MOUSE_PowerGaugeMAX,,;//マウスのゲージが最大になる
4HS_EOF_ADD Gauge_kaikan,100,L_HEV_Ret;//快感ゲージが指定値を超える・精神崩壊
Loop_4_Hscene true;

GOTO L_HEV_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEV002_2;//背後から抱きついて乳揉み
GOSUB L_HEV_Set;
FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.01, 0.01, 0;//時間に応じて増える値
XFile4_ID 0,true;
Motion_Load DF402/LM_HEV002_2.txt,false,,30;//良く考えたら痴漢では？
XFile4_ID 6,true;
Motion_Load DF402/LM_HEV002_2_man.txt,false,,30;//

	CALL DF402/set_VOICE.txt,L_re_te;//被害。手コキ音声　スマタ

4HS_EOF_CLS ALL;//EOF全てリセット
//4HS_MenuMode 3,;//振る1
//4HS_MenuMode 4,;//振る2  連打だと脱出後に攻撃が誤爆するので振るを試す
4HS_MenuMode 12,;//振る2  連打だと脱出後に攻撃が誤爆するので振るを試す
//4HS_MenuMode 6,;//マウス連打でアクション
4HS_EOF_ADD FPS_DM,1,;//FPSでダメージを受ける
4HS_EOF_ADD MOUSE_PowerGaugeMAX,,;//マウスのゲージが最大になる
4HS_EOF_ADD Gauge_kaikan,100,L_HEV_Ret;//快感ゲージが指定値を超える・精神崩壊
Loop_4_Hscene true;

Loop_4_ft -,30,1.0;
GOTO L_HEV_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEV002_3;//正面から抱きついて尻もみ
GOSUB L_HEV_Set;
FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.01, 0.01, 0;//時間に応じて増える値
XFile4_ID 0,true;
Motion_Load DF402/LM_HEV002_3.txt,false,,30;//良く考えたら痴漢では？
XFile4_ID 6,true;
Motion_Load DF402/LM_HEV002_3_man.txt,false,,30;//

	CALL DF402/set_VOICE.txt,L_re_te;//被害。手コキ音声　スマタ

4HS_EOF_CLS ALL;//EOF全てリセット
4HS_MenuMode 12,;//振る3
4HS_EOF_ADD FPS_DM,1,;//FPSでダメージを受ける
4HS_EOF_ADD MOUSE_PowerGaugeMAX,,;//マウスのゲージが最大になる
4HS_EOF_ADD Gauge_kaikan,100,L_HEV_Ret;//快感ゲージが指定値を超える・精神崩壊
Loop_4_Hscene true;

Loop_4_ft -,30,1.0;
GOTO L_HEV_Ret;









// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEV004;//強姦正常位
GOSUB L_HEV_Set;
//FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える
FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

CALL DF402/set.txt,液_start;//合体時に飛び散る液

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.03, 0.02,  0;//時間に応じて増える値
DF37PAR_PGP    0, 0.04,  0;//
//DF37PAR_PP2 0.9, 0.02,  0;//デバック
XFile4_ID 0,true;
Motion_Load DF402/LM_HEV004.txt,false,,30;//良く考えたら痴漢では？
XFile4_ID 6,true;
Motion_Load DF402/LM_HEV004_man.txt,false,,30;//

	CALL DF402/set_VOICE.txt,L_re_sex;//被害。挿入音声

4HS_EOF_CLS ALL;//EOF全てリセット
4HS_MenuMode 6,;//マウス連打でアクション
4HS_EOF_ADD FPS_DM,1,;//FPSでダメージを受ける
4HS_EOF_ADD MOUSE_PowerGaugeMAX,,;//マウスのゲージが最大になる
4HS_EOF_ADD Gauge_kaikan,100,L_HEV_Ret;//快感ゲージが指定値を超える・精神崩壊
Loop_4_Hscene true;

GOTO L_HEV_Ret;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEV005;//強姦バック
GOSUB L_HEV_Set;
FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

CALL DF402/set.txt,液_start;//合体時に飛び散る液

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.03, 0.02,  0;//時間に応じて増える値
DF37PAR_PGP    0, 0.04,  0;//
XFile4_ID 0,true;
Motion_Load DF402/LM_HEV005.txt,false,,30;//良く考えたら痴漢では？
XFile4_ID 6,true;
Motion_Load DF402/LM_HEV005_man.txt,false,,30;//

	CALL DF402/set_VOICE.txt,L_re_sex;//被害。挿入音声

4HS_EOF_CLS ALL;//EOF全てリセット
4HS_MenuMode 6,;//マウス連打でアクション
4HS_EOF_ADD FPS_DM,1,;//FPSでダメージを受ける
4HS_EOF_ADD MOUSE_PowerGaugeMAX,,;//マウスのゲージが最大になる
4HS_EOF_ADD Gauge_kaikan,100,L_HEV_Ret;//快感ゲージが指定値を超える・精神崩壊
Loop_4_Hscene true;

GOTO L_HEV_Ret;





// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEV006;//痴漢ダッシュ合体
GOSUB L_HEV_Set;
//FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える
FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える

//CALL DF402/set.txt,液_start;//合体時に飛び散る液
//非挿入は液を出さない？走って捕まえる必要性が無くなるのはゲーム的に困る

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.03, 0.02,  0;//時間に応じて増える値
DF37PAR_PGP    0, 0.04,  0;//

switch rand,3;
	XFile4_ID 0,true;
	Motion_Load DF402/LM_HEV006.txt,false,,30;//良く考えたら痴漢では？
	XFile4_ID 6,true;
	Motion_Load DF402/LM_HEV006_man.txt,false,,30;//
switch case,2;
	XFile4_ID 0,true;
	Motion_Load DF402/LM_HEV006_2.txt,false,,30;
	XFile4_ID 6,true;
	Motion_Load DF402/LM_HEV006_2_man.txt,false,,30;//
switch case,3;
	XFile4_ID 0,true;
	Motion_Load DF402/LM_HEV006_3.txt,false,,30;
	XFile4_ID 6,true;
	Motion_Load DF402/LM_HEV006_3_man.txt,false,,30;//
switch end;


	CALL DF402/set_VOICE.txt,L_re_sex;//被害。挿入音声

4HS_EOF_CLS ALL;//EOF全てリセット
4HS_MenuMode 6,;//マウス連打でアクション
4HS_EOF_ADD FPS_DM,1,;//FPSでダメージを受ける
4HS_EOF_ADD MOUSE_PowerGaugeMAX,,;//マウスのゲージが最大になる
4HS_EOF_ADD Gauge_kaikan,100,L_HEV_Ret;//快感ゲージが指定値を超える・精神崩壊
Loop_4_Hscene true;


FPS Set_CharPT,1,,402_15,;//161116 DF402 痴漢は一度離れると逃げる
GOTO L_HEV_Ret;



//-----------------------------------------------------------------------------+
//　HEV007　→　HEVP01　に








//-----------------------------------------------------------------------------+
//▼　プレイヤー側から襲う合体//P系は戻る時にコマンドを戻さない。
//-----------------------------------------------------------------------------+

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVP_Set;
FPS_AI AI_control,false;//スクリプトＨ中はAI処理を一時止める
//FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える
FPS anime_ParCopy,4;//DF402。cl_anime ← p_FPS  //animeクラスとFPS側のﾊﾟﾗﾒｰﾀ連動
//  Hイベント時に、FPSとanime快感ｹﾞｰｼﾞの連動をﾄｯﾌﾟで纏めずｺﾁﾗで逐一記述するのは
//  携帯ﾒﾆｭｰや他のイベントでFPSｹﾞｰﾑ値が更新される可能性を考慮するため
DF37PAR_SETzet 0;//絶頂数を常に非表示にする工夫
MSG_Cls ;
Menu_CLS ;

IconMenu KeyInput,false;//キーボードで操作不可！
Menu KeyInput,false;//キーボードで操作不可！
4HS_Menu KeyInput,false;//キーボードで操作不可！
RETURN ;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVP_Ret;
FPS anime_ParCopy,3;//DF402。cl_anime → p_FPS  //animeクラスとFPS側のﾊﾟﾗﾒｰﾀ連動
//FPS Set_DeffCom,0;//キャラを通常行動に戻す(公開時)
//　↑更衣室や強姦ルームなどでイベントコールされた場合、現状の行動コマンドを維持したい為
//　↑ケイタイ経由で呼ばれた場合などは、呼び時にデフォコマンドに戻るはず？
FPS Set_DeffCom,1;//キャラを通常行動に戻す
//FPS Set_CharCOM,0,;//再度即座に合体させない為に、硬直処理を設ける
FPS Set_CharCOM_Hit,1,402M硬直1;//終了時のモーションを、ココに来る以前に指定したい
//FPS Set_CharCOM_Hit,1,402M硬直2;//合体攻撃解除後の一定時間硬直動作。モーション事前指定。5秒
Sound STOP;//ﾋﾟｽﾄﾝ音などを止める
Voice CLS_Buffer;//喘ぎ声などを止める
//Loop_4_ft 0,30,1.0;
Loop_4_ft -,3,0.1;//動きをゆっくりに。失敗・解除時に視覚的に区別出来る様に
GOTO L_戦闘LOOP;


//-----------------------------------------------------------------------------+
* L_HEVP01;//プレイヤー側から襲う合体1  更衣室イベントなど
GOSUB L_HEVP_Set;
//FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える
FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える

//CALL DF402/set.txt,液_start;//合体時に飛び散る液
//非挿入は液を出さない？走って捕まえる必要性が無くなるのはゲーム的に困る

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.00, 0.00,  0;//時間に応じて増える値
DF37PAR_PGP    0, 0.04,  0;//

XFile4_ID 0,true;
Motion_Load DF402/LM_HEV007.txt,false,,30;//足踏み
XFile4_ID 6,true;
Motion_Load DF402/LM_HEV007_man.txt,false,,30;//

	CALL DF402/set_VOICE.txt,L_re_sex;//被害。挿入音声

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FPS_DM,1,;//FPSでダメージを受ける
4HS_EOF_ADD MOUSE_PowerGaugeMIN,,;//マウスのゲージが最小になる
Loop_4_Hscene true;

GOTO L_HEVP_Ret;









//-----------------------------------------------------------------------------+
//監禁魔の合体！
//-----------------------------------------------------------------------------+


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVP_Set2;//監禁ルームの強姦専用。  絶頂数を表示する為にコチラのパスを使う
FPS_AI AI_control,false;//スクリプトＨ中はAI処理を一時止める
FPS anime_ParCopy,4;//DF402。cl_anime ← p_FPS  //animeクラスとFPS側のﾊﾟﾗﾒｰﾀ連動
MSG_Cls ;
Menu_CLS ;
IconMenu KeyInput,false;//キーボードで操作不可！
Menu KeyInput,false;//キーボードで操作不可！
4HS_Menu KeyInput,false;//キーボードで操作不可！
RETURN ;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVP_Ret2;//号感じ業感じ強姦時？蒸気上記使用が思い出せないので分離する
	XFile4_ID 6,true;//男性事後の硬直モーションを全体位共通にする案
	Motion_Load DF402/L_PRISON_Fera_aft1_man.txt,false,,20;
	XFile4_ID 0,true;
FPS anime_ParCopy,3;//DF402。cl_anime → p_FPS  //animeクラスとFPS側のﾊﾟﾗﾒｰﾀ連動
FPS Set_CharCOM_Hit,1,402M硬直2;//合体攻撃解除後の一定時間硬直動作。モーション事前指定。5秒
Sound STOP;//ﾋﾟｽﾄﾝ音などを止める
Voice CLS_Buffer;//喘ぎ声などを止める
Loop_4_ft 0,30,1.0;
GOTO L_戦闘LOOP;



//-----------------------------------------------------------------------------+
* L_HEVP02;//監禁魔の合体！
GOSUB L_HEVP_Set2;
FPS Set_CharCOM_Hit,0,歩行402_監禁;//合体後は監禁モードに？
//FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える
FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える

CALL DF402/set.txt,液_start;//合体時に飛び散る液

//合体時にランダムで体位を選ぶ
RAND@ 0,3;// 0 1 
RET p_A1,=,@RAND;
Select@ p_A1,GOTO,L_HEVP02_1back_1,L_HEVP02_2sei_1,L_HEVP02_3kijo_1;
//* L_HEVP02_1back_1;//背後位
//* L_HEVP02_2sei_1;//正常位。受動
//* L_HEVP02_3kijo_1;//騎乗位。受動

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVP02_1back_1;//背後位
DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.10, 0.02,  0;//時間に応じて増える値
DF37PAR_PGP 0.08, 0.02,  0;//　操作で増える値だが、ココでは操作しない

XFile4_ID 0,true;//背後位。男が腰を使うノーマル。無操作放置
Motion_Load DF402/L_PRISON_SEX1back_1.txt,false,,30;
XFile4_ID 6,true;
Motion_Load DF402/L_PRISON_SEX1back_1_man.txt,false,,30;

	CALL DF402/set_VOICE.txt,L_re_sex;//被害。挿入音声

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 0,,;

4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FPS_DM,1,;//FPSでダメージを受ける
4HS_EOF_ADD MOUSE_PRESS_L,,L_HEVP02_1back_2;//左ボタン押される
//4HS_EOF_ADD MOUSE_PRESS_R,,L_HEVP02_1back_3;//右ボタン押される
4HS_EOF_ADD Gauge_kaikan,100,;//快感ゲージMAX。
4HS_EOF_ADD FlameTime,600,L_HEVP02_1back_fin1;
//Ｈシーンのループ開始からのフレーム時間。毎回絶頂ではなく、一定時間で体位チェンジの為に分離する
//女性の精神が高いと絶頂しないので、一定時間で絶頂させる。
//変わりに、快感ゲージＭＡＸは特にイベントを設けず精神崩壊死亡扱いにする
Loop_4_Hscene true;

GOTO L_HEVP_Ret2;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVP02_1back_2;//背後位//体位変更  手動操作。女性側が能動

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.01, 0.02,  0;//時間に応じて増える値
DF37PAR_PGP 0.02, 0.10,  0;//

XFile4_ID 0,true;//女性側が腰を振る。プレイヤー操作
Motion_Load DF402/L_PRISON_SEX1back_2.txt,false,,30;
XFile4_ID 6,true;
Motion_Load DF402/L_PRISON_SEX1back_2_man.txt,false,,30;

	CALL DF402/set_VOICE.txt,L_re_sex;//被害。挿入音声

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

//4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化
4HS_MenuMode 13;//7改。402、ﾊﾟﾗﾒｰﾀ変化

4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FPS_DM,1,;//FPSでダメージを受ける
4HS_EOF_ADD Gauge_hukai,100,L_HEVP02_1back_fin2;//不快感ゲージMAX。
4HS_EOF_ADD MOUSE_PowerGaugeMIN,,L_HEVP02_1back_1;//マウスのゲージが最小になる
Loop_4_Hscene true;

GOTO L_HEVP_Ret2;



//監禁時のフィニッシュ表現は、通常とは別にする
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVP02_1back_fin1;//背後位//絶頂？時間制限。男性無理矢理。受動？

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.01, 0.00,  0;//時間に応じて増える値
DF37PAR_PGP 0.01, 0.04,  0;//
Menu_CLS Menu;

//頭部の動きが激しいので不自然になる。
//	CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
//switch rand,4;//女性台詞
//	MSG4_Print いやだ・・・;
//switch case,2;
//	MSG4_Print もうゆるして;
//switch case,3;
//	MSG4_Print もうやだぁ;
//switch case,4;
//	MSG4_Print あぁ・・・;
//switch end;
	CALL DF402/set_VOICE.txt,L_bi_max;//ビッチ。本番絶頂　加速時

XFile4_ID 0,true;//腕を掴んで男性側が腰を振る
Motion_Load DF402/L_PRISON_SEX1back_3.txt,false,,30;
XFile4_ID 6,true;
Motion_Load DF402/L_PRISON_SEX1back_3_man.txt,false,,30;

4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

	CALL DF402/set_VOICE.txt,L_外_max2;//ビッチ。本番絶頂　射精時　野外Ｈ客
XFile4_ID 6,true;	Motion_SetSpeed 0.1;//出る時はゆっくりに
XFile4_ID 0,true;	Motion_SetSpeed 0.1;
DF37PAR_ADD 10, 0, 0;
SYASEI 膣内2;//挿入部周辺から腹に掛けて。チンポからも少し出す
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

//DF37PAR_SET ,99,;//敵をギリギリ死なない値に変更
DF37PAR_ADD ,,,1;//絶頂カウントアップ
GOTO L_HEVP_Ret2;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVP02_1back_fin2;//背後位//女性の能動で男が果てる。外だし

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.01, 0.00,  0;//時間に応じて増える値
DF37PAR_PGP 0.01, 0.04,  0;//
Menu_CLS Menu;

//頭部の動きが激しいので不自然になる。
//	CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
//switch rand,4;//女性台詞
//	MSG4_Print さっさとイけ;
//switch case,2;
//	MSG4_Print 全部出してハテろ;
//switch case,3;
//	MSG4_Print くっ！さっさと;
//switch case,4;
//	MSG4_Print いけっ！いけっ！;
//switch end;
	CALL DF402/set_VOICE.txt,L_bi_max;//ビッチ。本番絶頂　加速時

XFile4_ID 6,true;	Motion_SetSpeed 3.0;//少し加速
XFile4_ID 0,true;	Motion_SetSpeed 3.0;

4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

	CALL DF402/set_VOICE.txt,L_外_max2;//ビッチ。本番絶頂　射精時　野外Ｈ客
XFile4_ID 6,true;
Motion_Load DF402/L_PRISON_SEX1back_fin2_man.txt,false,,30;
XFile4_ID 0,true;//腕を掴んで男性側が腰を振る
Motion_Load DF402/L_PRISON_SEX1back_fin2.txt,false,,30;

DF37PAR_ADD 10, 0, 0;
SYASEI チン放;//チンポからだす２。放物線
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

//DF37PAR_SET ,99,;//敵をギリギリ死なない値に変更
DF37PAR_ADD ,,,1;//絶頂カウントアップ
GOTO L_HEVP_Ret2;










//-----------------------------------------------------------------------------+
* L_HEVP02_2sei_1;//正常位。受動
DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.10, 0.02,  0;//時間に応じて増える値
DF37PAR_PGP 0.08, 0.02,  0;//　操作で増える値だが、ココでは操作しない

XFile4_ID 0,true;//背後位。男が腰を使うノーマル。無操作放置
Motion_Load DF402/L_PRISON_SEX2sei_1.txt,false,,30;//正常位。受動
XFile4_ID 6,true;
Motion_Load DF402/L_PRISON_SEX2sei_1_man.txt,false,,30;

	CALL DF402/set_VOICE.txt,L_re_sex;//被害。挿入音声

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 0,,;

4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FPS_DM,1,;//FPSでダメージを受ける
4HS_EOF_ADD MOUSE_PRESS_L,,L_HEVP02_2sei_2;//左ボタン押される
4HS_EOF_ADD Gauge_kaikan,100,;//快感ゲージMAX。
4HS_EOF_ADD FlameTime,600,L_HEVP02_2sei_fin1;
Loop_4_Hscene true;

GOTO L_HEVP_Ret2;




// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVP02_2sei_2;//正常位。能動

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.01, 0.02,  0;//時間に応じて増える値
DF37PAR_PGP 0.02, 0.10,  0;//

XFile4_ID 0,true;//女性側が腰を振る。プレイヤー操作
Motion_Load DF402/L_PRISON_SEX2sei_2.txt,false,,30;//正常位。能動
XFile4_ID 6,true;
Motion_Load DF402/L_PRISON_SEX2sei_2_man.txt,false,,30;

	CALL DF402/set_VOICE.txt,L_re_sex;//被害。挿入音声

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 13;//7改。402、ﾊﾟﾗﾒｰﾀ変化

4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FPS_DM,1,;//FPSでダメージを受ける
4HS_EOF_ADD Gauge_hukai,100,L_HEVP02_2sei_fin2;//不快感ゲージMAX。
4HS_EOF_ADD MOUSE_PowerGaugeMIN,,L_HEVP02_2sei_1;//マウスのゲージが最小になる
Loop_4_Hscene true;

GOTO L_HEVP_Ret2;





// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVP02_2sei_fin1;//正常位。最後　　　　　時間制限。受動。絶頂

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.01, 0.00,  0;//時間に応じて増える値
DF37PAR_PGP 0.01, 0.04,  0;//
Menu_CLS Menu;

	CALL DF402/set_VOICE.txt,L_bi_max;//ビッチ。本番絶頂　加速時

XFile4_ID 0,true;//腕を掴んで男性側が腰を振る
Motion_Load DF402/L_PRISON_SEX2sei_aft1.txt,false,,30;//正常位。最後
XFile4_ID 6,true;
Motion_Load DF402/L_PRISON_SEX2sei_aft1_man.txt,false,,30;

4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

	CALL DF402/set_VOICE.txt,L_外_max2;//ビッチ。本番絶頂　射精時　野外Ｈ客
XFile4_ID 6,true;	Motion_SetSpeed 0.1;//出る時はゆっくりに
XFile4_ID 0,true;	Motion_SetSpeed 0.1;
DF37PAR_ADD 10, 0, 0;
SYASEI 膣内2;//挿入部周辺から腹に掛けて。チンポからも少し出す
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

DF37PAR_ADD ,,,1;//絶頂カウントアップ
GOTO L_HEVP_Ret2;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVP02_2sei_fin2;//正常位。ブッカケ　　絶頂。能動。外だし

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.01, 0.00,  0;//時間に応じて増える値
DF37PAR_PGP 0.01, 0.04,  0;//
Menu_CLS Menu;

	CALL DF402/set_VOICE.txt,L_bi_max;//ビッチ。本番絶頂　加速時

XFile4_ID 6,true;	Motion_SetSpeed 3.0;//少し加速
XFile4_ID 0,true;	Motion_SetSpeed 3.0;

4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

	CALL DF402/set_VOICE.txt,L_外_max2;//ビッチ。本番絶頂　射精時　野外Ｈ客
XFile4_ID 6,true;
Motion_Load DF402/L_PRISON_SEX2sei_aft2_man.txt,false,,30;
XFile4_ID 0,true;//腕を掴んで男性側が腰を振る
Motion_Load DF402/L_PRISON_SEX2sei_aft2.txt,false,,30;//正常位。ブッカケ

DF37PAR_ADD 10, 0, 0;
SYASEI チン放;//チンポからだす２。放物線
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

DF37PAR_SET ,99,;//敵をギリギリ死なない値に変更
DF37PAR_ADD ,,,1;//絶頂カウントアップ
GOTO L_HEVP_Ret2;












//-----------------------------------------------------------------------------+
* L_HEVP02_3kijo_1;//騎乗位。受動
DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.10, 0.02,  0;//時間に応じて増える値
DF37PAR_PGP 0.08, 0.02,  0;//　操作で増える値だが、ココでは操作しない

XFile4_ID 0,true;//背後位。男が腰を使うノーマル。無操作放置
Motion_Load DF402/L_PRISON_SEX3kijo_1.txt,false,,30;//騎乗位。受動
XFile4_ID 6,true;
Motion_Load DF402/L_PRISON_SEX3kijo_1_man.txt,false,,30;

	CALL DF402/set_VOICE.txt,L_re_sex;//被害。挿入音声

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 0,,;

4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FPS_DM,1,;//FPSでダメージを受ける
4HS_EOF_ADD MOUSE_PRESS_L,,L_HEVP02_3kijo_2;//左ボタン押される
4HS_EOF_ADD Gauge_kaikan,100,;//快感ゲージMAX。
4HS_EOF_ADD FlameTime,600,L_HEVP02_3kijo_fin1;
Loop_4_Hscene true;

GOTO L_HEVP_Ret2;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVP02_3kijo_2;//騎乗位。能動

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.01, 0.02,  0;//時間に応じて増える値
DF37PAR_PGP 0.02, 0.10,  0;//

XFile4_ID 0,true;//女性側が腰を振る。プレイヤー操作
Motion_Load DF402/L_PRISON_SEX3kijo_2.txt,false,,30;//騎乗位。能動
XFile4_ID 6,true;
Motion_Load DF402/L_PRISON_SEX3kijo_2_man.txt,false,,30;

	CALL DF402/set_VOICE.txt,L_re_sex;//被害。挿入音声

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 13;//7改。402、ﾊﾟﾗﾒｰﾀ変化

4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FPS_DM,1,;//FPSでダメージを受ける
4HS_EOF_ADD Gauge_hukai,100,L_HEVP02_3kijo_fin2;//不快感ゲージMAX。
4HS_EOF_ADD MOUSE_PowerGaugeMIN,,L_HEVP02_3kijo_1;//マウスのゲージが最小になる
Loop_4_Hscene true;

GOTO L_HEVP_Ret2;




// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVP02_3kijo_fin1;//騎乗位。最後　　　　　時間制限。受動。絶頂

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.01, 0.00,  0;//時間に応じて増える値
DF37PAR_PGP 0.01, 0.04,  0;//
Menu_CLS Menu;

	CALL DF402/set_VOICE.txt,L_bi_max;//ビッチ。本番絶頂　加速時

XFile4_ID 0,true;//腕を掴んで男性側が腰を振る
Motion_Load DF402/L_PRISON_SEX3kijo_aft1.txt,false,,30;//騎乗位。最後
XFile4_ID 6,true;
Motion_Load DF402/L_PRISON_SEX3kijo_aft1_man.txt,false,,30;

4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

	CALL DF402/set_VOICE.txt,L_外_max2;//ビッチ。本番絶頂　射精時　野外Ｈ客
XFile4_ID 6,true;	Motion_SetSpeed 0.1;//出る時はゆっくりに
XFile4_ID 0,true;	Motion_SetSpeed 0.1;
DF37PAR_ADD 10, 0, 0;
SYASEI 膣内2;//挿入部周辺から腹に掛けて。チンポからも少し出す
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

//DF37PAR_SET ,99,;//敵をギリギリ死なない値に変更
DF37PAR_ADD ,,,1;//絶頂カウントアップ
GOTO L_HEVP_Ret2;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVP02_3kijo_fin2;//騎乗位。ブッカケ　　　絶頂。能動。外だし

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.01, 0.00,  0;//時間に応じて増える値
DF37PAR_PGP 0.01, 0.04,  0;//
Menu_CLS Menu;

	CALL DF402/set_VOICE.txt,L_bi_max;//ビッチ。本番絶頂　加速時

XFile4_ID 6,true;	Motion_SetSpeed 3.0;//少し加速
XFile4_ID 0,true;	Motion_SetSpeed 3.0;

4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

	CALL DF402/set_VOICE.txt,L_外_max2;//ビッチ。本番絶頂　射精時　野外Ｈ客
XFile4_ID 6,true;
Motion_Load DF402/L_PRISON_SEX3kijo_aft2_man.txt,false,,30;
XFile4_ID 0,true;//腕を掴んで男性側が腰を振る
Motion_Load DF402/L_PRISON_SEX3kijo_aft2.txt,false,,30;//騎乗位。ブッカケ

DF37PAR_ADD 10, 0, 0;
SYASEI チン放;//チンポからだす２。放物線
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

//DF37PAR_SET ,99,;//敵をギリギリ死なない値に変更
DF37PAR_ADD ,,,1;//絶頂カウントアップ
GOTO L_HEVP_Ret2;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +










//-----------------------------------------------------------------------------+
* L_HEVP03;//監禁時にプレイヤーから合体する。奉仕タイプ
//1.暴力に屈して、自分から身体を差し出す。
//2.レイプされ続けて、快楽狂いの女に成る。
//3.監禁魔をサッサと絶頂させて自分だけ逃げ出す！という意図もある
GOSUB L_HEVP_Set2;
FPS Set_CharCOM_Hit,0,歩行402_監禁;//合体後は監禁モードに？
//FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える
FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える

CALL DF402/set.txt,液_start;//合体時に飛び散る液

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.0, 0.00,  0;//時間に応じて増える値
DF37PAR_PGP 0.0, 0.20,  0;//  女性側の値を上昇させないのは、分離後にグッタリのオート発動を防ぐ為。硬直して逃げられないので

XFile4_ID 0,true;
Motion_Load DF402/L_PRISON_Fera_1.txt,false,,30;//
XFile4_ID 6,true;
Motion_Load DF402/L_PRISON_Fera_1_man.txt,false,,30;//

	CALL DF402/set_VOICE.txt,L_re_sex;//被害。挿入音声

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 13;//7改。402、ﾊﾟﾗﾒｰﾀ変化

4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FPS_DM,1,;//FPSでダメージを受ける
4HS_EOF_ADD MOUSE_PowerGaugeMIN,,L_HEVP03_1_aft1;//マウスのゲージが最小になる
4HS_EOF_ADD Gauge_hukai,100,L_HEVP03_1_aft2;//不快感ゲージMAX。
Loop_4_Hscene true;

GOTO L_HEVP_Ret2;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVP03_1_aft1;//フェラ解除。男を一定時間止める？

XFile4_ID 6,true;
Motion_Load DF402/L_PRISON_Fera_aft1_man.txt,false,,30;
XFile4_ID 0,true;
//↑個別にするメリットも無いし、男性事後の硬直は全体共通にするか？
GOTO L_HEVP_Ret2;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVP03_1_aft2;//フェラ解除。男性がマックスフィニッシュ

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
//フェラの男性フィニッシュ

DF37PAR_PP2 0, 0, 0;//時間に応じて増える値
DF37PAR_PGP 0, 0, 0;//
Menu_CLS Menu;

XFile4_ID 6,true;	Motion_SetSpeed 3.0;
XFile4_ID 0,true;	Motion_SetSpeed 3.0;
4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;



XFile4_ID 6,true;
Motion_Load DF402/L_PRISON_Fera_aft2_man.txt,false,,30;//
XFile4_ID 0,true;
Motion_Load DF402/L_PRISON_Fera_aft2.txt,false,,30;//

	CALL DF402/set_VOICE.txt,L_bi_fe_max;//ビッチ。フェラ絶頂
DF37PAR_ADD 5, 0, 0;
//SYASEI チン放;//チンポからだす２。放物線
SYASEI チン2;//チンポからだす。フェラなどで頭部貫通を防ぐ為、見えない液を出す
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

GOTO L_HEVP_Ret2;














//-----------------------------------------------------------------------------+
//HEVaaa系　　強姦などの単一攻撃
//HEVMaa系　　派生。顧客からのメニュー
//-----------------------------------------------------------------------------+

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM_Set;
FPS_AI AI_control,false;//スクリプトＨ中はAI処理を一時止める
//FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える
FPS anime_ParCopy,4;//DF402。cl_anime ← p_FPS  //animeクラスとFPS側のﾊﾟﾗﾒｰﾀ連動
//  Hイベント時に、FPSとanime快感ｹﾞｰｼﾞの連動をﾄｯﾌﾟで纏めずｺﾁﾗで逐一記述するのは
//  携帯ﾒﾆｭｰや他のイベントでFPSｹﾞｰﾑ値が更新される可能性を考慮するため
DF37PAR_SETzet 0;//絶頂数を常に非表示にする工夫
RETURN ;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM_Ret;
CALL DF402/set.txt,DIM_Check;//変数の整合性
FPS anime_ParCopy,3;//DF402。cl_anime → p_FPS  //animeクラスとFPS側のﾊﾟﾗﾒｰﾀ連動
Sound STOP;//ﾋﾟｽﾄﾝ音などを止める
Voice CLS_Buffer;//喘ぎ声などを止める
Loop_4_ft 0,30,1.0;
GOTO L_戦闘LOOP;


//-----------------------------------------------------------------------------+
* L_HEVM01;//顧客メニュー
* L_HEVM04;//ストーカーメニュー。(暫定で顧客と同じに)
GOSUB L_HEVM_Set;
CALL DF402/set_VOICE.txt,L_会話;

MSG_Cls ;

CALL DF402/set.txt,L_menuSet1;

switch rand,3;
	Menu_ADD 拒否,,0;
switch case,2;
	Menu_ADD バイバイ,,0;
switch case,3;
	Menu_ADD そう関係ない,,0;//
switch case,4;
	Menu_ADD は？,,0;
switch case,5;
	Menu_ADD 消えろｵｯｻﾝ,,0;
switch case,6;
	Menu_ADD あっち行け,,0;
switch case,7;
	Menu_ADD サヨナラ,,0;
switch case,8;
	Menu_ADD 無視,,0;
switch end;



switch rand,7;
	MSG_Print 交渉希望;
switch case,2;
	MSG_Print なっなんですか！？;
switch case,3;
	MSG_Print Ｈしよう;
switch case,4;
	MSG_Print キミ１人？;
switch case,5;
	MSG_Print どーしたの？;
switch case,6;
	MSG_Print 困ってるの？;
switch case,7;
	MSG_Print キミ幾ら？;
switch end;


switch rand,7;
	Menu_ADD ついて来てね,,2;//
switch case,2;
	Menu_ADD えっち…しよ？,,2;//
switch case,3;
	Menu_ADD ｲｲｺﾄしません?,,2;//
switch case,4;
	Menu_ADD してあげよっか?,,2;//
switch case,5;
	Menu_ADD スグ済ませてね,,2;//
switch case,6;
	Menu_ADD お金…欲しい…,,2;//
switch case,7;
	Menu_ADD アッチで…ね？,,2;//
switch end;


//switch rand,7;
//	MSG_Print 交渉希望;
//	//Menu_ADD ついて来てね,,2;//
//switch case,2;
//	MSG_Print なっなんですか！？;
//	//Menu_ADD ついて来てね,,2;//
//switch case,3;
//	MSG_Print Ｈしよう;
//	//Menu_ADD ついて来てね,,2;//
//switch case,4;
//	MSG_Print 君カワイイね;
//	MSG_Print ホテルに行こう;
//	Menu_ADD ＯＫ牧場,,1;
//switch case,5;
//	MSG_Print 君カワイイね;
//	MSG_Print アイドルとか興味ない？;
//	Menu_ADD アイドルになる！,,5;//アイドル詐欺
//switch case,6;
//	MSG_Print きみ素人さん？;
//	MSG_Print モデルの仕事が有るんだけど;
//	MSG_Print ちょっと時間あるかな？;
//	Menu_ADD モデルを目指す！,,5;//アイドル詐欺
//switch case,7;
//	MSG_Print どこの事務所？え？素人;
//	MSG_Print 君の様な美貌を活かさないのは勿体無い！;
//	MSG_Print 撮影のバイトを紹介してあげるよ;
//	Menu_ADD 撮影に行く,,5;//アイドル詐欺
//switch end;




	//Menu_ADD 本番,,1;
//	Menu_ADD ゴハンが食べたい,,3;//そのうち作りたいが…
	//Menu_ADD 今晩泊めて,,4;

switch rand,4;
	Menu_ADD 今晩泊めて,,4;
switch case,2;
	Menu_ADD 泊まる場所が無いの…,,4;
switch case,3;
	Menu_ADD 泊めて欲しい,,4;
switch case,4;
	Menu_ADD 宿泊希望,,4;
switch end;

	//Menu_ADD どこかで休みたい,,1;
	//Menu_ADD トイレに行きたい,,1;
	//Menu_ADD シャワー浴びたい,,1;
	//Menu_ADD 頼むっ！金をくれ,,1;//
	//Menu_ADD 殺してでも奪い取る,,1;//
	//Menu_ADD お小遣い欲しいな,,1;//

Loop_4_menu true;

Goto@ @RetMenu,0,L_HEVM01_0;
Goto@ @RetMenu,1,L_HEVM01_1;
Goto@ @RetMenu,2,L_HEVM01_2;
Goto@ @RetMenu,3,L_HEVM01_3;
Goto@ @RetMenu,4,L_HEVM01_4;
GOTO L_HEVM_Ret;

//顧客メニューは、内部でイベントを起こさずに、
//特別マップへのｼﾞｬﾝﾌﾟや、相手の性質変化などを起こして
//次のイベントへのﾋﾟｯｸにスルか？
//ココでパラメータのｺﾋﾟｰや位置調整は不要？

LET p_資金,=,p_資金,+,1000;
CALL DF402/set.txt,DIM_Check;//変数の整合性


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM01_0;//交渉非成立。サヨナラ
FPS Set_CharPT,1,,402_6,;//161010 DF402 再交渉せずに去っていく
GOTO L_HEVM_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM01_1;//ホテルに行こう
GOTO L_HEVM_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM01_2;//ついてきて
FPS Set_CharPT,1,,402_7,;//野外Ｈの為に近付いてくる
//移動の為のメッセージを出す？
CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
switch rand,2;	MSG4_Print 人目につかない\n場所まで誘導しろ！;
switch case,2;	MSG4_Print 客を連れてヤル\n場所へ行け！;
switch end;
GOTO L_HEVM_Ret;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM01_3;//ゴハンが食べたい
//この後はモチロン・・・
//タダ飯おごるだけは筈ないよね
GOTO L_HEVM_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM01_4;//今晩泊めて
//	GOTO L_HEVM01_4_2;//debug!!和室固定
//ランダムで失敗にする？現状客の出現率が低いので失敗すると難しい？
RAND@ 0,2;// 0 1 
RET p_A1,=,@RAND;
Select@ p_A1,GOTO,L_HEVM01_4_1,L_HEVM01_4_2;

* L_HEVM01_4_1;
CALL DF402/FPS_Action_map_set.txt,orMAP_DF402_NEWroom2_IN1;//(駅前マンション・客)出入り口
FPS Set_CharPT,1,,402_8,;//お泊りでＨの為に近付いてくる
GOTO L_HEVM_Ret;

* L_HEVM01_4_2;
CALL DF402/FPS_Action_map_set.txt,orMAP_DF402_wasitu2_IN1;//(和室・男の部屋)出入り口
FPS Set_CharPT,1,,402_8,;//お泊りでＨの為に近付いてくる
GOTO L_HEVM_Ret;

//タダで泊まれると思ってるの？
//何するか判ってるよね
//知っててついて来たんでしょ
//今更何言っても合意だから
//訴えても駄目だよ
//文句言える立場じゃ無いでしょ

//男がＨの為にガンガン迫ってくる
//Ｈで満足させて行動停止に追い込むか、逃げ回ってトイレとシャワーなどを使って
//逃走も有りだが難しい。










//-----------------------------------------------------------------------------+
* L_HEVM02;//顧客メニュー。ここでスル系
//開始処理。何度も処理しない。FPS→animeなど
GOSUB L_HEVM_Set;
CALL DF402/set_VOICE.txt,L_会話;

MSG_Cls ;
switch rand,4;
	MSG_Print ココで楽しませてくれるんだね;
	MSG_Print お邪魔虫に見つかったら大変だね;
switch case,2;
	MSG_Print 悪い子だ・・・こんな所で;
switch case,3;
	MSG_Print ここなら大丈夫かな？;
	MSG_Print 誰かに・・・見られないよな？;
switch case,4;
	MSG_Print じらすなよ;
	MSG_Print は、早くやらせてくれ！！;
switch end;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM02_menu;//顧客メニュー。体位分離後にここに戻る？

CALL DF402/set.txt,L_menuSet1;
Menu_ADD 他の場所にする,,0;
//Menu_ADD 本番,,1;
Menu_ADD 手でしてあげる,,2;//
Menu_ADD 口でしてあげる,,101;//
//Menu_ADD スマタでしてあげる,,3;//
//Menu_ADD 穴を使わせてあげる,,1;//
Menu_ADD 後から使わせたげる,,1;//
Menu_ADD 抱っこでさせたげる,,3;//

Loop_4_menu true;

Goto@ @RetMenu,0,L_HEVM_Ret;

CALL DF402/set.txt,ADD_路Ｈ;//路上Ｈ回数
//野外Ｈした客は社会的に犯罪者に成り警察の攻撃対象にIFFが変化する
FPS Set_CharIFF,1,1;//IFF 1自軍にして敵にするテスト
FPS Set_CharKeikai,1,300;//警戒値
CALL DF402/set.txt,液_start;//合体時に飛び散る液

Goto@ @RetMenu,1,L_HEVM02_1;
Goto@ @RetMenu,2,L_HEVM02_2;
Goto@ @RetMenu,3,L_HEVM02_3;
Goto@ @RetMenu,101,L_HEVM02_fe01;
GOTO L_HEVM_Ret;

//顧客メニューは、内部でイベントを起こさずに、
//特別マップへのｼﾞｬﾝﾌﾟや、相手の性質変化などを起こして
//次のイベントへのﾋﾟｯｸにスルか？
//ココでパラメータのｺﾋﾟｰや位置調整は不要？

LET p_資金,=,p_資金,+,1000;
CALL DF402/set.txt,DIM_Check;//変数の整合性


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM02_1;//バック本番。上昇が早いが絶頂時にダメージ大
FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える

DF37PAR_PP2 0.03, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.03, 0.1, 0;//抱っこ駅弁よりは遅いが自分は感じ難い
//DF37PAR_PGP 0.3, 0.1, 0;//自殺テスト
//DF37PAR_PGP -0.03, 1.0, 0;//勝利テスト

XFile4_ID 0,true;
Motion_Load DF402/LM_sex01.txt,false,,30;//
XFile4_ID 6,true;
Motion_Load DF402/LM_sex01_man.txt,false,,30;//

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

//4HS_MenuMode 6,;//マウス連打でアクション
//4HS_MenuMode 7;//クリックでピストン運動の制御１・クリックに連動
//4HS_MenuMode 8,;//クリックでピストン運動の制御２・ボタンの押し離しに連動
4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

	//▽ピストン効果音
	////Sound LOAD,DF403B/pis/14.wav;//ピストン音候補１ ｼﾞｭﾎﾟ
	////Sound LOAD,DF403B/pis/12.wav;//ｼﾞｭｯ！ パイズリ
	////Sound LOAD,DF403B/pis/03.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	////Sound LOAD,DF403B/pis/04.wav;//ｼﾞｭﾎﾟｫ
	////Sound LOAD,DF403B/pis/04b.wav;//ｼﾞｭﾎﾟｫ
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数
	CALL DF402/set_VOICE.txt,L_外_sex;//ビッチ。挿入音声　野外Ｈ客

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD 分離だ！,L_HEVM_Ret;

4HS_EOF_ADD FPS_DM,1,L_HEVM_Ret;//FPSでダメージを受ける
4HS_EOF_ADD Gauge_kaikan,100,L_HEVM_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVM02_1_Win;//不快感ゲージ。中出し

Loop_4_Hscene true;

GOTO L_HEVM_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM02_1_Win;//バックの男性フィニッシュ  (中出し汎用にスル)
DF37PAR_PP2 0, 0, 0;//時間に応じて増える値
DF37PAR_PGP 0, 0, 0;//
Menu_CLS Menu;

	CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
switch rand,4;//女性台詞
	MSG4_Print 嘘ッイクの！？\n早く抜かなきゃ…;
switch case,2;
	MSG4_Print だめっこのままじゃ\n中に出されちゃう;
switch case,3;
	MSG4_Print まさか…\n糞っ!はなせ!!;
switch case,4;
	MSG4_Print …？\n……!!!!;
switch end;
	CALL DF402/set_VOICE.txt,L_bi_max;//ビッチ。本番絶頂　加速時

XFile4_ID 6,true;	Motion_SetSpeed 3.0;
XFile4_ID 0,true;	Motion_SetSpeed 3.0;
4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

	CALL DF402/set_VOICE.txt,L_外_max2;//ビッチ。本番絶頂　射精時　野外Ｈ客
XFile4_ID 6,true;	Motion_SetSpeed 0.1;//出る時はゆっくりに
XFile4_ID 0,true;	Motion_SetSpeed 0.1;
DF37PAR_ADD 10, 0, 0;
SYASEI 膣内2;//挿入部周辺から腹に掛けて。チンポからも少し出す
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

GOTO L_HEVM02_Win;






// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM02_2;//手コキ　リスク低
FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える

DF37PAR_PP2 0.03, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.03, 0.05, 0;//

XFile4_ID 0,true;
Motion_Load DF402/LM_sex02.txt,false,,30;//手コキ
XFile4_ID 6,true;
Motion_Load DF402/LM_sex02_man.txt,false,,30;//

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

	//Sound LOAD,DF403B/pis/04b.wav;//ｼﾞｭﾎﾟｫ
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数　//▽ピストン効果音
	CALL DF402/set_VOICE.txt,L_外_te;//ビッチ。手コキ類　野外Ｈ客

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD 分離だ！,L_HEVM_Ret;

4HS_EOF_ADD FPS_DM,1,L_HEVM_Ret;//FPSでダメージを受ける
4HS_EOF_ADD Gauge_kaikan,100,L_HEVM_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVM02_2_Win;//不快感ゲージ

Loop_4_Hscene true;

GOTO L_HEVM_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM02_2_Win;//手コキの男性フィニッシュ
DF37PAR_PP2 0, 0, 0;//時間に応じて増える値
DF37PAR_PGP 0, 0, 0;//
Menu_CLS Menu;

XFile4_ID 6,true;	Motion_SetSpeed 3.0;
XFile4_ID 0,true;	Motion_SetSpeed 3.0;
4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

DF37PAR_ADD 0, 0, 0;
SYASEI チン放;//チンポからだす２。放物線
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

GOTO L_HEVM02_Win;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM02_fe01;//フェラ　リスク中
FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える

DF37PAR_PP2 0.03, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.03, 0.07, 0;//

XFile4_ID 0,true;
Motion_Load DF402/LM_fe01.txt,false,,30;//フェラ
XFile4_ID 6,true;
Motion_Load DF402/LM_fe01_man.txt,false,,30;//

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

	//Sound LOAD,DF403B/pis/04b.wav;//ｼﾞｭﾎﾟｫ
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数　//▽ピストン効果音
	CALL DF402/set_VOICE.txt,L_外_fe;//ビッチ。フェラ　野外Ｈ客

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD 分離だ！,L_HEVM_Ret;

4HS_EOF_ADD FPS_DM,1,L_HEVM_Ret;//FPSでダメージを受ける
4HS_EOF_ADD Gauge_kaikan,100,L_HEVM_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVM02_fe01_Win;//不快感ゲージ

Loop_4_Hscene true;

GOTO L_HEVM_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM02_fe01_Win;//フェラの男性フィニッシュ
DF37PAR_PP2 0, 0, 0;//時間に応じて増える値
DF37PAR_PGP 0, 0, 0;//
Menu_CLS Menu;

XFile4_ID 6,true;	Motion_SetSpeed 3.0;
XFile4_ID 0,true;	Motion_SetSpeed 3.0;
4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

	CALL DF402/set_VOICE.txt,L_bi_fe_max;//ビッチ。フェラ絶頂
DF37PAR_ADD 5, 0, 0;
//SYASEI チン放;//チンポからだす２。放物線
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

GOTO L_HEVM02_Win;





// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM02_3;//抱っこ本番。駅弁上昇が早いが絶頂時にダメージ大
FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える

DF37PAR_PP2 0.03, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.01, 0.15, 0;//自分も感じるが、バックより早い

XFile4_ID 0,true;
Motion_Load DF402/LM_sex03.txt,false,,30;//
XFile4_ID 6,true;
Motion_Load DF402/LM_sex03_man.txt,false,,30;//

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

	//▽ピストン効果音
	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数
	CALL DF402/set_VOICE.txt,L_外_sex;//ビッチ。挿入音声　野外Ｈ客

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD 分離だ！,L_HEVM_Ret;

4HS_EOF_ADD FPS_DM,1,L_HEVM_Ret;//FPSでダメージを受ける
4HS_EOF_ADD Gauge_kaikan,100,L_HEVM_Ret;//快感ゲージが指定値を超える
//4HS_EOF_ADD Gauge_hukai,100,L_HEVM02_3_Win;//不快感ゲージ
4HS_EOF_ADD Gauge_hukai,100,L_HEVM02_1_Win;//不快感ゲージ。中出し

Loop_4_Hscene true;

GOTO L_HEVM_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM02_3_Win;//抱っこ本番の男性フィニッシュ  ボツ！中出しは汎用にする
DF37PAR_PP2 0, 0, 0;//時間に応じて増える値
DF37PAR_PGP 0, 0, 0;//
Menu_CLS Menu;

XFile4_ID 6,true;	Motion_SetSpeed 3.0;
XFile4_ID 0,true;	Motion_SetSpeed 3.0;
4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

XFile4_ID 6,true;	Motion_SetSpeed 0.1;//出る時はゆっくりに
XFile4_ID 0,true;	Motion_SetSpeed 0.1;
DF37PAR_ADD 10, 0, 0;
SYASEI 膣内2;//挿入部周辺から腹に掛けて。チンポからも少し出す
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

GOTO L_HEVM02_Win;





// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM02_Win;
XFile4_ID 6,true;	Motion_SetSpeed 0.1;
XFile4_ID 0,true;	Motion_SetSpeed 0.1;
4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？

	MSG_Cls ;
switch rand,4;
	MSG_Print 今お金ないからコレで良いよね;
	MSG_Print 楽しかったね♪キミも気持ちよかったでしょ？;
	MSG_Print また遊んであげるよ;
switch case,2;
	MSG_Print 卑しいヤツだ！金の事しか頭に無いのか;
	MSG_Print せっかく助けてやったのに欲張りめっ！;
switch case,3;
	MSG_Print ありがとう;
	MSG_Print なかなか良かったよ;
	MSG_Print これお礼だよ、とっておいて;
switch case,4;
	MSG_Print ん？ああ、金が欲しいのか;
	MSG_Print ほらよ;
switch end;
	Loop_MSG true;

switch @,p_敵金;//所持金  1,2普通　3王　4オタク
switch case,0;//携帯電話で呼ばれた場合
	MSG_Print １０００円を手に入れた;
	LET p_資金,=,p_資金,+,1000;
switch case,1;//1,2普通
	MSG_Print ２０００円を手に入れた;
	LET p_資金,=,p_資金,+,2000;
switch case,2;//1,2普通
	MSG_Print ３０００円を手に入れた;
	LET p_資金,=,p_資金,+,3000;
switch case,3;//3王
	MSG_Print ４０００円を手に入れた;
	LET p_資金,=,p_資金,+,4000;
switch case,4;//4オタク
	MSG_Print １０００円を手に入れた;
	LET p_資金,=,p_資金,+,1000;
switch end;
	MSG_Print ;//エラー対策

CALL DF402/set.txt,DIM_Check;//変数の整合性
Loop_MSG true;


DF37PAR_SET ,99,;//敵をギリギリ死なない値に変更
FPS Set_CharPT,1,,402_6,;//161010 DF402 再交渉せずに去っていく
CALL DF402/set.txt,液_fin;//絶頂・射精時に飛び散る液。
GOTO L_HEVM_Ret;




DF37PAR_ADD 0,0,0;
//4HS_EOF_ADD MOUSE_PRESS_L,,;//左ボタン押される
//4HS_EOF_ADD MOUSE_PowerGaugeMIN,,;//マウスのゲージが最小になる
//4HS_EOF_ADD MOUSE_PowerGaugeMAX,,;//マウスのゲージが最大になる






// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.01, 0, 0.01;//時間に応じて増える値
XFile4_ID 0,true;
Motion_Load DF402/LM_HEV001.txt,false,,30;//良く考えたら痴漢では？
XFile4_ID 6,true;
Motion_Load DF402/LM_HEV001_man.txt,false,,30;//

4HS_MenuMode 6,;//マウス連打でアクション
//4HS_EOF_ADD MOUSE_PRESS_L,,;//左ボタン押される
//4HS_EOF_ADD MOUSE_PowerGaugeMIN,,;//マウスのゲージが最小になる
4HS_EOF_ADD MOUSE_PowerGaugeMAX,,;//マウスのゲージが最大になる
Loop_4_Hscene true;

GOTO L_HEV_Ret;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +









//-----------------------------------------------------------------------------+
//部屋でお泊りのﾒﾆｭｰ
//-----------------------------------------------------------------------------+
* L_HEVM05;//
GOSUB L_HEVM_Set;
CALL DF402/set_VOICE.txt,L_会話_拒絶;
CALL DF402/set.txt,ADD_泊Ｈ;//親切なお兄さんとのお泊りＨ回数

MSG_Cls ;
switch rand,4;
	MSG_Print タダで泊まれると思ってるの？;
	MSG_Print 何するか判ってるよね;
switch case,2;
	MSG_Print 知っててついて来たんでしょ;
switch case,3;
	MSG_Print 今更何言っても合意だから;
	MSG_Print 訴えても駄目だよ;
switch case,4;
	MSG_Print 文句言える立場じゃ無いでしょ;
switch end;

CALL DF402/set.txt,L_menuSet1;
Menu_ADD おててで許して,,3;//
Menu_ADD 馬乗り６９,,2;//
Menu_ADD セックスしてあげる,,1;//
Menu_ADD 上に乗ってハッスル,,4;//

Loop_4_menu true;

Goto@ @RetMenu,1,L_HEVM05_1;
Goto@ @RetMenu,2,L_HEVM05_2;
Goto@ @RetMenu,3,L_HEVM05_3;
Goto@ @RetMenu,4,L_HEVM05_4;//騎乗。本番。
GOTO L_HEVM_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM05_1;//正常位。本番。
//FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える
FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

DF37PAR_PP2 0.03, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.01, 0.15, 0;//自分も感じるが、バックより早い

XFile4_ID 0,true;
Motion_Load DF402/LM_HEVM05_1.txt,false,,30;//正常位
XFile4_ID 6,true;
Motion_Load DF402/LM_HEVM05_1_man.txt,false,,30;//

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

	//▽ピストン効果音
	Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数
	CALL DF402/set_VOICE.txt,L_部屋_sex;//挿入音声　部屋Ｈ宿泊

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD ハナセ！,L_HEVM_Ret;

4HS_EOF_ADD FPS_DM,1,L_HEVM_Ret;//FPSでダメージを受ける
4HS_EOF_ADD Gauge_kaikan,100,L_HEVM_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVM05_1_Win;//不快感ゲージ。中出し

Loop_4_Hscene true;

GOTO L_HEVM_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM05_1_Win;//男性フィニッシュ  (中出し汎用にスル)
DF37PAR_PP2 0, 0, 0;//時間に応じて増える値
DF37PAR_PGP 0, 0, 0;//
Menu_CLS Menu;

	CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
switch rand,4;//女性台詞
	MSG4_Print 嘘ッイクの！？\n早く抜かなきゃ…;
switch case,2;
	MSG4_Print だめっこのままじゃ\n中に出されちゃう;
switch case,3;
	MSG4_Print まさか…\n糞っ!はなせ!!;
switch case,4;
	MSG4_Print …？\n……!!!!;
switch end;
	CALL DF402/set_VOICE.txt,L_部屋_max;//本番絶頂　加速時　部屋Ｈ宿泊

XFile4_ID 6,true;	Motion_SetSpeed 3.0;
XFile4_ID 0,true;	Motion_SetSpeed 3.0;
4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

	CALL DF402/set_VOICE.txt,L_部屋_max2;//本番絶頂　射精時　部屋Ｈ宿泊
XFile4_ID 6,true;	Motion_SetSpeed 0.1;//出る時はゆっくりに
XFile4_ID 0,true;	Motion_SetSpeed 0.1;
DF37PAR_ADD 10, 0, 0;
SYASEI 膣内2;//挿入部周辺から腹に掛けて。チンポからも少し出す
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

GOTO L_HEVM05_Win;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM05_2;//69
FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

DF37PAR_PP2 0.03, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.03, 0.02, 0;//

XFile4_ID 0,true;
Motion_Load DF402/LM_HEVM05_2.txt,false,,30;//69
XFile4_ID 6,true;
Motion_Load DF402/LM_HEVM05_2_man.txt,false,,30;//

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

	//Sound LOAD,DF403B/pis/04b.wav;//ｼﾞｭﾎﾟｫ
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数　//▽ピストン効果音
	CALL DF402/set_VOICE.txt,L_部屋_sex;//挿入音声　部屋Ｈ宿泊

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD ハナセ！,L_HEVM_Ret;

4HS_EOF_ADD FPS_DM,1,L_HEVM_Ret;//FPSでダメージを受ける
4HS_EOF_ADD Gauge_kaikan,100,L_HEVM_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVM05_Win;//不快感ゲージ

Loop_4_Hscene true;

GOTO L_HEVM_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM05_3;//手コキフェラ
FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

DF37PAR_PP2 0.03, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.03, 0.01, 0;//

XFile4_ID 0,true;
Motion_Load DF402/LM_HEVM05_3.txt,false,,30;//手コキフェラ
XFile4_ID 6,true;
Motion_Load DF402/LM_HEVM05_3_man.txt,false,,30;//

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

//4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化
//↑では首がカクカクし過ぎるので…
4HS_MenuMode 6,;//マウス連打でアクション

	//Sound LOAD,DF403B/pis/04b.wav;//ｼﾞｭﾎﾟｫ
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数　//▽ピストン効果音
	CALL DF402/set_VOICE.txt,L_部屋_fe;//フェラ　部屋Ｈ宿泊

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD ハナセ！,L_HEVM_Ret;

4HS_EOF_ADD FPS_DM,1,L_HEVM_Ret;//FPSでダメージを受ける
4HS_EOF_ADD Gauge_kaikan,100,L_HEVM_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVM05_Win;//不快感ゲージ

Loop_4_Hscene true;

GOTO L_HEVM_Ret;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM05_4;//騎乗。本番。
FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

DF37PAR_PP2 0.03, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.01, 0.15, 0;//自分も感じるが、バックより早い

XFile4_ID 0,true;
Motion_Load DF402/LM_HEVM05_4.txt,false,,30;//正常位
XFile4_ID 6,true;
Motion_Load DF402/LM_HEVM05_4_man.txt,false,,30;//

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

	//▽ピストン効果音
	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数
	CALL DF402/set_VOICE.txt,L_部屋_sex;//挿入音声　部屋Ｈ宿泊

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD ハナセ！,L_HEVM_Ret;

4HS_EOF_ADD FPS_DM,1,L_HEVM_Ret;//FPSでダメージを受ける
4HS_EOF_ADD Gauge_kaikan,100,L_HEVM_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVM05_1_Win;//不快感ゲージ。中出し

Loop_4_Hscene true;

GOTO L_HEVM_Ret;





// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM05_Win;
XFile4_ID 6,true;	Motion_SetSpeed 0.1;
XFile4_ID 0,true;	Motion_SetSpeed 0.1;
4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？

MSG_Cls ;
switch rand,4;
	MSG_Print 泊めてあげたのにお金まで取るの？;
	Loop_MSG true;
	MSG_Print １００円を手に入れた;
	LET p_資金,=,p_資金,+,100;
switch case,2;
	MSG_Print 終わった途端に金の話か;
	MSG_Print 女ってヤツは現金な生き物だな;
	Loop_MSG true;
	MSG_Print ３００円を手に入れた;
	LET p_資金,=,p_資金,+,300;
switch case,3;
	MSG_Print ありがとう;
	MSG_Print けっこう良かったよ;
	Loop_MSG true;
	MSG_Print １０００円を手に入れた;
	LET p_資金,=,p_資金,+,1000;
switch case,4;
	MSG_Print こっちは善意で助けてあげたのに;
	MSG_Print 金まで無心されるなんて・・・;
	Loop_MSG true;
	MSG_Print ５０００円を手に入れた;
	LET p_資金,=,p_資金,+,5000;
switch end;

CALL DF402/set.txt,DIM_Check;//変数の整合性
Loop_MSG true;

DF37PAR_SET ,99,;//敵をギリギリ死なない値に変更
FPS Set_CharPT,1,,402_NULL,;//161019 DF402 満足グッタリ  止める
FPS Set_CharCOM_Deff,1,402M静止;//モーション外部指定
XFile4_ID 6,true;
Motion_Load DF402/M_HEVM05_Win_man.txt,false,,30;//
XFile4_ID 0,true;
GOTO L_HEVM_Ret;








//-----------------------------------------------------------------------------+
//ビーチのヤリチン君に声を掛けられるﾒﾆｭｰ。海パン
//-----------------------------------------------------------------------------+
* L_HEVM06;//
GOSUB L_HEVM_Set;
CALL DF402/set_VOICE.txt,L_会話_拒絶;

MSG_Cls ;
switch rand,4;
	MSG_Print 君カワイイね！１人？遊ばない？;
switch case,2;
	MSG_Print 彼氏いないの？じゃあボクと遊ぼうよ;
switch case,3;
	MSG_Print １人で来たの？じゃあ同じだね;
	MSG_Print 相手は現地調達だよね♪;
switch case,4;
	MSG_Print キミも期待してるんでしょ？;
switch end;

CALL DF402/set.txt,L_menuSet1;
Menu_ADD 呼吸練習,,2;//
Menu_ADD ワンワン,,1;//
Menu_ADD 足を掴む,,3;//
//Menu_ADD ハメハメ,,2;//

Loop_4_menu true;

//Goto@ @RetMenu,0,L_HEVM_Ret;//何もしない

CALL DF402/set.txt,ADD_海Ｈ;//海でのボランティアセックス回数
LET p_素行,=,p_素行,-,10;
Goto@ @RetMenu,1,L_HEVM06_1;
Goto@ @RetMenu,2,L_HEVM06_2;
Goto@ @RetMenu,3,L_HEVM06_3;
GOTO L_HEVM_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM06_1;//ワンワン
FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

DF37PAR_PP2 0.03, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.01, 0.15, 0;//自分も感じるが、バックより早い

XFile4_ID 0,true;
Motion_Load DF402/LM_HEVM06_1.txt,false,,30;//
XFile4_ID 6,true;
Motion_Load DF402/LM_HEVM06_1_man.txt,false,,30;//

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

	//▽ピストン効果音
	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数
	CALL DF402/set_VOICE.txt,L_海_sex;//挿入音声　ビーチ男ヤリチン

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD ハナセ！,L_HEVM_Ret;

4HS_EOF_ADD FPS_DM,1,L_HEVM_Ret;//FPSでダメージを受ける
4HS_EOF_ADD Gauge_kaikan,100,L_HEVM_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVM06_1_Win;//不快感ゲージ。中出し

Loop_4_Hscene true;

GOTO L_HEVM_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM06_2;//フェラ。強制
FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

DF37PAR_PP2 0.03, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.01, 0.15, 0;//自分も感じるが、バックより早い

XFile4_ID 0,true;
Motion_Load DF402/LM_HEVM06_2.txt,false,,30;//
XFile4_ID 6,true;
Motion_Load DF402/LM_HEVM06_2_man.txt,false,,30;//

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

	//▽ピストン効果音
	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数
	CALL DF402/set_VOICE.txt,L_海_fe;//フェラ　ビーチ男ヤリチン

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD ハナセ！,L_HEVM_Ret;

4HS_EOF_ADD FPS_DM,1,L_HEVM_Ret;//FPSでダメージを受ける
4HS_EOF_ADD Gauge_kaikan,100,L_HEVM_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVM06_Win;//不快感ゲージ。中出し

Loop_4_Hscene true;

GOTO L_HEVM_Ret;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM06_3;//足を掴む
FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

DF37PAR_PP2 0.03, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.01, 0.15, 0;//自分も感じるが、バックより早い

XFile4_ID 0,true;
Motion_Load DF402/LM_HEVM06_3.txt,false,,30;//
XFile4_ID 6,true;
Motion_Load DF402/LM_HEVM06_3_man.txt,false,,30;//

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

	//▽ピストン効果音
	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数
	CALL DF402/set_VOICE.txt,L_海_fe;//フェラ　ビーチ男ヤリチン

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD もうやだ！,L_HEVM_Ret;

4HS_EOF_ADD FPS_DM,1,L_HEVM_Ret;//FPSでダメージを受ける
4HS_EOF_ADD Gauge_kaikan,100,L_HEVM_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVM06_Win;//不快感ゲージ。中出し

Loop_4_Hscene true;

GOTO L_HEVM_Ret;




// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM06_1_Win;//男性フィニッシュ  (中出し汎用にスル)
DF37PAR_PP2 0, 0, 0;//時間に応じて増える値
DF37PAR_PGP 0, 0, 0;//
Menu_CLS Menu;

	CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
switch rand,4;//女性台詞
	MSG4_Print 嘘ッイクの！？\n早く抜かなきゃ…;
switch case,2;
	MSG4_Print だめっこのままじゃ\n中に出されちゃう;
switch case,3;
	MSG4_Print まさか…\n糞っ!はなせ!!;
switch case,4;
	MSG4_Print …？\n……!!!!;
switch end;
	CALL DF402/set_VOICE.txt,L_海_max;//本番絶頂　加速時　ビーチ男ヤリチン

XFile4_ID 6,true;	Motion_SetSpeed 3.0;
XFile4_ID 0,true;	Motion_SetSpeed 3.0;
4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

	CALL DF402/set_VOICE.txt,L_海_max2;//本番絶頂　射精時　ビーチ男ヤリチン
XFile4_ID 6,true;	Motion_SetSpeed 0.1;//出る時はゆっくりに
XFile4_ID 0,true;	Motion_SetSpeed 0.1;
DF37PAR_ADD 10, 0, 0;
SYASEI 膣内2;//挿入部周辺から腹に掛けて。チンポからも少し出す
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

GOTO L_HEVM06_Win;




// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM06_Win;//ビーチのヤリチン事後
XFile4_ID 6,true;	Motion_SetSpeed 0.1;
XFile4_ID 0,true;	Motion_SetSpeed 0.1;
4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？

MSG_Cls ;
switch rand,4;
	MSG_Print また遊んであげるよ;
	Loop_MSG true;
switch case,2;
	MSG_Print キミけっこう良かったよ;
	MSG_Print ヤりたくなったら何時でも遊びに来なよ;
	Loop_MSG true;
switch case,3;
	MSG_Print ありがとう;
	MSG_Print けっこう良かったよ;
	Loop_MSG true;
switch case,4;
	MSG_Print ふー凄かったよ;
	MSG_Print シたくなったらまたおいで;
	Loop_MSG true;
switch end;

DF37PAR_SET ,99,;//敵をギリギリ死なない値に変更
FPS Set_CharPT,1,,402_NULL,;//161019 DF402 満足グッタリ  止める
FPS Set_CharCOM_Deff,1,402M静止;//モーション外部指定
XFile4_ID 6,true;
Motion_Load DF402/M_HEVM05_Win_man.txt,false,,30;//
XFile4_ID 0,true;
GOTO L_HEVM_Ret;







//-----------------------------------------------------------------------------+
//■兄のメニュー２。接近  
//-----------------------------------------------------------------------------+
//ベッド以外の様々な位置でイベントを作りたいのでマップイベントじゃ捌けないので
//イベントメニューにする
* L_HEVM07;
GOSUB L_HEVM_Set;
CALL DF402/set_VOICE.txt,L_会話_兄;

//連続処理されない為に変える
CALL DF402/FPS_Action_char_set.txt,L_SetM_2;//追尾の試作。（味方を追尾！）

DF37PAR_GOTO @[p_兄行動],t=,覗く,L_HEVM07_1;
DF37PAR_GOTO @[p_兄行動],t=,風呂,L_HEVM07_2;
DF37PAR_GOTO @[p_兄行動],t=,下着を漁る,L_HEVM07_3;
DF37PAR_GOTO @[p_兄行動],t=,妹の布団で自慰,L_HEVM07_4;
DF37PAR_GOTO @[p_兄行動],t=,呼出,L_HEVS02_K;//追加　ベッドのメニューを出す

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM07_1;//覗き
	MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
	CALL DF402/set.txt,MSG男;
switch rand,4;
switch case,2;
	MSG_Print ;
switch case,3;
switch case,4;
	MSG_Print ;
switch end;
	MSG_Print わわっ;

CALL DF402/set.txt,L_menuSet1;
Menu_ADD なにしてるの？,,0;
Menu_ADD これは口止め料が必要かな,,1;
Loop_4_menu true;

//FPS Set_CharPT,1,,402_6,;//161010 DF402 再交渉せずに去っていく
//↑キャラがリロードされるので駄目

Goto@ @RetMenu,0,L_HEVM07_1_0;
Goto@ @RetMenu,1,L_HEVM07_1_1;
Goto@ @RetMenu,2,L_HEVM07_1_2;
GOTO L_HEVM_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM07_1_0;
MSG_Print 何もしてねーだろ！;
MSG_Print エロ本の読みすぎじゃねーのか！？;
MSG_Print 被害妄想すんな！ブス！！;
Loop_MSG true;
LET p_旗兄怒り,=,p_旗兄怒り,-,10;
GOTO L_HEVM_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM07_1_1;
MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print だ、誰にも言うなよ;
MSG_Print 言ったら・・・絶対ゆるさないからな;
MSG_Print ５００円手に入れた;
Loop_MSG true;
LET p_資金,=,p_資金,+,500;
GOTO L_HEVM_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM07_1_2;
MSG_Print ;
MSG_Print ;
Loop_MSG true;
GOTO L_HEVM_Ret;




// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM07_2;
	MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
	CALL DF402/set.txt,MSG男;
switch rand,4;
	MSG_Print わわっ;
switch case,2;
	MSG_Print ;
switch case,3;
	MSG_Print ;
switch case,4;
	MSG_Print ;
switch end;
	MSG_Print お、お・・・おれも風呂に入ろうかな・・・;
	
CALL DF402/set.txt,MSG女;
MSG_Print ・・・？;
MSG_Print （なんで私がお風呂に居た事知ってるんだろう？）;

CALL DF402/set.txt,L_menuSet1;
Menu_ADD シカト,,0;
Menu_ADD 入れば？,,1;
Menu_ADD 駄目だよ,,2;
Loop_4_menu true;

Goto@ @RetMenu,1,L_HEVM07_2_1;
Goto@ @RetMenu,2,L_HEVM07_2_2;
GOTO L_HEVM_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM07_2_1;
MSG_Cls ;CALL DF402/set.txt,MSG女;//□□□□□□□□□□□□□□□□□;
MSG_Print なるほど・・・妹の汗を流したお湯に浸かりたい訳ね;
MSG_Print お湯飲まないでね;
Loop_MSG true;
GOTO L_HEVM_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM07_2_2;
MSG_Cls ;CALL DF402/set.txt,MSG女;//□□□□□□□□□□□□□□□□□;
MSG_Print 勘弁して;
MSG_Print お兄ちゃんが入ると湯船に白いの浮んでるんだもん;
Loop_MSG true;
GOTO L_HEVM_Ret;




// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM07_3;
	MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
	CALL DF402/set.txt,MSG男;
switch rand,4;
	MSG_Print くっこのブラは新しい・・・;
switch case,2;
	MSG_Print こんなパンツを・・・誰に見せる気だ;
switch case,3;
	MSG_Print またサイズが大きく成ってるじゃ無いか;
	MSG_Print 古いのは記念に貰っておくか;
switch case,4;
	MSG_Print カップサイズが・・・まだ大きくなるのか？;
	MSG_Print メモしておかなければ・・・;
switch end;
	
CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
switch rand,5;	MSG4_Print まじかコイツ・・・;
switch case,2;	MSG4_Print お兄ちゃん・・・;
switch case,3;	MSG4_Print 時々下着が無くなるのは;
switch case,4;	MSG4_Print 私の下着!!;
switch case,5;	MSG4_Print 嘘でしょ…;
switch end;

CALL DF402/set.txt,L_menuSet1;
Menu_ADD 見ないフリ,,0;
Menu_ADD 触るな変態,,1;
Menu_ADD 金払え,,2;
Menu_ADD 泣く,,3;
Loop_4_menu true;

Goto@ @RetMenu,1,L_HEVM07_3_1;
Goto@ @RetMenu,2,L_HEVM07_3_2;
Goto@ @RetMenu,3,L_HEVM07_3_3;
GOTO L_HEVM_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM07_3_1;
CALL DF402/set.txt,MSG男;
MSG_Print い、何時からそこに！？;
MSG_Print かっ、勝手に入ってくるな;
Loop_MSG true;

CALL DF402/set.txt,MSG女;
MSG_Print 早く出て行って！！;
Loop_MSG true;

LET p_旗兄怒り,=,p_旗兄怒り,+,5;
GOTO L_HEVM_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM07_3_2;
CALL DF402/set.txt,MSG女;
MSG_Print その下着高いんだからね！！;
Loop_MSG true;

MSG_Cls ;
CALL DF402/set.txt,MSG男;
MSG_Print まさか知らない男に売ってるのか！？;
MSG_Print だ、駄目だ！！そんな悪い事をしちゃ;
MSG_Print 妹を守る為に・・・お兄ちゃんが買い取るよ;
Loop_MSG true;

MSG_Cls ;
MSG_Print ３０００円手に入れた;
Loop_MSG true;

LET p_資金,=,p_資金,+,3000;
GOTO L_HEVM_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM07_3_3;
XFile4_ID 0,true;
Motion_Load DF402/L_HEVM07_3_3.txt,false,,30;//

CALL DF402/set.txt,MSG女;
MSG_Print ひどい・・・お兄ちゃん・・・;
MSG_Print わたし、信じてたのに;
Loop_MSG true;

MSG_Cls ;CALL DF402/set.txt,MSG男;
MSG_Print お兄ちゃんは、オマエの事を心配してだな;
MSG_Print こっ、こんな下着を付けて！;
MSG_Print あ、兄として責任がある！;
Loop_MSG true;

LET p_旗兄怒り,=,p_旗兄怒り,-,50;
GOTO L_HEVM_Ret;




// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM07_4;
	MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
	CALL DF402/set.txt,MSG男;
switch rand,4;
	MSG_Print ふっフゴ！フガフガ;
switch case,2;
	MSG_Print はぁはぁ・・・;
switch case,3;
	MSG_Print この布団で・・・アイツはいつも・・・;
switch case,4;
	MSG_Print あぁ直接触りたい・・・;
	MSG_Print でも我慢しないと・・・;
switch end;
	
CALL DF402/set.txt,MSG女;
MSG_Print コイツ・・・越えちゃいけない一線を;

CALL DF402/set.txt,L_menuSet1;
Menu_ADD スルースル,,0;
Menu_ADD 示談,,3;
Menu_ADD 万死,,1;
Menu_ADD 抹殺,,2;
Loop_4_menu true;

Goto@ @RetMenu,1,L_HEVM07_4_1;
Goto@ @RetMenu,2,L_HEVM07_4_2;
Goto@ @RetMenu,3,L_HEVM07_4_3;
GOTO L_HEVM_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM07_4_1;
* L_HEVM07_4_2;
FPS Set_CharIFF,1,1;//IFF　0=味方。見られても警戒ゲージを上げたくない

CALL DF402/set.txt,MSG女;
MSG_Print 死ね・・・！;
Loop_MSG true;
GOTO L_HEVM_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM07_4_3;
CALL DF402/set.txt,MSG男;
MSG_Print ち、ちが・・・頼む・・・ゆるして・・・;
Loop_MSG true;

CALL DF402/set.txt,MSG女;
MSG_Print 払え・・・出せるだけ全部だ;
Loop_MSG true;

MSG_Print １５００円手に入れた;
Loop_MSG true;

LET p_資金,=,p_資金,+,1500;
GOTO L_HEVM_Ret;







//-----------------------------------------------------------------------------+
//■痴漢ダッシュ。逃走を捕まえた場合ﾒﾆｭｰ
//-----------------------------------------------------------------------------+
* L_HEVM08;
GOSUB L_HEVM_Set;
CALL DF402/set_VOICE.txt,L_会話;

FPS Set_CharPT,1,,402_6,;//161010 DF402 再交渉せずに去っていく

MSG_Cls ;CALL DF402/set.txt,MSG男;//□□□□□□□□□□□□□□□□□;
switch rand,8;
	MSG_Print 待ってくれ！悪かった！！;
	MSG_Print 金を払うから・・・命だけは助けてくれ;
switch case,2;
	MSG_Print わ、私には帰りを待ってる家族が居るんだ！！;
	MSG_Print 頼む・・・こんな所で死ぬわけにはいかないんだ;
switch case,3;
	MSG_Print そんな格好で歩いてるオマエが悪いんだろ;
	MSG_Print デカイおっぱい見せ付けて誘惑して・・・自業自得だろ！！;
switch case,4;
	MSG_Print ちょ、ちょっと手が当たったダケじゃ無いか！！;
	MSG_Print 減るもんじゃ無いしケチケチするなよ;
switch case,5;
	MSG_Print すぐに訴えるとか権利だとか女が調子に乗りやがって！！;
switch case,6;
	MSG_Print な、何ですか！？ボク何も知りませんよ;
switch case,7;
	MSG_Print は？ナニ言ってるんだアンタ！？;
	MSG_Print 何か証拠でもあるんですか？私が犯人だっていう証拠が;
switch case,8;
	MSG_Print ・・・？;
switch end;

CALL DF402/set.txt,L_menuSet1;
Menu_ADD 殺す,,0;
Menu_ADD 金だ,,1;
Menu_ADD 警察,,2;
Menu_ADD 恩赦,,3;
Loop_4_menu true;

Goto@ @RetMenu,0,L_HEVM08_0;
Goto@ @RetMenu,1,L_HEVM08_1;
Goto@ @RetMenu,2,L_HEVM08_2;
Goto@ @RetMenu,3,L_HEVM08_3;
GOTO L_HEVM_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM08_0;

XFile4_ID 0,true;
Motion_Load DF402/L_HEVM08_0.txt,true,,0;//

MSG_Cls ;CALL DF402/set.txt,MSG女;//□□□□□□□□□□□□□□□□□;
switch rand,7;
	MSG_Print 差し出せ・・・命をだ・・・;
switch case,2;
	MSG_Print ゴタクはいいわ・・・死んで頂戴;
switch case,3;
	MSG_Print 街のゴミは排除しないと・・・;
	MSG_Print みんなが悲しんじゃうから;
switch case,4;
	MSG_Print この国の平和は私が守る・・・;
	MSG_Print 滅びろ悪党！チリになれ！！;
switch case,5;
	MSG_Print 絶対に許さない・・・絶対に！;
switch case,6;
	MSG_Print 法に代わってオシオキよ！;
switch case,7;
	MSG_Print 武力制裁！因ッ果ッ応ッフォォー！！;
switch end;

Loop_MSG true;

//処刑を選ぶと一定確率で敵が抵抗する
switch rand,3;
	FPS Set_CharPT,1,,402_6,;//161010 DF402 再交渉せずに去っていく
switch case,2;
	FPS Set_CharPT,1,,402_9,;//好戦的。走ってくる
switch case,3;
	FPS Set_CharPT,1,,402_10,;//好戦的。近接
switch end;

GOTO L_HEVM_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM08_1;
MSG_Cls ;CALL DF402/set.txt,MSG女;//□□□□□□□□□□□□□□□□□;
switch rand,7;
	MSG_Print 地獄の沙汰も金次第;
switch case,2;
	MSG_Print カッコイイ誠意が見てみたい！;
switch case,3;
	MSG_Print 黙っててあげてもいいけど・・・ワカルでしょ？;
	MSG_Print いくら持ってるの？話はそれからよ;
switch case,4;
	MSG_Print 酷いです・・・私すごく傷ついたのに・・・;
	MSG_Print お金で解決するんですか？;
	MSG_Print 毎日思い出して泣くかも、怯えて暮さなきゃならないのに;
	MSG_Print それでいくらくれるんですか？;
switch case,5;
	MSG_Print 逆に聞きますけど幾ら払えば私が見逃すと思ってます？;
switch case,6;
	MSG_Print アナタが出す金額によっては考えてあげなくも無いですけど;
	MSG_Print （許すとは言ってない）;
switch case,7;
	MSG_Print タイム・いず・マネエ;
	MSG_Print 今出す！すぐ出す！誠意だす！;
	MSG_Print 白いのは出さないで！ソレは仕舞って！;
switch end;

Loop_MSG true;

MSG_Cls ;
switch @,p_敵金;//所持金  1,2普通　3王　4オタク
switch case,0;//携帯電話で呼ばれた場合
	MSG_Print ２０００円を手に入れた;
	LET p_資金,=,p_資金,+,2000;
switch case,1;//1,2普通
	MSG_Print ４０００円を手に入れた;
	LET p_資金,=,p_資金,+,4000;
switch case,2;//1,2普通
	MSG_Print ６０００円を手に入れた;
	LET p_資金,=,p_資金,+,6000;
switch case,3;//3王
	MSG_Print ８０００円を手に入れた;
	LET p_資金,=,p_資金,+,8000;
switch case,4;//4オタク
	MSG_Print ２０００円を手に入れた;
	LET p_資金,=,p_資金,+,2000;
switch end;
	MSG_Print ;//エラー対策
CALL DF402/set.txt,DIM_Check;//変数の整合性
Loop_MSG true;
GOTO L_HEVM_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM08_2;
MSG_Cls ;CALL DF402/set.txt,MSG女;//□□□□□□□□□□□□□□□□□;
switch rand,8;
	MSG_Print ゴメンで済んだら要らないよねサツケーは;
switch case,2;
	MSG_Print お前にも言い分は有るだろう・・・話を聞いてやるよ・・・;
	MSG_Print 弁護士さんがな！;
switch case,3;
	MSG_Print オマワリさんにも同じ事を言ってみて;
switch case,4;
	MSG_Print 凄い論破力を感じる;
	MSG_Print アナタならきっと裁判でも勝てるわ;
switch case,5;
	MSG_Print 裁きの時間よ・・・;
switch case,6;
	MSG_Print ドロー！ポリスカード！！;
	MSG_Print 性犯罪者にダイレクトアタック！！;
switch case,7;
	MSG_Print サッサと来い！公務員ども！カワイイ私を全力で守れ！！;
	MSG_Print ;
switch case,8;
	MSG_Print 処刑タイム！;
	MSG_Print おまわりさーん！！この人でーす！！;
switch end;
Loop_MSG true;

//通報を選ぶと一定確率で敵が抵抗する
switch rand,3;
	FPS Set_CharPT,1,,402_6,;//161010 DF402 再交渉せずに去っていく
switch case,2;
	FPS Set_CharPT,1,,402_9,;//好戦的。走ってくる
switch case,3;
	FPS Set_CharPT,1,,402_10,;//好戦的。近接
switch end;

FPS_EF Set_EF_Char2,0,警察官0_F,1,-3.0, 1;//自分ID,出現EF名,相手ID,出現距離,方向
//FPS_EF Set_EF_Char2,0,警察官0,1, 2.0, 1;//自分ID,出現EF名,相手ID,出現距離,方向

GOTO L_HEVM_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM08_3;
MSG_Cls ;CALL DF402/set.txt,MSG女;//□□□□□□□□□□□□□□□□□;

switch rand,5;
	MSG_Print 行け・・・俺の気が変わらんうちに;
switch case,2;
	MSG_Print 早く行って・・・顔も見たくない;
switch case,3;
	MSG_Print この街を出て遠くで暮せ;
	MSG_Print ２度と俺にその面を見せるな;
switch case,4;
	MSG_Print 今回だけは見逃してあげる;
switch case,5;
	MSG_Print これからは心を入れ替えて真面目に生きなさい;
	MSG_Print 私みたいにね;
switch end;
Loop_MSG true;
GOTO L_HEVM_Ret;






//-----------------------------------------------------------------------------+
//敵キャラを変更。　死亡以外で終了すると、プレイヤーから十分離れて。再作成する
//-----------------------------------------------------------------------------+
* L_HEVM03;//顧客からのイベントリクエスト。

CALL DF402/FPS_Action_map_set.txt,L_MSG;//マップの説明文を出す
MSG4_Print load character;//システムメッセージ的に一応出す？

CALL DF402/FPS_Action_map_set.txt,L_MapLoad_EN;//マップロード・敵を出す
GOTO L_戦闘LOOP;








//-----------------------------------------------------------------------------+
//■夜の店メニュー  マッサージサービス
//-----------------------------------------------------------------------------+
* L_HEVS01;//夜の店メニュー
//GOSUB L_HEV_Set;
CALL DF402/FPS_Action_map_set.txt,orMAP_HshopAF_IN1;//(夜の店)仕事の後。仕事イベントを起こさない

//店に入った後で客を確定させる。
RET p_敵種別,=,14;//0外部 1無 2兄 3父 11街 12ﾚｲﾊﾟｰ高 13電車 14ﾏｯｻｰｼﾞ客
CALL DF402/FPS_Action_map_set.txt,L_MapLoad_EN;//マップロード・敵を出す

GOSUB L_HEVS_Set;
FPS Set_CharPoint,0, 0.00, 0.00, 0.00 , 0.001, 0.001, 0.999;
FPS Set_CharPoint,1, 0.00, 0.00, 0.00 , 0.001, 0.001, 0.999;
Mov_View 2.498,1.024,-2.087,-0.7763,-0.1313,0.6165,-0.102,0.991,0.081,0.546;

XFile4_ID 6,true;
Motion_Load DF402/LM_HEVS01_man.txt,true,,0;//
XFile4_ID 0,true;
Motion_Load DF402/LM_HEVS01.txt,true,,0;//

	MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
switch rand,4;
	MSG_Print 可愛い子で嬉しいなぁ;
switch case,2;
	MSG_Print 君カワイイね;
	MSG_Print 娘にそっくりだ;
switch case,3;
	MSG_Print お、おねがいします;
switch case,4;
	MSG_Print サッサと脱いで横に成れ;
switch end;

CALL DF402/set.txt,下着に;
//CALL DF402/set.txt,裸に;

DF37_SET_CountTime 30;//秒指定だよぉﾌﾚｰﾑ指定じゃないよ

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS01_menu;
CALL DF402/set.txt,ADD_店Ｈ;//店でのＨ回数

CALL DF402/set.txt,L_menuSet1;
Menu_ADD 帰る,,0;
Menu_ADD 手コキ,,2;
Menu_ADD スマタ奉仕,,1;
Menu_ADD スマタ騎乗,,4;
Menu_ADD 上で跳ねる,,3;
switch rand,4;	Menu_ADD プッツン,,101;
switch case,2;	Menu_ADD 舐めるな,,101;
switch case,3;	Menu_ADD 体に判らせる,,101;
switch case,4;	Menu_ADD お星様にする,,101;
switch end;

Loop_4_menu true;

Goto@ @RetMenu,1,L_HEVS01_1;
Goto@ @RetMenu,2,L_HEVS01_2;
Goto@ @RetMenu,3,L_HEVS01_3;
Goto@ @RetMenu,4,L_HEVS01_4;//スマタ。騎乗グライド
Goto@ @RetMenu,101,L_HEVS01_101;

CALL DF402/set.txt,服着る;
GOTO L_HEVS_Ret;




// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS_Set;//店以外の、兄と父のﾒﾆｭｰで使う
FPS_AI AI_control,false;//スクリプトＨ中はAI処理を一時止める
//FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える
FPS anime_ParCopy,4;//DF402。cl_anime ← p_FPS  //animeクラスとFPS側のﾊﾟﾗﾒｰﾀ連動
//  Hイベント時に、FPSとanime快感ｹﾞｰｼﾞの連動をﾄｯﾌﾟで纏めずｺﾁﾗで逐一記述するのは
//  携帯ﾒﾆｭｰや他のイベントでFPSｹﾞｰﾑ値が更新される可能性を考慮するため
DF37PAR_SETzet 0;//絶頂数を常に非表示にする工夫
RETURN ;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS_Ret;
CALL DF402/set.txt,DIM_Check;//変数の整合性
FPS anime_ParCopy,3;//DF402。cl_anime → p_FPS  //animeクラスとFPS側のﾊﾟﾗﾒｰﾀ連動
Sound STOP;//ﾋﾟｽﾄﾝ音などを止める
Voice CLS_Buffer;//喘ぎ声などを止める
Loop_4_ft 0,30,1.0;
GOTO L_戦闘LOOP;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS01_1;//スマタ奉仕
XFile4_ID 0,true;
Motion_Load DF402/LM_HEVS01_1.txt,false,,30;//
XFile4_ID 6,true;
Motion_Load DF402/LM_HEVS01_1_man.txt,false,,30;//

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

DF37PAR_PP2 0.02, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.02, 0.05, 0;//抱っこ駅弁よりは遅いが自分は感じ難い
4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化
	
	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数 //▽ピストン効果音
	CALL DF402/set_VOICE.txt,L_店_te;//手コキ類　マッサージ店

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD コース変更,L_HEVS01_menu;
4HS_EOF_ADD Gauge_kaikan,100,L_HEVS_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVS01_Win;//不快感ゲージ。男満足
4HS_EOF_ADD CountTime,,L_HEVS01_Win;//残り時間がゼロに成る

Loop_4_Hscene true;

GOTO L_HEVS_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS01_2;//手コキ
XFile4_ID 0,true;
Motion_Load DF402/LM_HEVS01_2.txt,false,,30;//
XFile4_ID 6,true;
Motion_Load DF402/LM_HEVS01_2_man.txt,false,,30;//

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

DF37PAR_PP2 0.01, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.01, 0.03, 0;//抱っこ駅弁よりは遅いが自分は感じ難い
4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化
	
	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数 //▽ピストン効果音
	CALL DF402/set_VOICE.txt,L_店_te;//手コキ類　マッサージ店

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD コース変更,L_HEVS01_menu;
4HS_EOF_ADD Gauge_kaikan,100,L_HEVS_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVS01_Win;//不快感ゲージ。男満足
4HS_EOF_ADD CountTime,,L_HEVS01_Win;//残り時間がゼロに成る

Loop_4_Hscene true;
GOTO L_HEVS_Ret;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS01_3;//騎乗
XFile4_ID 0,true; Motion_Load DF402/LM_HEVS01_3.txt,false,,30;//
XFile4_ID 6,true; Motion_Load DF402/LM_HEVS01_3_man.txt,false,,30;//

XFile4_ID 6,true; 4HS_MouseMode2 4,; XFile4_ID 0,true;//DF402。男女を連動して同じ値で動かす工夫//直前に相手(連動させたい側)のIDに//直後に操作対象のIDに
DF37PAR_PP2 0.06, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.04, 0.10, 0;//抱っこ駅弁よりは遅いが自分は感じ難い
4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化
	
	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数 //▽ピストン効果音
	CALL DF402/set_VOICE.txt,L_店_sex;//挿入音声　マッサージ店

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD コース変更,L_HEVS01_menu;
4HS_EOF_ADD Gauge_kaikan,100,L_HEVS_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVS01_Win;//不快感ゲージ。男満足
4HS_EOF_ADD CountTime,,L_HEVS01_Win;//残り時間がゼロに成る

Loop_4_Hscene true;
GOTO L_HEVS_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS01_4;//スマタ。騎乗グライド
XFile4_ID 0,true; Motion_Load DF402/LM_HEVS01_4.txt,false,,30;//
XFile4_ID 6,true; Motion_Load DF402/LM_HEVS01_4_man.txt,false,,30;//

XFile4_ID 6,true; 4HS_MouseMode2 4,; XFile4_ID 0,true;//DF402。男女を連動して同じ値で動かす工夫//直前に相手(連動させたい側)のIDに//直後に操作対象のIDに
DF37PAR_PP2 0.05, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.04, 0.08, 0;//抱っこ駅弁よりは遅いが自分は感じ難い
4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化
	
	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数 //▽ピストン効果音
	CALL DF402/set_VOICE.txt,L_店_te;//手コキ類　マッサージ店

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD コース変更,L_HEVS01_menu;
4HS_EOF_ADD Gauge_kaikan,100,L_HEVS_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVS01_Win;//不快感ゲージ。男満足
4HS_EOF_ADD CountTime,,L_HEVS01_Win;//残り時間がゼロに成る

Loop_4_Hscene true;
GOTO L_HEVS_Ret;





// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +

MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print サッサとしろよオラ;
MSG_Print コッチは客だぞ;
MSG_Print なんだその態度は;
MSG_Print 教育が成ってないな;
MSG_Print もういいから、店長呼んで;
MSG_Print お前じゃ話に成らないから;
MSG_Print 早くしろって言ってるだろ;
Loop_MSG true;

GOTO L_HEVS_Ret;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS01_101;

	CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
switch rand,4;	MSG4_Print 先帝の無念を晴らす;
switch case,2;	MSG4_Print 下克上だぁ;
switch case,3;	MSG4_Print 本能寺は今;
switch case,4;	MSG4_Print 殿中天誅ｱｲｦﾝﾁｭｰ;
switch end;

MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print なんだ？やろうってのか？;
Loop_MSG true;

FPS Set_CharIFF,1,1;//IFF　0=味方。見られても警戒ゲージを上げたくない
	CALL DF402/FPS_Action_char_set.txt,L_SetM_10;//好戦的。近接
//CALL DF402/FPS_Action_map_set.txt,orMAP_HshopAF_IN1;//(夜の店)仕事の後。仕事イベントを起こさない
DF37_SET_CountTime -1;//←注意！終端経路が複数あると、解除指定のヌケが怖い

GOTO L_HEVS_Ret;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS01_Win;
XFile4_ID 6,true;	Motion_SetSpeed 0.1;
XFile4_ID 0,true;	Motion_SetSpeed 0.1;
4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？

	MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
switch rand,4;
	MSG_Print ほらよ、お礼だ;
switch case,2;
	MSG_Print 楽しかったよ、ありがとう;
switch case,3;
	MSG_Print こんなので金取るのか？;
	MSG_Print 楽な仕事だよな！;
switch case,4;
	MSG_Print 金のためなら何でもするんだな;
switch end;

switch par,不快;
switch case_d,p<A,30;		MSG_Print １０００円手に入れた;	LET p_資金,=,p_資金,+,1000;
switch case_d,A<=p<B,30,60;	MSG_Print ３０００円手に入れた;	LET p_資金,=,p_資金,+,3000;
switch case_d,A<=p<B,60,90;	MSG_Print ６０００円手に入れた;	LET p_資金,=,p_資金,+,6000;
switch case_d,A<=p,90;		MSG_Print １００００円手に入れた;	LET p_資金,=,p_資金,+,10000;
switch end;

CALL DF402/set.txt,DIM_Check;//変数の整合性
Loop_MSG true;

CALL DF402/set.txt,服着る;
DF37_SET_CountTime -1;//残り時間の画面表示を消す時はマイナス指定だよぉ

DF37PAR_SET ,99,;//敵をギリギリ死なない値に変更
//FPS Set_CharPT,1,,402_6,;//161010 DF402 再交渉せずに去っていく
GOTO L_HEVS_Ret;




//-----------------------------------------------------------------------------+
//■兄のメニュー。呼出　　p_旗兄　M系からS系ﾒﾆｭｰに飛ぶｲﾚｷﾞｭﾗｰだが…
//-----------------------------------------------------------------------------+
* L_HEVS02_K;//ケイタイから呼び出した場合の追加機能
//GOSUB L_HEVS_Set;
//CALL DF402/set_VOICE.txt,L_会話_兄;

CALL DF402/FPS_Action_char_set.txt,L_SetM_2;//追尾の試作。（味方を追尾！）
RET p_兄行動,=,追尾;

XFile4_ID 6,true;
Motion_Load DF402/M_HEVS02_1_man.txt,false,,0;//
XFile4_ID 0,true;
Loop_4_ft -,30,1.0;

				MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
				CALL DF402/set.txt,MSG男;
switch rand,56;	MSG_Print 呼んだか？;
switch case,2;	MSG_Print 俺の出番の様だな;
switch case,3;	MSG_Print ココは任せて先に行け;
switch case,4;	MSG_Print ふっ・・・この俺が出るほどの案件なのか？;
switch case,5;	MSG_Print ちぃ！この俺がサポートせねばこなせん仕事か;
switch case,6;	MSG_Print 漆黒タイフーン・・・来るっ！;
switch case,7;	MSG_Print イケメンは場所を選ばず;
switch case,8;	MSG_Print 絶望を知れ・・・暗黒魔道の輝きが;
switch case,9;	MSG_Print オッパイだけでは腹は満たされぬ;
switch case,10;	MSG_Print この世界にオッパイがある限り私は何度でも甦る;
switch case,11;	MSG_Print 今は働けないーソレが定めだけどー;
switch case,12;	MSG_Print ホワイトデー・・・ボクの白いソースを;
switch case,13;	MSG_Print ゴメンで済んだら原作警察は要らないんだよなぁ・・・;
switch case,14;	MSG_Print このパッション止められない、止まらない;
switch case,15;	MSG_Print それが目上の人間に物を頼む態度か・・・あ、殴らないで;
switch case,16;	MSG_Print 嘘だろ・・・また処刑されるの？;
switch case,17;	MSG_Print おれバカだから３より大きい数は数えられないよ;
switch case,18;	MSG_Print ゴハン？オフロ？それとも・・・あ・に・き？;
switch case,19;	MSG_Print 新たな終わりの始まりだ;
switch case,20;	MSG_Print 三次元め・・・;
switch case,21;	MSG_Print 瞬間移動忍術！・・・どいつ殺るの？伊賀でしょっ！！;
switch case,22;	MSG_Print 面倒な事に成りましたね・・・ボス;
switch case,23;	MSG_Print 登録するだけでお金が貰えるんですよ・・・？夢か・・・;
switch case,24;	MSG_Print 約束された勝利;
switch case,25;	MSG_Print 早めに始末するとかマジ怖い;
switch case,26;	MSG_Print ドン底なんてない・・・地獄の底の蓋は何時でも開くのだ;
switch case,27;	MSG_Print 磨き上げ鍛え抜かれた本物のシンセツはガード不能なのだ;
switch case,28;	MSG_Print 万策尽きそうな顔しやがって;
switch case,29;	MSG_Print ヘアとワイセツとワタシ;
switch case,30;	MSG_Print 正義が有れば何でも出来るぅ！;
switch case,31;	MSG_Print 絶対負けたりしない;
switch case,32;	MSG_Print 明けない夜は無いさ・・・貴様が朝日を見れるかは別だがな！！;
switch case,33;	MSG_Print 「かにたま」って蟹の金玉の事じゃないのか？;
switch case,34;	MSG_Print 年上の妹・・・ってなんだろうな？;
switch case,35;	MSG_Print 炭酸酸素水素水が最強に健康に良い飲む;
switch case,36;	MSG_Print チェリーボーイ今参上;
switch case,37;	MSG_Print 苦しい時は一緒だよ;
switch case,38;	MSG_Print 人がキレる限界を見極める能力の魔眼;
switch case,39;	MSG_Print お星様になって空から見守ってくれるんだよ;
switch case,40;	MSG_Print 走り出す汚いシンデレラかよ;
switch case,41;	MSG_Print ・・・ノーモアサンドバッグ？;
switch case,42;	MSG_Print 作品中の人類は特別な進化をしています。絶対に真似しないで下;
switch case,43;	MSG_Print キミとの思い出の全部がキラキラのダイヤモンドだよ;
switch case,44;	MSG_Print 勝てない相手に勝つための力・・・課金だよっ！！;
switch case,45;	MSG_Print くっ！このカラダもそろそろ限界か・・・;
switch case,46;	MSG_Print ボクの為にメガンテ唱えてくれる彼女が欲しい;
switch case,47;	MSG_Print でも家畜ってゴハン貰えるんでしょ？;
switch case,48;	MSG_Print ココロ磨り減る〜♪だいこんオロシ〜♪ゴシ誤死;
switch case,49;	MSG_Print 大人は子供！頭脳は身体！！;
switch case,50;	MSG_Print 俺の中の天使か悪魔か或いはその両方がコイツを許すなって言っ;
switch case,51;	MSG_Print ボクは戦いを好まないのだ;
switch case,52;	MSG_Print 俺だよオレ！オレオレ;
switch case,53;	MSG_Print 儀式の時間だ！！;
switch case,54;	MSG_Print 二次元の世界へ連れてってくれる機械・・・ロードローラーだ！;
switch case,55;	MSG_Print コイツ・・・俺の脳波に直接・・・;
switch case,56;	MSG_Print ドイツもコイツも興味があるのは俺のチンポの事ばかりかよ;
switch case,7;	MSG_Print ;
switch end;

CALL DF402/set.txt,L_menuSet1;
Menu_ADD 帰ってどうぞ,,0;
Menu_ADD オッパイ見てる,,4;
Menu_ADD 挑発ﾜﾝﾜﾝ,,101;
Menu_ADD 挑発股間,,102;
Menu_ADD 後から,,201;
Menu_ADD 正常位,,202;
Menu_ADD 抱きつく,,203;

Loop_4_menu true;

Goto@ @RetMenu,0,L_HEVS_Ret;
Goto@ @RetMenu,1,L_HEVS02_1;
Goto@ @RetMenu,2,L_HEVS02_2;
Goto@ @RetMenu,3,L_HEVS02_3;
Goto@ @RetMenu,4,L_HEVS02_4;
Goto@ @RetMenu,101,L_HEVS02_101;//挑発
Goto@ @RetMenu,102,L_HEVS02_102;
	CALL DF402/set.txt,ADD_兄Ｈ;//兄とのＨ回数
Goto@ @RetMenu,201,L_HEVS02_201;//本番系。（暫定
Goto@ @RetMenu,202,L_HEVS02_202;//本番系。
Goto@ @RetMenu,203,L_HEVS02_203;//本番系。
GOTO L_HEVS_Ret;




//-----------------------------------------------------------------------------+
//■兄のメニュー。接近　　p_旗兄　ベッドのメニュー
//-----------------------------------------------------------------------------+
* L_HEVS02;
GOSUB L_HEVS_Set;

DF37PAR_GOTO @[p_兄行動],t<>,寝床,L_HEVS02_ELSE1;

CALL DF402/set_VOICE.txt,L_会話_兄;

CALL DF402/FPS_Action_char_set.txt,L_SetM_2;//追尾の試作。（味方を追尾！）
DF37PAR_GOTO @[p_旗兄怒り],>=,100,L_HEVS02_MAX;
RET p_兄行動,=,追尾;


XFile4_ID 6,true;
Motion_Load DF402/M_HEVS02_1_man.txt,false,,30;//
XFile4_ID 0,true;

	MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
	CALL DF402/set.txt,MSG男;
switch rand,5;
	MSG_Print お兄ちゃんだよ;
switch case,2;
	MSG_Print 勝手に入ってくんなブス！;
switch case,3;
	MSG_Print な、何もしてないだろ;
	MSG_Print 勘違いしてんじゃねーぞ妄想女;
switch case,4;
	MSG_Print 優等生さまがオレみたいな負け犬に何の御用でしょうか？;
switch case,5;
	CALL DF402/set.txt,MSG女;
	MSG_Print ちゃんとコッチ見て話せ;
	CALL DF402/set.txt,MSG男;
	MSG_Print オマエこそこっち見るなよ・・・;
switch end;
switch @,p_旗兄性欲;
switch case_d,A<=p,5;
	MSG_Print （やりてぇ・・・）;
switch end;

CALL DF402/set.txt,L_menuSet1;
Menu_ADD なんでもない,,0;
Menu_ADD お小遣い頂戴,,1;
Menu_ADD お金を貰う,,3;

Menu_ADD オッパイ見てる,,4;
switch @,p_旗兄性欲;
//switch case_d,A<=p,5;	Menu_ADD 胸を見せてやる,,101;
//switch case_d,A<=p,30;	Menu_ADD オカズ,,102;
//switch case_d,A<=p,50;	Menu_ADD スキンシップ,,103;
switch case_d,A<=p,5;	Menu_ADD 挑発ﾜﾝﾜﾝ,,101;
switch case_d,A<=p,15;	Menu_ADD 挑発股間,,102;
//switch case_d,A<=p,20;	Menu_ADD 1000キス,,201;
switch case_d,A<=p,60;	Menu_ADD 後から,,201;
switch case_d,A<=p,70;	Menu_ADD 正常位,,202;
switch case_d,A<=p,80;	Menu_ADD 抱きつく,,203;
switch end;


Menu_ADD お願い…死んで,,2;
Menu_ADD キモイ死ね,,2;
Menu_ADD 死ね,,2;

Loop_4_menu true;

Goto@ @RetMenu,0,L_HEVS_Ret;
Goto@ @RetMenu,1,L_HEVS02_1;
Goto@ @RetMenu,2,L_HEVS02_2;
Goto@ @RetMenu,3,L_HEVS02_3;
Goto@ @RetMenu,4,L_HEVS02_4;

Goto@ @RetMenu,101,L_HEVS02_101;//挑発
Goto@ @RetMenu,102,L_HEVS02_102;

CALL DF402/set.txt,ADD_兄Ｈ;//兄とのＨ回数

Goto@ @RetMenu,201,L_HEVS02_201;//本番系。（暫定
Goto@ @RetMenu,202,L_HEVS02_202;//本番系。
Goto@ @RetMenu,203,L_HEVS02_203;//本番系。
GOTO L_HEVS_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_ELSE1;//寝床に居ない場合は判定しない
GOTO L_戦闘LOOP;
//GOTO L_HEVS_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_MAX;
MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print もう限界だ！;
Loop_MSG true;
GOTO L_HEVS_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_1;

MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print か、母さんには言うなよ！;
MSG_Print ５００円手に入れた;
Loop_MSG true;

LET p_資金,=,p_資金,+,500;
LET p_旗兄怒り,=,p_旗兄怒り,+,1;
GOTO L_HEVS_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_2;

MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print お前もオレを否定するのか・・・;
MSG_Print お前だけは・・・許さない;
Loop_MSG true;

LET p_旗兄怒り,=,p_旗兄怒り,+,3;
GOTO L_HEVS_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_3;
RAND@ 0,6;// 0 1 
RET p_A1,=,@RAND;
Select@ p_A1,GOTO,L_HEVS02_3_1,L_HEVS02_3_2,L_HEVS02_3_3,L_HEVS02_3_4
,L_HEVS02_3_5,L_HEVS02_3_6;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_3_1;
MSG_Cls ;CALL DF402/set.txt,MSG女;//□□□□□□□□□□□□□□□□□;
MSG_Print お兄ちゃんの持ってた気持ち悪い人形;
MSG_Print ネットで売ったから;
MSG_Print オークションで４０００円になったわ;
MSG_Print お兄ちゃんが将来社会復帰する時の為に;
MSG_Print 無駄遣いしないように私が預かっておいてあげるね！;
Loop_MSG true;
LET p_旗兄怒り,=,p_旗兄怒り,+,30;
LET p_資金,=,p_資金,+,4000;
GOTO L_HEVS_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_3_2;
MSG_Cls ;CALL DF402/set.txt,MSG女;//□□□□□□□□□□□□□□□□□;
MSG_Print お兄ちゃんの自転車;
MSG_Print ネットで売ってきたわ;
//MSG_Print １５万になったわ;
MSG_Print ５万になったわ;
MSG_Print ダンボールに入らなくて困ってるの;
MSG_Print オークションで売ったからこの住所に送っておいてね;
Loop_MSG true;

////MSG_Print 大丈夫よ;
//MSG_Print 変わりにオ●ーンで３万円もだして;
//MSG_Print 新品のマウンテンバイク買ってきたから♪;
//MSG_Print サスペンションが付いてる奴よ！これで悪路もへっちゃらね！;
//MSG_Print しかもシ●ノの１８段変速よ！こんなにギア使わないわよね？;
//MSG_Print 差額は手数料として私が貰うね;
MSG_Print 代わりにマウンテンバイク買ってきたから♪;
MSG_Print サスペンションが付いてる奴よ！これで悪路もへっちゃらね！;
MSG_Print しかもシ●ノの１８段変速よ！こんなにギア使わないわよね？;
Loop_MSG true;
LET p_旗兄怒り,=,p_旗兄怒り,+,30;
//LET p_資金,=,p_資金,+,120000;
LET p_資金,=,p_資金,+,50000;
GOTO L_HEVS_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_3_3;
MSG_Cls ;CALL DF402/set.txt,MSG女;//□□□□□□□□□□□□□□□□□;
MSG_Print お兄ちゃんのカメラ売ってきたから;
MSG_Print ネットで５万になったわ;
MSG_Print 売れるか心配だったけど;
MSG_Print 物の価値の判らない馬鹿は何処にでも居るのね;
Loop_MSG true;

MSG_Print あんなのデカくて重くて邪魔よね;
//MSG_Print もっと小さくて高性能なカメラを貸してあげるわ;
MSG_Print もっと小さくて高性能なカメラを買ってきたわ;
MSG_Print 超小型でなんと３０倍ズームレンズよ！夜景も撮れるのよ！;
//MSG_Print ３０種類のカラーフィルターと豊富な補正モードも搭載;
//MSG_Print 絶対こっちの方が良いわよ;
MSG_Print ３０種類のカラーフィルターと豊富な補正モードも搭載よ;
Loop_MSG true;
LET p_旗兄怒り,=,p_旗兄怒り,+,30;
LET p_資金,=,p_資金,+,50000;
GOTO L_HEVS_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_3_4;
MSG_Cls ;CALL DF402/set.txt,MSG女;//□□□□□□□□□□□□□□□□□;
MSG_Print お兄ちゃんの改造エアガン;
MSG_Print ネットで売ろうと思ったけど;
MSG_Print 規約違反とかで１円にもならなかったから;
MSG_Print 仕方ないから燃えないゴミに捨てたわ;
MSG_Print ワタシの手間賃払ってよね！１万で良いわよ;
Loop_MSG true;
LET p_旗兄怒り,=,p_旗兄怒り,+,30;
LET p_資金,=,p_資金,+,10000;
GOTO L_HEVS_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_3_5;
MSG_Cls ;CALL DF402/set.txt,MSG女;//□□□□□□□□□□□□□□□□□;
MSG_Print あぁ、あのアカウントは前のパスワードじゃログインできないわよ;
MSG_Print 装備一式込みでＲＭＴしといたから;
MSG_Print ゲームばかりしてちゃ駄目よ？;
//MSG_Print 全部で５０００円になったわ;
//MSG_Print ワタシのポイントにしたから;
MSG_Print 全部で５０００円になったから貰うね;
Loop_MSG true;
LET p_旗兄怒り,=,p_旗兄怒り,+,30;
LET p_資金,=,p_資金,+,5000;
GOTO L_HEVS_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_3_6;
MSG_Cls ;CALL DF402/set.txt,MSG女;//□□□□□□□□□□□□□□□□□;
MSG_Print お兄ちゃんの動画、ネットに上げたら再生数が凄いの;
MSG_Print 広告料もガッポガポよ;
MSG_Print 今月だけで２０００円も振り込まれたわ！ワタシの口座に;
MSG_Print ネットで稼げるなんてお兄ちゃんってスーパーアイドルね;
Loop_MSG true;
LET p_旗兄怒り,=,p_旗兄怒り,+,30;
LET p_資金,=,p_資金,+,2000;
GOTO L_HEVS_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_4;
XFile4_ID 0,true;
Motion_Load DF402/L_HEVS02_4.txt,false,,30;

CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
switch rand,4;	MSG4_Print おっぱい見てるでしょ\n妹でも気に成るの？;
switch case,2;	MSG4_Print どこ見てるの？;
switch case,3;	MSG4_Print 身の危険を\n感じるんだけど;
switch case,4;	MSG4_Print いやらしい目で\n見ないでよね;
switch end;

	MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
switch rand,4;
	MSG_Print 勘違いするなよ！;
	MSG_Print だれがオマエみたいな・・・！！;
switch case,2;
	MSG_Print 家の中だからって・・・;
	MSG_Print そんな格好で見せ付けてる方が悪いんだろ！！;
switch case,3;
	MSG_Print み、みてねーし！！;
	MSG_Print 自意識過剰なんじゃねーの！？;
switch case,4;
	MSG_Print 見られたくないなら普通の格好しろよ;
	MSG_Print この露出狂女！！;
switch end;
Loop_MSG true;

LET p_旗兄性欲,=,p_旗兄性欲,+,10;
GOTO L_HEVS_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_101;//尻振って挑発
XFile4_ID 0,true;
Motion_Load DF402/L_HEVS02_101.txt,false,,30;

MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print そんな発情したメス犬みたいにお知りを振って・・・;
MSG_Print さ、誘ってるのか・・・？;
MSG_Print 駄目だ！耐えなければ・・・;
Loop_MSG true;

LET p_旗兄性欲,=,p_旗兄性欲,+,15;
GOTO L_HEVS_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_102;//挑発・開脚
XFile4_ID 0,true;
Motion_Load DF402/L_HEVS02_102.txt,false,,30;

MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print そんなに股間を見せ付けて;
MSG_Print なんのつもりだ・・・;
MSG_Print の、望んでるのか？;
Loop_MSG true;

LET p_旗兄性欲,=,p_旗兄性欲,+,20;
GOTO L_HEVS_Ret;




// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_201;//本番・

MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
CALL DF402/set.txt,MSG男;
MSG_Print くそっ！あのなぁ！！オレはお前のＡＴＭじゃねーんだぞ！;
MSG_Print いい加減に・・・;
Loop_MSG true;

CALL DF402/set.txt,MSG女;
MSG_Print 五千くれたら・・・お兄ちゃんになら・・・シテ、良いよ？;
CALL DF402/set.txt,MSG男;
MSG_Print えっ、スルって・・・何を？;
CALL DF402/set.txt,MSG女;
MSG_Print （交尾出来るかもって思った途端に態度が）;
MSG_Print お兄ちゃんって単純・・・;
Loop_MSG true;

FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

XFile4_ID 6,true;
Motion_Load DF402/L_HEVS02_201_man.txt,false,,30;//
XFile4_ID 0,true;
Motion_Load DF402/L_HEVS02_201.txt,false,,30;

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.02, 0.02,  0;//時間に応じて増える値
DF37PAR_PGP    0, 0.06,  0;//

	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数 //▽ピストン効果音
	CALL DF402/set_VOICE.txt,L_LOVE兄_sex;//合意。本番類音声

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD 逃げる,L_HEVS_Ret;
4HS_EOF_ADD Gauge_kaikan,100,L_HEVS_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVS02_Win;//不快感ゲージ。男満足

Loop_4_Hscene true;
GOTO L_HEVS_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_202;//本番・
MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
CALL DF402/set.txt,MSG男;
MSG_Print させてくれよ・・・なぁ・・・いいだろ？;
Loop_MSG true;

CALL DF402/set.txt,MSG女;
MSG_Print いくらお金出されてもキライな人とは・・・しないよ？;
MSG_Print お兄ちゃんだからだよ？お兄ちゃんの為だって思うから;
MSG_Print 特別な人だから・・・５０００円に割引してあげるんだからね;
Loop_MSG true;

FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

XFile4_ID 6,true;
Motion_Load DF402/L_HEVS02_202_man.txt,false,,30;//
XFile4_ID 0,true;
Motion_Load DF402/L_HEVS02_202.txt,false,,30;

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.02, 0.02,  0;//時間に応じて増える値
DF37PAR_PGP    0, 0.06,  0;//
	
	CALL DF402/set_VOICE.txt,L_LOVE兄_sex;//合意。本番類音声

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD 逃げる,L_HEVS_Ret;
4HS_EOF_ADD Gauge_kaikan,100,L_HEVS_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVS02_Win;//不快感ゲージ。男満足

Loop_4_Hscene true;
GOTO L_HEVS_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_203;//本番・
CALL DF402/set.txt,MSG女;

MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print お兄ちゃんセックスした事無いでしょ？;
MSG_Print このままじゃ一生無理だと思うし;
MSG_Print ５０００円くれたら体験させてあげてもイイけど・・・;
MSG_Print どうする？;
Loop_MSG true;

MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
CALL DF402/set.txt,MSG男;
MSG_Print くっ、くそ・・・馬鹿にするな・・・;
MSG_Print ５０００円だな、本当だな！;
MSG_Print おねがいします;
Loop_MSG true;

FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

XFile4_ID 6,true;
Motion_Load DF402/L_HEVS02_203_man.txt,false,,30;//
XFile4_ID 0,true;
Motion_Load DF402/L_HEVS02_203.txt,false,,30;

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.02, 0.02,  0;//時間に応じて増える値
DF37PAR_PGP    0, 0.06,  0;//
	
	CALL DF402/set_VOICE.txt,L_LOVE兄_sex;//合意。本番類音声

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD 逃げる,L_HEVS_Ret;
4HS_EOF_ADD Gauge_kaikan,100,L_HEVS_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVS02_Win;//不快感ゲージ。男満足

Loop_4_Hscene true;
GOTO L_HEVS_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS02_Win;//兄の絶頂
DF37PAR_PP2 0, 0, 0;//時間に応じて増える値
DF37PAR_PGP 0, 0, 0;//
Menu_CLS Menu;

	CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
switch rand,4;	MSG4_Print 何！？\n急に激しく;
switch case,2;	MSG4_Print 中で\n大きくっ;
switch case,3;	MSG4_Print まさかっ;
switch case,4;	MSG4_Print …？\n……!!!!;
switch end;
	CALL DF402/set_VOICE.txt,L_LOVE兄_max;//合意。本番絶頂

MSG_Cls ;
MSG_Print なぁ・・・中出しさせてくれよ・・・;
MSG_Print 沢山小遣いやっただろ？なぁ・・・;

XFile4_ID 6,true;	Motion_SetSpeed 3.0;
XFile4_ID 0,true;	Motion_SetSpeed 3.0;
4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

	CALL DF402/set_VOICE.txt,L_LOVE兄_max2;//合意。本番絶頂
XFile4_ID 6,true;	Motion_SetSpeed 0.1;//出る時はゆっくりに
XFile4_ID 0,true;	Motion_SetSpeed 0.1;
DF37PAR_ADD 10, 0, 0;
SYASEI 膣内2;//挿入部周辺から腹に掛けて。チンポからも少し出す
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

LET p_資金,=,p_資金,+,5000;
LET p_旗兄性欲,=,0,+,0;
CALL DF402/set.txt,DIM_Check;//変数の整合性
DF37PAR_SET ,99,;//敵をギリギリ死なない値に変更
GOTO L_HEVS_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +



MSG_Print いつも自分でシコシコしてて虚しく成らないの？;
MSG_Print 普通好きな人とするステキなコトの筈なのに;
MSG_Print お兄ちゃんって惨めだよね・・・;
MSG_Print 手伝ってあげよっか？２０００円で！;











//-----------------------------------------------------------------------------+
//■父メニュー
//-----------------------------------------------------------------------------+
* L_HEVS03;
GOSUB L_HEVS_Set;
CALL DF402/set_VOICE.txt,L_会話;

DF37PAR_GOTO @[p_前行動],t=,入浴,L_HEVS03b;

	MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
//MSG_Print お父さん・・・;
switch rand,4;
	MSG_Print 珍しいな、お前から話しかけるなんて;
switch case,2;
	MSG_Print 何があっても父さんはお前の味方だからな;
switch case,3;
	MSG_Print 困った事が有ったら何でも言いなさい;
switch case,4;
	MSG_Print 学校の先生も心配してたぞ;
switch end;
GOSUB L_HEVS03_msg1;//素行に応じたメッセージ変化
GOTO L_HEVS03c;

* L_HEVS03b;
	MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
switch rand,3;
	MSG_Print な、なんだ・・・風呂に入ってたのか;
switch case,2;
	MSG_Print ？・・・オマエだったのか;
	MSG_Print お兄ちゃんが入ってたのかと思った;
switch case,3;
	MSG_Print 風呂上りで暑いのはわかるが;
	MSG_Print その・・・なんだ・・・;
	MSG_Print もう子供じゃないんだから;
switch end;

* L_HEVS03c;
CALL DF402/set.txt,L_menuSet1;
Menu_ADD なんでもない,,0;
Menu_ADD お小遣い頂戴,,1;
Menu_ADD 電話番号,,5;
Menu_ADD 頼む死んでくれ,,2;
switch @,p_前行動;
switch case_t,=,入浴;
Menu_ADD お母さんみたいに綺麗に成った？,,3;
Menu_ADD 娘の胸でも見えたら嬉しい？,,4;
switch end;

switch @,p_旗父;
//switch case_d,A<=p,1;	Menu_ADD エッチ,,101;//暫定
//switch case_d,A<=p,2;	Menu_ADD 手で,,102;
//switch case_d,A<=p,3;	Menu_ADD なまはめ,,103;
switch case_d,A<=p,1;	Menu_ADD 胸を揉む,,102;//胸を揉む
switch case_d,A<=p,5;	Menu_ADD 口で奉仕,,103;//口で奉仕
switch case_d,A<=p,10;	Menu_ADD エッチ,,101;//本番１
switch case_d,A<=p,15;	Menu_ADD なまはめ,,104;//本番２
switch end;

Loop_4_menu true;

Goto@ @RetMenu,0,L_HEVS_Ret;
Goto@ @RetMenu,1,L_HEVS03_1;
Goto@ @RetMenu,2,L_HEVS03_2;
Goto@ @RetMenu,3,L_HEVS03_3;
Goto@ @RetMenu,4,L_HEVS03_4;
Goto@ @RetMenu,5,L_HEVS03_5;

CALL DF402/set.txt,ADD_父Ｈ;//父とのＨ回数
Goto@ @RetMenu,101,L_HEVS03_101;//暫定
Goto@ @RetMenu,102,L_HEVS03_102;
Goto@ @RetMenu,103,L_HEVS03_103;
Goto@ @RetMenu,104,L_HEVS03_104;
GOTO L_HEVS_Ret;



* L_HEVS03_msg1;//素行に応じたメッセージ変化
	//MSG_Cls ; □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
switch @,p_素行;
switch case_d,A<p<=B,-9999,0;
	MSG_Print ・・・;
switch case_d,A<p<=B,0,20;
	MSG_Print お前は変わってしまったな・・・まるで別人の様に;
switch case_d,A<p<=B,20,50;
	MSG_Print 何か有ったのか？以前のお前なら・・・;
switch case_d,A<p<=B,50,70;
	MSG_Print すこし生活が乱れてないか？;
switch case_d,A<p<=B,70,90;
	MSG_Print 最近心配なんだ・・・;
switch case_d,A<p<=B,90,990;
	MSG_Print お前は父さんの自慢の娘だ;
switch end;
RETURN ;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS03_1;

MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print また無くなったのか;
MSG_Print ;
MSG_Print １０００円手に入れた;
Loop_MSG true;

LET p_資金,=,p_資金,+,1000;
LET p_素行,=,p_素行,-,5;
GOTO L_HEVS_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS03_2;
MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print お前もアイツと同じ事を言うのか;
MSG_Print ・・・;
MSG_Print あっちに行きなさい;
MSG_Print 力が制御出来ているうちに・・・;
Loop_MSG true;

FPS Set_CharIFF,1,1;//IFF　0=味方。見られても警戒ゲージを上げたくない
CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
MSG4_Print 死ね…!!;
LET p_素行,=,p_素行,-,3;
GOTO L_HEVS_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS03_3;
CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
MSG4_Print うわっ\nキモ…;

MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print 母さんに似て巨乳の色っぽい女だよ;
MSG_Print あぁ・・・母さんが帰ってきたみたいだ;
MSG_Print ・・・少しだけ我慢してくれ;
Loop_MSG true;

LET p_旗父,=,p_旗父,+,1;
GOTO L_HEVS_Ret;

//（ガチャ）ただいま〜
//不味い！母さんが本当に帰ってきた！こ、殺される！！

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS03_4;
MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print 父親をからかうのはやめなさい;
Loop_MSG true;
LET p_旗父,=,p_旗父,-,1;
GOTO L_HEVS_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS03_5;
MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print 何時でもかけて来なさい;
Loop_MSG true;
CALL DF402/set.txt,ADDkeyM_父の番号;
GOTO L_HEVS_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS03_101;//本番
MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
CALL DF402/set.txt,MSG男;
MSG_Print 愛してるよ・・・コッチにおいで;
Loop_MSG true;

CALL DF402/set.txt,MSG女;
MSG_Print おとう・・・さん？;
Loop_MSG true;

FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

XFile4_ID 6,true;
Motion_Load DF402/L_HEVS03_101_man.txt,false,,30;//
XFile4_ID 0,true;
Motion_Load DF402/L_HEVS03_101.txt,false,,30;

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.02, 0.02,  0;//時間に応じて増える値
DF37PAR_PGP    0, 0.06,  0;//
LET p_旗父,=,p_旗父,+,8;
	
	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数 //▽ピストン効果音
	CALL DF402/set_VOICE.txt,L_LOVE父_sex;//合意。本番類音声

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD 逃げる,L_HEVS_Ret;
4HS_EOF_ADD Gauge_kaikan,100,L_HEVS_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVS03_Win;//不快感ゲージ。男満足

Loop_4_Hscene true;
GOTO L_HEVS_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS03_Win;//父の絶頂
DF37PAR_PP2 0, 0, 0;//時間に応じて増える値
DF37PAR_PGP 0, 0, 0;//
Menu_CLS Menu;

	CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
switch rand,4;	MSG4_Print 何！？\n急に激しく;
switch case,2;	MSG4_Print 中で\n大きくっ;
switch case,3;	MSG4_Print まさかっ;
switch case,4;	MSG4_Print …？\n……!!!!;
switch end;
	CALL DF402/set_VOICE.txt,L_LOVE父_max;//合意。本番絶頂

XFile4_ID 6,true;	Motion_SetSpeed 3.0;
XFile4_ID 0,true;	Motion_SetSpeed 3.0;
4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

	CALL DF402/set_VOICE.txt,L_LOVE父_max2;//合意。本番絶頂　射精時
XFile4_ID 6,true;	Motion_SetSpeed 0.1;//出る時はゆっくりに
XFile4_ID 0,true;	Motion_SetSpeed 0.1;
DF37PAR_ADD 10, 0, 0;
SYASEI 膣内2;//挿入部周辺から腹に掛けて。チンポからも少し出す
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

CALL DF402/set.txt,DIM_Check;//変数の整合性
DF37PAR_SET ,99,;//敵をギリギリ死なない値に変更



XFile4_ID 6,true;
Motion_Load DF402/L_HEVS03_aft_man.txt,false,,30;//
XFile4_ID 0,true;

CALL DF402/set.txt,MSG女;
switch rand,4;
	MSG_Print 嘘っ・・・中で出したの！？;
switch case,2;
	MSG_Print お、お父さん！？;
switch case,3;
	MSG_Print お父さんの赤ちゃんが出来ちゃう・・・;
switch case,4;
	MSG_Print えっ！なんで・・・！！;
switch end;

CALL DF402/set.txt,MSG男;
	MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
switch rand,4;
	MSG_Print 早く出来るといいな・・・俺、お前の事一生大事にするからな;
switch case,2;
	MSG_Print 楽しみだな。家族が増えるの;
	MSG_Print お前も子供欲しがってただろ？;
switch case,3;
	MSG_Print 俺は家族を絶対守るからな;
	MSG_Print もうどこにも行くなよ;
switch case,4;
	MSG_Print ２人で暮らすにはこの家は広すぎる;
	MSG_Print 二階は子供部屋にするつもりなんだ;
switch end;

Loop_MSG true;

GOTO L_HEVS_Ret;










// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS03_102;//胸を揉む
MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
CALL DF402/set.txt,MSG男;
MSG_Print 少しくらい良いじゃ無いか;
Loop_MSG true;

CALL DF402/set.txt,MSG女;
MSG_Print こんなの変だよ・・・;
Loop_MSG true;

FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

//Motion_Load DF402/L_HEVS03_102_man.txt,false,,30;//
//Motion_Load DF402/L_HEVS03_102.txt,false,,30;//パイモミ

XFile4_ID 6,true;
Motion_Load DF402/L_HEVS03_102_2_man.txt,false,,30;//
XFile4_ID 0,true;
Motion_Load DF402/L_HEVS03_102_2.txt,false,,30;//パイモミ

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.01, 0.00,  0;//時間に応じて増える値
DF37PAR_PGP    0, 0.00,  0;//
LET p_旗父,=,p_旗父,+,2;
	
	CALL DF402/set_VOICE.txt,L_re_hit;//被害。タッチ　抱きつき・尻・胸など

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD 逃げる,L_HEVS_Ret;
4HS_EOF_ADD Gauge_kaikan,100,L_HEVS_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVS03_Win;//不快感ゲージ。男満足

Loop_4_Hscene true;
GOTO L_HEVS_Ret;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +





// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS03_103;//フェラ
MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
CALL DF402/set.txt,MSG男;
MSG_Print 恥かしがる事ないじゃ無いか;
Loop_MSG true;

CALL DF402/set.txt,MSG女;
MSG_Print おとうさん・・・？;
Loop_MSG true;

FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

XFile4_ID 6,true;
Motion_Load DF402/L_HEVS03_103_1_man.txt,false,,30;//
XFile4_ID 0,true;
Motion_Load DF402/L_HEVS03_103_1.txt,false,,30;//隣に座る

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD 逃げる,L_HEVS_Ret;
4HS_Menu1_ADD 口で奉仕,L_HEVS03_103_2;

Loop_4_Hscene true;
GOTO L_HEVS_Ret;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS03_103_2;//フェラ
MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
CALL DF402/set.txt,MSG男;
MSG_Print いつものヤツをやってくれ;
Loop_MSG true;

CALL DF402/set.txt,MSG女;
MSG_Print こんなのした事無いのに;
Loop_MSG true;

FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

XFile4_ID 6,true;
Motion_Load DF402/L_HEVS03_103_2_man.txt,false,,30;//
XFile4_ID 0,true;
Motion_Load DF402/L_HEVS03_103_2.txt,false,,30;//横に座ってフェラ

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.02, 0.02,  0;//時間に応じて増える値
DF37PAR_PGP    0, 0.06,  0;//
LET p_旗父,=,p_旗父,+,4;

	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数 //▽ピストン効果音
	CALL DF402/set_VOICE.txt,L_公_fe;//ビッチ。フェラ　公園

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD 逃げる,L_HEVS_Ret;
4HS_EOF_ADD Gauge_kaikan,100,L_HEVS_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVS03_Win;//不快感ゲージ。男満足

Loop_4_Hscene true;
GOTO L_HEVS_Ret;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +






// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS03_104;//本番２　対面座位
MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
CALL DF402/set.txt,MSG男;
MSG_Print 愛してるよ・・・コッチにおいで;
Loop_MSG true;

CALL DF402/set.txt,MSG女;
MSG_Print おとう・・・さん？;
Loop_MSG true;

FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える

XFile4_ID 6,true;
Motion_Load DF402/L_HEVS03_104_man.txt,false,,30;//
XFile4_ID 0,true;
Motion_Load DF402/L_HEVS03_104.txt,false,,30;//対面座位？

XFile4_ID 6,true;//直前に相手(連動させたい側)のIDに変える
4HS_MouseMode2 4,;//DF402。男女を連動して同じ値で動かす工夫
XFile4_ID 0,true;//直後に操作対象のIDに戻す

4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.02, 0.02,  0;//時間に応じて増える値
DF37PAR_PGP    0, 0.06,  0;//
LET p_旗父,=,p_旗父,+,8;
	
	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数 //▽ピストン効果音
	CALL DF402/set_VOICE.txt,L_LOVE父_sex;//合意。本番類音声

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD 逃げる,L_HEVS_Ret;
4HS_EOF_ADD Gauge_kaikan,100,L_HEVS_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVS03_Win;//不快感ゲージ。男満足

Loop_4_Hscene true;
GOTO L_HEVS_Ret;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
















//-----------------------------------------------------------------------------+
//■公園の少年
//-----------------------------------------------------------------------------+
* L_HEVS04;
GOSUB L_HEVS_Set;
CALL DF402/set_VOICE.txt,L_会話;

XFile4_ID 6,true;
Motion_Load DF402/L_HEVS04_1_man.txt,false,,30;//
XFile4_ID 0,true;

	MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
switch rand,10;
	MSG_Print チジョだ！助けて神さま！！;
switch case,2;
	MSG_Print お姉ちゃん、オッパイ見えてるよ？;
switch case,3;
	MSG_Print ボクは汚れてないんだ;
switch case,4;
	MSG_Print ぜったい負けないぞ;
switch case,5;
	MSG_Print 何か用？オバ…お姉ちゃん;
switch case,6;
	MSG_Print 穢れた淫乱なお姉さんはドッかイッちゃえ;
switch case,7;
	MSG_Print お姉さんヘンシツシャなの？;
switch case,8;
	MSG_Print こ、殺さないで！！;
	MSG_Print 何でもするから;
switch case,9;
	MSG_Print 純粋な少年に何か用？;
switch case,10;
	MSG_Print お、お姉ちゃんは悪い人じゃないよね？;
switch end;

CALL DF402/set.txt,L_menuSet1;
Menu_ADD なんでもない,,0;
Menu_ADD ボク…ひとり？,,1;
Menu_ADD ジロジロ見てたでしょ,,2;
Menu_ADD オッパイ触らせてあげる,,3;
Menu_ADD イイ事しない？,,1;
Menu_ADD コッチにおいで,,1;
Menu_ADD 怖く無いわよ,,1;
Loop_4_menu true;

Goto@ @RetMenu,0,L_HEVS_Ret;
Goto@ @RetMenu,2,L_HEVS04_1_2;

FPS Set_CharPoint,0,Char,1;//0主人公を1男性の位置に揃える
Goto@ @RetMenu,1,L_HEVS04_1;
Goto@ @RetMenu,3,L_HEVS04_1_3;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS04_1;
FPS Set_CharPoint,0,Char,1;//ADD170404 0主人公を1男性の位置に揃える
CALL DF402/set.txt,ADD_公Ｈ;//公園セックス回数
//LET p_素行,=,p_素行,-,60;//公開時
LET p_素行,=,p_素行,-,30;

XFile4_ID 6,true;
Motion_Load DF402/L_HEVS04_1_1_man.txt,false,,30;//
XFile4_ID 0,true;
Motion_Load DF402/L_HEVS04_1_3.txt,false,,30;//手コキ

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS04_1_s2;//次の段階へ進む
CALL DF402/set.txt,L_menuSet1;
Menu_ADD 今日はお終い,,0;
Menu_ADD もっとイイコト,,1;
Menu_ADD フェラ,,2;
Menu_ADD 上で楽しむ,,3;
Loop_4_menu true;

Goto@ @RetMenu,1,L_HEVS04_2;
Goto@ @RetMenu,2,L_HEVS04_3;
Goto@ @RetMenu,3,L_HEVS04_4;//上で腰を振る
GOTO L_HEVS04_aft;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS04_1_2;//見てたでしょ
LET p_素行,=,p_素行,-,5;

XFile4_ID 6,true;
Motion_Load DF402/L_HEVS04_1_6_man.txt,false,,30;//ブンブン！み、見てないよ
XFile4_ID 0,true;
Motion_Load DF402/L_HEVS04_1_5.txt,false,,30;//見てたでしょ！//別位置再生用

CALL DF402/set.txt,L_menuSet1;
Menu_ADD 許す,,0;
Menu_ADD 許さない,,1;
Loop_4_menu true;

Goto@ @RetMenu,1,L_HEVS04_1;
GOTO L_HEVS_Ret;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS04_1_3;//オッパイ触らせてあげる
LET p_素行,=,p_素行,-,15;

XFile4_ID 6,true;
Motion_Load DF402/L_HEVS04_1_4_man.txt,false,,30;//
XFile4_ID 0,true;
Motion_Load DF402/L_HEVS04_1_4.txt,false,,30;//胸揉み

CALL DF402/set.txt,L_menuSet1;
Menu_ADD 終わり,,0;
Menu_ADD もっと,,1;
Loop_4_menu true;

Goto@ @RetMenu,1,L_HEVS04_1;
GOTO L_HEVS_Ret;








// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS04_2;//手コキ  ←背後から手コキ
XFile4_ID 0,true; Motion_Load DF402/LM_HEVS04_2.txt,false,,30;//
XFile4_ID 6,true; Motion_Load DF402/LM_HEVS04_2_man.txt,false,,30;//

XFile4_ID 6,true; 4HS_MouseMode2 4,; XFile4_ID 0,true;//DF402。男女を連動して同じ値で動かす工夫//直前に相手(連動させたい側)のIDに//直後に操作対象のIDに
DF37PAR_PP2 0.05, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.04, 0.08, 0;//抱っこ駅弁よりは遅いが自分は感じ難い
4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化
	
	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数 //▽ピストン効果音
	CALL DF402/set_VOICE.txt,L_公_te;//ビッチ。手コキ類

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD コース変更,L_HEVS04_1;
4HS_EOF_ADD Gauge_kaikan,100,L_HEVS_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVM04_1_Win;//不快感ゲージ。男満足

Loop_4_Hscene true;
GOTO L_HEVS_Ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS04_3;//フェラ？
XFile4_ID 0,true; Motion_Load DF402/L_HEVS04_1_2.txt,false,,30;//
XFile4_ID 6,true;
Motion_Load DF402/L_HEVS04_1_1_man.txt,false,,30;//

XFile4_ID 6,true; 4HS_MouseMode2 4,; XFile4_ID 0,true;//DF402。男女を連動して同じ値で動かす工夫//直前に相手(連動させたい側)のIDに//直後に操作対象のIDに
DF37PAR_PP2 0.05, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.04, 0.08, 0;//抱っこ駅弁よりは遅いが自分は感じ難い
4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化
	
	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数 //▽ピストン効果音
	CALL DF402/set_VOICE.txt,L_公_fe;//ビッチ。フェラ　公園

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD コース変更,L_HEVS04_1;
4HS_EOF_ADD Gauge_kaikan,100,L_HEVS_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVM04_1_Win;//不快感ゲージ。男満足

Loop_4_Hscene true;
GOTO L_HEVS_Ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS04_4;//上で腰を振る
XFile4_ID 0,true; Motion_Load DF402/L_HEVS04_4.txt,false,,30;//
XFile4_ID 6,true; Motion_Load DF402/L_HEVS04_4_man.txt,false,,30;//

XFile4_ID 6,true; 4HS_MouseMode2 4,; XFile4_ID 0,true;//DF402。男女を連動して同じ値で動かす工夫//直前に相手(連動させたい側)のIDに//直後に操作対象のIDに
DF37PAR_PP2 0.02, 0, 0;//時間に応じて増える値
DF37PAR_PGP -0.01, 0.10, 0;//
4HS_MenuMode 11;//7改。402、ﾊﾟﾗﾒｰﾀ変化
	
	//Sound LOAD,DF403B/pis/03b.wav;//ｼﾞｭｺﾞｫ 少し長い？
	//Sound PLAY,false,1,10;//par2=1ﾋﾟｽﾄﾝ連動音,par3=ｼﾌﾄﾌﾚｰﾑ数 //▽ピストン効果音
	CALL DF402/set_VOICE.txt,L_公_sex;//ビッチ。挿入音声　公園

4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD コース変更,L_HEVS04_1;
4HS_EOF_ADD Gauge_kaikan,100,L_HEVS_Ret;//快感ゲージが指定値を超える
4HS_EOF_ADD Gauge_hukai,100,L_HEVM04_1_Win;//不快感ゲージ。男満足

Loop_4_Hscene true;
GOTO L_HEVS_Ret;




// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM04_1_Win;//公園の男性フィニッシュ  (中出し汎用にスル)
DF37PAR_PP2 0, 0, 0;//時間に応じて増える値
DF37PAR_PGP 0, 0, 0;//
Menu_CLS Menu;

	CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
switch rand,4;//女性台詞
	MSG4_Print あぁ…このままじゃ…\nでもっ;
switch case,2;
	MSG4_Print おしっこ\nぴゅーってして;
switch case,3;
	MSG4_Print まさか…\n射精するの？;
switch case,4;
	MSG4_Print 大丈夫よ\n全部出しなさい;
switch end;
	CALL DF402/set_VOICE.txt,L_公_max;//ビッチ。本番絶頂　加速時　公園

XFile4_ID 6,true;	Motion_SetSpeed 3.0;
XFile4_ID 0,true;	Motion_SetSpeed 3.0;
4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

	CALL DF402/set_VOICE.txt,L_公_max2;//ビッチ。本番絶頂　射精時　公園
XFile4_ID 6,true;	Motion_SetSpeed 0.1;//出る時はゆっくりに
XFile4_ID 0,true;	Motion_SetSpeed 0.1;
DF37PAR_ADD 10, 0, 0;
SYASEI 膣内2;//挿入部周辺から腹に掛けて。チンポからも少し出す
4HS_EOF_CLS ALL;//EOF全てリセット
4HS_EOF_ADD FlameTime,300,;//Ｈシーンのループ開始からのフレーム時間
Loop_4_Hscene true;

GOTO L_HEVM04_Win;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVM04_Win;//公園の事後
XFile4_ID 6,true;	Motion_SetSpeed 0.1;
XFile4_ID 0,true;	Motion_SetSpeed 0.1;
4HS_MenuMode 0,;
4HS_MouseMode2 0,;//男だけの独立操作の解除？

MSG_Cls ;
switch rand,4;
	MSG_Print 凄かった・・・ボクこんなの初めて;
	Loop_MSG true;
switch case,2;
	MSG_Print はぁはぁ・・・おねえちゃん・・・;
	MSG_Print おねえちゃん・・・;
	Loop_MSG true;
switch case,3;
	MSG_Print おちんちんが・・・爆発しちゃった・・・;
	Loop_MSG true;
switch case,4;
	MSG_Print おしっこ・・・でちゃった・・・;
	MSG_Print ごめんなさい;
	Loop_MSG true;
switch end;

DF37PAR_SET ,99,;//敵をギリギリ死なない値に変更
FPS Set_CharPT,1,,402_NULL,;//161019 DF402 満足グッタリ  止める
FPS Set_CharCOM_Deff,1,402M静止;//モーション外部指定

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_HEVS04_aft;
XFile4_ID 6,true;
Motion_Load DF402/L_HEVS04_aft_man.txt,false,,30;//
XFile4_ID 0,true;
GOTO L_HEVS_Ret;











//-----------------------------------------------------------------------------+
* L_EV001;

MSG_Cls ;
//G_Print □□□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print イベントの実験;
MSG_Print 元ファイルの方に連動させるイベント;
MSG_Print ;
Loop_MSG true;



//イベントで男性キャラを変更するテスト
XFile4_ID 6,true;
SetCD_csDir 6,,6\EMDF40_CPTR_M2B1_B11;
CALL _setup.txt;
SetCD_csDirRe 6,,6\EMDF40_CPTR_M2B1_B11;
XFile4_MotionID 6,6;//レイヤー7のモデルはモーション0で動かす


XFile4_ID 6,true;
XFile4_Bone_EditPoseLimit DF40_GM4_boneCNV.txt;//DF37の男性モデルをDF40にｺﾝﾊﾞｰﾄ
XFile4_ID 0,true;

//XFile4_MotionID 6,6;//適応ﾓﾃﾞﾙIDと参照ﾓｰｼｮﾝID
//XFile4_MotionID 7,6;//101128 適応ﾓﾃﾞﾙIDと参照ﾓｰｼｮﾝID
//CALL DF402/FPS_Action_map_set.txt,orMAP_DF40_matiA3_IN1;//駅ビル入り口一階

GOTO L_戦闘LOOP;




FPS Set_CharID,1;

XFile4_MotionID 6,6;//適応ﾓﾃﾞﾙIDと参照ﾓｰｼｮﾝID
XFile4_MotionID 7,6;//101128 適応ﾓﾃﾞﾙIDと参照ﾓｰｼｮﾝID
FPS Set_CharModelID,,6;
FPS Set_CharModelID,,7;//101128 ゲームキャラとモデルの結びつけ
FPS Set_CharMotionID,,6;

FPS Set_CharID,END;


CALL DF402/FPS_Action_map_set.txt,orMAP_DF40_matiA3_IN1;//駅ビル入り口一階

GOTO L_戦闘LOOP;





FPS Save;




//-----------------------------------------------------------------------------+
//■メニュー。携帯端末。ケイタイ
//-----------------------------------------------------------------------------+
* L_FPSmenu;
	Load_FG_SiriteFile DF402/FPSmenu_FG01_2.png;
	XFile4_ID 0,true;
	Motion_Load DF402/L_menu.txt,false,,0;//
	Loop_4_ft 0,0.1,1.0;//メニューの展開まで一瞬表示する
Load_FG_SiriteFile DF402/FPSmenu_FG01.png;
//Load_FG_SiriteFile DF402/FPSmenu_FG02.png;

//CALL DF402/set.txt,L_終了;//デバック。このｽｸﾘﾌﾟﾄファイルを再読込する
Menu_INI ;//メニューの設定をクリアする
Menu_SetPos 30,140;
Menu_Sprite DF402/top_menu_2.png;
//Menu_SetType 0,120,15,16;//白文字、影あり
Menu_SetType 1,120,15,16;//液晶風

FPS anime_ParCopy,4;//DF402。cl_anime ← p_FPS  //animeクラスとFPS側のﾊﾟﾗﾒｰﾀ連動
//↑参照のみ。ココはメインでは無いが、携帯ﾒﾆｭｰ中に違う情報が出るのも不自然なので

MSG_Cls ;//前回のが残るのでクリア
	//Loop_MSG true;//メッセージ無い時のエラー対策デバック

	//メッセージの実験
	//CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
	//MSG4_Print 嘘ッイクの！？\n早く抜かなきゃ…;

* L_FPSmenu_0;
CALL DF402/set.txt,DIM_Check;//変数の整合性

Menu_CLS Menu;
//Menu_ADD 終了,,0;
CALL DF402/set.txt,L_PAR_PRINT4;//携帯のトップメニューに時間表示
Menu_ADD @[p_表示文字],,0;//終了メニューに時間を付け加える

Menu_ADD 携帯電話,,1;
Menu_ADD 携帯電話2,,9;
//Menu_ADD ｾｰﾌﾞ,,2;//将来的にはセーブはセーブポイント限定に？
//Menu_ADD ﾛｰﾄﾞ,,3;//ロードは何時でも出来る
Menu_ADD ポーズ,,4;
//Menu_ADD 合体,,5;//男女モーションの試作
Menu_ADD 合体ポーズ,,5;//男女モーションの試作(公開時)
//Menu_ADD 仕事予約,,7;
Menu_ADD 裏能力,,8;//debug
Menu_ADD 特殊行動,,10;
Menu_ADD 機能→,,13;

//Menu_ADD パラメータ,,6;//スペースが足りないので↓で代用する事に(暫定)
CALL DF402/set.txt,L_PAR_PRINT2;//携帯のトップメニューにパラメータの縮小表示
Menu_ADD @[p_表示文字],,6;
CALL DF402/set.txt,L_PAR_PRINT3;//携帯のトップメニューに所持金表示
Menu_ADD @[p_表示文字],,6;
//CALL DF402/set.txt,L_PAR_PRINT4;//携帯のトップメニューに時間表示
//Menu_ADD @[p_表示文字],,6;

Loop_4_menu true;

//4HS_EOF_ADD MOUSE_PRESS_S,,;//中ボタン押される
//Loop_4_Hscene true;

Goto@ @RetMenu,1,L_FPSmenu_1;
Goto@ @RetMenu,2,L_FPSmenu_2;
Goto@ @RetMenu,3,L_FPSmenu_3;
Goto@ @RetMenu,4,L_FPSmenu_4;
Goto@ @RetMenu,5,L_FPSmenu_5;
Goto@ @RetMenu,6,L_FPSmenu_6;
Goto@ @RetMenu,7,L_FPSmenu_7;
Goto@ @RetMenu,8,L_FPSmenu_8;
Goto@ @RetMenu,9,L_FPSmenu_9;
Goto@ @RetMenu,10,L_FPSmenu_10;
Goto@ @RetMenu,13,L_FPSmenu_13;
Goto@ @RetMenu,14,L_FPSmenu_14;

GOTO L_FPSmenu_ret;



MSG_Cls ;
//G_Print □□□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print メニューを開く実験;
MSG_Print ;
//Loop_MSG true;

switch @,$FPS_SPAN(0)(1);
switch case_d,p<A,2.5;
	RET p_SPAN_ok,=,1;
	MSG_Print 近くに居る;
switch case_d,A<=p,2.5;
	RET p_SPAN_ok,=,0;
	MSG_Print 遠すぎ;
switch end;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_ret;
Menu_CLS Menu;//メニューを消す。イベントでＨシーンに入る場合の対策
CALL DF402/set.txt,DIM_Check;//変数の整合性

MapBool ,,,false;//FG消去
XFile4_ID 0,true;
FPS_AI AI_control,true;//スクリプトＨ中はAI処理を一時止める
Loop_4_ft 0,30,1.0;
GOTO L_戦闘LOOP;


//-----------------------------------------------------------------------------+
//メニュー。携帯のトップに入らないメニューの２ページ目。
//-----------------------------------------------------------------------------+
* L_FPSmenu_13;

Menu_CLS Menu;
//Menu_ADD 終了,,0;
CALL DF402/set.txt,L_PAR_PRINT4;//携帯のトップメニューに時間表示
Menu_ADD @[p_表示文字],,0;//終了メニューに時間を付け加える

Menu_ADD ←トップへ戻る,,14;
Menu_ADD ポイント,,11;
Menu_ADD メール,,12;
Menu_ADD マップ,,15;
Menu_ADD 資格,,16;
switch @,p_達成M;
switch case_t,key,音楽;
	Menu_ADD 音楽,,17;
switch end;
Menu_ADD 情報,,18;//eNET,,18;
switch @,p_ＬＶp;
switch case_d,A<=p,100;
	Menu_ADD 行動スタイル,,19;//
switch end;

Loop_4_menu true;

Goto@ @RetMenu,14,L_FPSmenu_0;
Goto@ @RetMenu,11,L_FPSmenu_11;
Goto@ @RetMenu,12,L_FPSmenu_12;
Goto@ @RetMenu,15,L_FPSmenu_15;
Goto@ @RetMenu,16,L_FPSmenu_16;
Goto@ @RetMenu,17,L_FPSmenu_17;
Goto@ @RetMenu,18,L_FPSmenu_18;
Goto@ @RetMenu,19,L_FPSmenu_19;

GOTO L_FPSmenu_ret;


//-----------------------------------------------------------------------------+
//メニュー。携帯電話。
//-----------------------------------------------------------------------------+
* L_FPSmenu_1;

Menu_CLS Menu;
Menu_ADD 終了,,0;
switch @,p_達成M;
switch case_t,key,bit警官;	Menu_ADD 110警察を呼ぶ,,1;
switch case_t,key,兄秘密;	Menu_ADD お兄ちゃん,,102;
switch case_t,key,父番号;	Menu_ADD お父さん,,103;
switch case_t,key,友人;		Menu_ADD 友人を呼ぶ,,203;
switch case_t,key,友人裸;	Menu_ADD 裸で集合,,201;
switch case_t,key,友人水;	Menu_ADD 水着で集合,,202;
switch case_t,key,bitｻﾗ;	Menu_ADD ｻﾗﾘｰﾏﾝを呼ぶ,,2;
switch case_t,key,警察パ;	Menu_ADD パトレイパー,,3;
switch end;

switch @,p_ＬＶp;
switch case_d,A<=p,100;
	Menu_ADD お兄ちゃん裏,,10200;
switch end;
GOTO L_FPSmenu_1b;

//旧コード
Menu_CLS Menu;
Menu_ADD 終了,,0;
Menu_ADD 110警察を呼ぶ,,1;
//Menu_ADD 男性を目の前に,,101;
Menu_ADD お兄ちゃん,,102;
switch @,p_ＬＶp;
switch case_d,A<=p,100;
	Menu_ADD お兄ちゃん裏,,10200;
switch end;
Menu_ADD お父さん,,103;
//Menu_ADD 労働者痴漢,,104;
Menu_ADD 友人を呼ぶ,,203;
Menu_ADD 裸で集合,,201;
Menu_ADD 水着で集合,,202;
Menu_ADD ｻﾗﾘｰﾏﾝを呼ぶ,,2;
Menu_ADD パトレイパー,,3;
GOTO L_FPSmenu_1b;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_9;
Menu_CLS Menu;
Menu_ADD 終了,,0;
switch @,p_達成M;
switch case_t,key,ｻﾗ痴漢;	Menu_ADD ｻﾗﾘｰﾏﾝ痴漢,,104;
switch case_t,key,ｻﾗ強姦;	Menu_ADD ｻﾗﾘｰﾏﾝ強姦,,105;
switch case_t,key,ｻﾗｽﾄ;		Menu_ADD ｻﾗﾘｰﾏﾝｽﾄｰｶｰ,,106;
switch case_t,key,ｻﾗ客;		Menu_ADD ｻﾗﾘｰﾏﾝ客,,107;
switch case_t,key,ｻﾗ走殴;	Menu_ADD ｻﾗﾘｰ走殴,,109;
switch case_t,key,ｻﾗ近殴;	Menu_ADD ｻﾗﾘｰ近殴,,110;
switch case_t,key,ｻﾗ強姦2;	Menu_ADD ｻﾗﾘｰ強姦2,,111;
switch case_t,key,ｻﾗ痴漢D;	Menu_ADD ｻﾗﾘｰ痴漢D,,114;
switch end;
GOTO L_FPSmenu_1b;


//旧コード
Menu_CLS Menu;
Menu_ADD 終了,,0;
Menu_ADD ｻﾗﾘｰﾏﾝ痴漢,,104;
Menu_ADD ｻﾗﾘｰﾏﾝ強姦,,105;
Menu_ADD ｻﾗﾘｰﾏﾝｽﾄｰｶｰ,,106;
Menu_ADD ｻﾗﾘｰﾏﾝ客,,107;
Menu_ADD ｻﾗﾘｰ走殴,,109;
Menu_ADD ｻﾗﾘｰ近殴,,110;
Menu_ADD ｻﾗﾘｰ強姦2,,111;
Menu_ADD ｻﾗﾘｰ痴漢D,,114;
GOTO L_FPSmenu_1b;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_1b;
Loop_4_menu true;

MSG_Cls ;
switch @,@RetMenu;
switch case,1;
	//FPS_EF Set_EF_Char,0,警察官0;
	FPS_EF Set_EF_Char2,0,警察官0,1, 2.0, 1;//自分ID,出現EF名,相手ID,出現距離,方向
switch case,2;
	//FPS_EF Set_EF_Char,0,通行人_往復;
	FPS_EF Set_EF_Char2,0,通行人_往復,1, 3.0, 1;//自分ID,出現EF名,相手ID,出現距離,方向
switch case,3;
	FPS_EF LoadX,85,MBT16_poly.x;
	FPS_EF Set_EF_Char2,0,MTB15,1, 2.0, 1;//自分ID,出現EF名,相手ID,出現距離,方向
	//"ﾍﾘH1r"


switch case,101;
	FPS Set_CharPoint,1,Char_Front,0;
switch case,201;
	FPS_EF LoadX,2,DF51_giji01.x;//裸の女。DF51
	FPS_EF LoadX,5,DF402_GL_N01.x;
	FPS_EF LoadX,16,DF402_GL_N02.x;
	FPS_EF LoadX,17,DF402_GL_N03.x;
	FPS_EF LoadX,18,DF402_GL_N04.x;
	FPS_EF LoadX,38,DF402_GL_N05.x;
	FPS_EF LoadX,40,DF402_GL_N06.x;
	FPS_EF Set_RandPick3,通行人B_2,1,0,2,2,0;
	FPS_EF Set_RandPick3,通行人B_2,1,0,5,2,0;
	FPS_EF Set_RandPick3,通行人B_2,1,0,16,2,0;
	FPS_EF Set_RandPick3,通行人B_2,1,0,17,2,0;
	FPS_EF Set_RandPick3,通行人B_2,1,0,38,2,0;
	FPS_EF Set_RandPick3,通行人B_2,1,0,40,2,0;
	//2所有者？　3ﾀｰｹﾞｯﾄ？
	//Pr4表示用bitIDを外部から指定。-1未指定
	//Pr5 : 配置数
	//Pr6 : 敵味方識別 0中立　1自軍　2敵軍　3デストロイ全てが敵

switch case,202;
	FPS_EF LoadX,2,DF51_giji01.x;//裸の女。DF51
	FPS_EF LoadX,5,DF402_GL_S01.x;//水着の女
	FPS_EF LoadX,16,DF402_GL_S02.x;
	FPS_EF LoadX,17,DF402_GL_S03.x;
	FPS_EF LoadX,18,DF402_GL_S04.x;
	FPS_EF LoadX,38,DF402_GL_S05.x;
	FPS_EF LoadX,40,DF402_GL_S06.x;
	FPS_EF Set_RandPick3,通行人B_2,1,0,2,2,0;
	FPS_EF Set_RandPick3,通行人B_2,1,0,5,2,0;
	FPS_EF Set_RandPick3,通行人B_2,1,0,16,2,0;
	FPS_EF Set_RandPick3,通行人B_2,1,0,17,2,0;
	FPS_EF Set_RandPick3,通行人B_2,1,0,38,2,0;
	FPS_EF Set_RandPick3,通行人B_2,1,0,40,2,0;
	
switch case,203;
	FPS_EF LoadX,2,DF402_GL_G01.x;//制服の女
	FPS_EF LoadX,5,DF402_GL_G02.x;
	FPS_EF LoadX,16,DF402_GL_G03.x;
	FPS_EF LoadX,17,DF402_GL_G04.x;
	FPS_EF LoadX,18,DF402_GL_G05.x;
	FPS_EF LoadX,38,DF402_GL_G06.x;
	FPS_EF Set_RandPick3,通行人B_2,1,0, 2,4,0;
	FPS_EF Set_RandPick3,通行人B_2,1,0, 5,4,0;
	FPS_EF Set_RandPick3,通行人B_2,1,0,16,4,0;
	FPS_EF Set_RandPick3,通行人B_2,1,0,17,4,0;
	FPS_EF Set_RandPick3,通行人B_2,1,0,18,4,0;
	FPS_EF Set_RandPick3,通行人B_2,1,0,38,4,0;

switch end;

Goto@ @RetMenu,102,L_FPSmenu_1_102;
Goto@ @RetMenu,10200,L_FPSmenu_1_102B;
Goto@ @RetMenu,103,L_FPSmenu_1_103;
Goto@ @RetMenu,104,L_FPSmenu_1_104;
Goto@ @RetMenu,105,L_FPSmenu_1_105;
Goto@ @RetMenu,106,L_FPSmenu_1_106;
Goto@ @RetMenu,107,L_FPSmenu_1_107;
Goto@ @RetMenu,109,L_FPSmenu_1_109;
Goto@ @RetMenu,110,L_FPSmenu_1_110;
Goto@ @RetMenu,111,L_FPSmenu_1_111;
Goto@ @RetMenu,114,L_FPSmenu_1_114;

GOTO L_FPSmenu_ret;





CALL DF402/FPS_Action_char_set.txt,L_SetM_1;//全く動かない例。モーション外部指定
CALL DF402/FPS_Action_char_set.txt,L_SetM_2;//追尾の試作。（味方を追尾！）
CALL DF402/FPS_Action_char_set.txt,L_SetM_3;//痴漢の試作。触る敵。人の目が有っても攻撃してくる
CALL DF402/FPS_Action_char_set.txt,L_SetM_4;//強姦魔の試作。最終的にレイプまでする敵。人の居ない所まで追尾する
CALL DF402/FPS_Action_char_set.txt,L_SetM_5;//ストーカーの試作。


CALL DF402/FPS_Action_char_set.txt,L_LoadMDL_4;//兄モデル準備
CALL DF402/FPS_Action_char_set.txt,L_LoadMDL_5;//父モデル準備
CALL DF402/FPS_Action_char_set.txt,L_LoadMDL_6;//サラリーマン

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_1_102;
CALL DF402/FPS_Action_char_set.txt,L_LoadMDL_4;//兄モデル準備
CALL DF402/FPS_Action_char_set.txt,L_SetM_2;//追尾の試作。（味方を追尾！）
//↑公開時には有ったがupd17？の頃には消してた。なんで？お兄ちゃん裏追加時のミス？
	FPS Set_CharPoint,1,Char_Front,0;
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - 
* L_FPSmenu_1_102B;
CALL DF402/FPS_Action_char_set.txt,L_LoadMDL_4;//兄モデル準備
CALL DF402/FPS_Action_char_set.txt,L_SetM_13;//兄。接近するまでイベント待機
RET p_兄行動,=,呼出;
	FPS Set_CharPoint,1,Char_FrontR,0;

XFile4_ID 6,true;
Motion_Load DF402/M_HEVS02_1_man.txt,false,,0;//
XFile4_ID 0,true;
Loop_4_ft -,30,1.0;

GOTO L_FPSmenu_ret;



//イベントで男性キャラを変更するテスト
XFile4_ID 6,true;
SetCD_csDir 6,,6\EMDF37_FTM4M1_04a01;
CALL _setup.txt;
SetCD_csDirRe 6,,6\EMDF37_FTM4M1_04a01;
XFile4_MotionID 6,6;//レイヤー7のモデルはモーション0で動かす

XFile4_ID 6,true;
XFile4_Bone_EditPoseLimit DF40_GM4_boneCNV.txt;//DF37の男性モデルをDF40にｺﾝﾊﾞｰﾄ
XFile4_ID 0,true;

	FPS Set_CharPoint,1,Char_Front,0;

GOTO L_FPSmenu_ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_1_103;
CALL DF402/FPS_Action_char_set.txt,L_LoadMDL_5;//父モデル準備
CALL DF402/FPS_Action_char_set.txt,L_SetM_1;//全く動かない例。モーション外部指定
	FPS Set_CharPoint,1,Char_Front,0;
GOTO L_FPSmenu_ret;



//イベントで男性キャラを変更するテスト
XFile4_ID 6,true;
SetCD_csDir 6,,6\EMDF37_FTM4M1_05a01;
CALL _setup.txt;
SetCD_csDirRe 6,,6\EMDF37_FTM4M1_05a01;
XFile4_MotionID 6,6;//レイヤー7のモデルはモーション0で動かす

XFile4_ID 6,true;
XFile4_Bone_EditPoseLimit DF40_GM4_boneCNV.txt;//DF37の男性モデルをDF40にｺﾝﾊﾞｰﾄ
XFile4_ID 0,true;

	FPS Set_CharPoint,1,Char_Front,0;

GOTO L_FPSmenu_ret;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_1_104;
CALL DF402/FPS_Action_char_set.txt,L_SetM_3;//痴漢の試作。触る敵。人の目が有っても攻撃してくる
CALL DF402/FPS_Action_char_set.txt,L_LoadMDL_6;//サラリーマン
	FPS Set_CharPoint,1,Char_Front,0;
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_1_105;
CALL DF402/FPS_Action_char_set.txt,L_LoadMDL_6;//サラリーマン
CALL DF402/FPS_Action_char_set.txt,L_SetM_4;//強姦魔の試作。最終的にレイプまでする敵。人の居ない所まで追尾する
	FPS Set_CharPoint,1,Char_Front,0;
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_1_106;
CALL DF402/FPS_Action_char_set.txt,L_LoadMDL_6;//サラリーマン
CALL DF402/FPS_Action_char_set.txt,L_SetM_5;//ストーカーの試作。
	FPS Set_CharPoint,1,Char_Front,0;
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_1_107;
CALL DF402/FPS_Action_char_set.txt,L_LoadMDL_6;//サラリーマン
CALL DF402/FPS_Action_char_set.txt,L_SetM_6;//お客？
	FPS Set_CharPoint,1,Char_Front,0;
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_1_109;
CALL DF402/FPS_Action_char_set.txt,L_LoadMDL_6;//サラリーマン
CALL DF402/FPS_Action_char_set.txt,L_SetM_9;//敵の試作。好戦的。走ってくる
	FPS Set_CharPoint,1,Char_Front,0;
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_1_110;
CALL DF402/FPS_Action_char_set.txt,L_LoadMDL_6;//サラリーマン
CALL DF402/FPS_Action_char_set.txt,L_SetM_10;//好戦的。近接
	FPS Set_CharPoint,1,Char_Front,0;
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_1_111;
CALL DF402/FPS_Action_char_set.txt,L_LoadMDL_6;//サラリーマン
CALL DF402/FPS_Action_char_set.txt,L_SetM_11;//強姦魔２。ネオレイパー。ドコでもスグ襲う
	FPS Set_CharPoint,1,Char_Front,0;
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_1_114;
CALL DF402/FPS_Action_char_set.txt,L_LoadMDL_6;//サラリーマン
CALL DF402/FPS_Action_char_set.txt,L_SetM_14;//痴漢ダッシュ
	FPS Set_CharPoint,1,Char_Front,0;
GOTO L_FPSmenu_ret;





//-----------------------------------------------------------------------------+
//メニュー。携帯電話。
//-----------------------------------------------------------------------------+
* L_FPSmenu_7;

Menu_CLS Menu;
Menu_ADD 終了,,0;
Menu_ADD 手1000,,1;
Menu_ADD フェラ2000,,1;
Menu_ADD 胸3000,,1;
Menu_ADD 本番ゴム10000,,2;
Menu_ADD ナマ中30000,,2;
Loop_4_menu true;

GOTO L_FPSmenu_ret;




//-----------------------------------------------------------------------------+
//メニュー。デバック。debug　　裏能力
//-----------------------------------------------------------------------------+
* L_FPSmenu_8;

Menu_CLS Menu;
Menu_ADD 終了,,0;
switch @,p_達成M;
switch case_t,key,時間;	Menu_ADD 時間変更,,404;
switch case_t,key,時間;	Menu_ADD 兄を洗脳,,405;//追加能力
switch case_t,key,警戒;	Menu_ADD 警戒Cls,,101;
switch case_t,key,警戒;	Menu_ADD 警戒UP,,102;
switch case_t,key,自殺;	Menu_ADD 自殺,,201;
switch case_t,key,失神;	Menu_ADD 絶頂失神,,202;//快楽気絶・精神崩壊
switch case_t,key,転送;	Menu_ADD 転送ポイント,,302;
//switch case_t,key,転送;	Menu_ADD 転送ポイント,,301;
//switch case_t,key,転送;	Menu_ADD 転送ポイントB,,302;
switch case_t,key,着替;	Menu_ADD 着替,,401;
switch case_t,key,音声;	Menu_ADD 音声,,403;
switch end;
Loop_4_menu true;

switch @,@RetMenu;
//switch case,1;	RET p_時間,=,19;RET p_分間,=,0;
//switch case,2;	RET p_時間,=,5;	RET p_分間,=,0;
//switch case,3;	RET p_時間,=,7;	RET p_分間,=,0;
switch case,101;	FPS keikai,0;
switch case,102;	FPS keikai,200;
switch case,201;	FPS Set_CharST_addP,0,-99990,,,;//2=HP 3=MP 5=Sep
switch case,202;	FPS Set_CharST_addP,0,,,,-99990,;//2=HP 3=MP 5=Sep
switch end;


Goto@ @RetMenu,403,L_FPSmenu_8_403;//
Goto@ @RetMenu,404,L_FPSmenu_8_404;//
Goto@ @RetMenu,405,L_FPSmenu_8_405;//●追加能力

MapBool ,,,false;//FG消去 デバック用
Goto@ @RetMenu,4,L_HEVM02;//顧客メニュー。ここでスル系
Goto@ @RetMenu,301,L_FPSmenu_8_301;//
Goto@ @RetMenu,302,L_FPSmenu_8_302;//
Goto@ @RetMenu,401,L_FPSmenu_8_402;//
//Goto@ @RetMenu,4,L_HEVM02_1;

GOTO L_FPSmenu_ret;





//旧コード
Menu_CLS Menu;
Menu_ADD 終了,,0;
Menu_ADD 時間変更,,404;
//Menu_ADD 時間_夜,,1;
//Menu_ADD 時間_朝,,2;
//Menu_ADD 時間_昼,,3;
//Menu_ADD ﾋﾟｽﾄﾝtest,,4;
Menu_ADD 警戒Cls,,101;
Menu_ADD 警戒UP,,102;
Menu_ADD 自殺,,201;
Menu_ADD 絶頂失神,,202;//快楽気絶・精神崩壊
Menu_ADD 転送ポイント,,301;
Menu_ADD 着替,,401;
Menu_ADD 音声,,403;
Loop_4_menu true;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_8_301;
CALL DF402/FPS_Action_map_set.txt,orMAP_DF40_densya2_IN2;//前の車両への連結・電車の車内(ジャンプポイント)
GOTO L_FPSmenu_ret;

* L_FPSmenu_8_302;
CALL DF402/FPS_Action_map_set.txt,orMAP_DF402_debug_IN1;//ジャンプポイント。デバックルーム  DF402B版
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_8_402;
CALL DF40_Action_CSS.txt;
//IconDELL ;//ｱｲｺﾝを消して開放
//CALL DF402/set.txt,Set_icon;//アイコンを再準備！
GOTO L_FPSmenu_ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_8_403;//音声タイプ変更
Menu_CLS Menu;
Menu_ADD 終了,,0;
Menu_ADD 声OFF,,100;
Menu_ADD 声1おっとり姉,,101;
Menu_ADD 声2優しい姉,,102;
Menu_ADD 声3勇ましい,,103;
Menu_ADD 声4妹ロリ,,104;
Menu_ADD H声OFF,,200;
Menu_ADD H声1彼女,,201;
Menu_ADD H声2姉ｸｰﾙ,,202;
Menu_ADD H声3妹ﾛﾘ,,203;
Loop_4_menu true;

switch @,@RetMenu;
switch case,100;	RET p_声at,=,0;
switch case,101;	RET p_声at,=,1;
switch case,102;	RET p_声at,=,2;
switch case,103;	RET p_声at,=,3;
switch case,104;	RET p_声at,=,4;
switch case,200;	RET p_声ht,=,0;
switch case,201;	RET p_声ht,=,1;
switch case,202;	RET p_声ht,=,2;
switch case,203;	RET p_声ht,=,3;
switch end;
CALL DF402/set_VOICE.txt,L_FPS_Wav;
GOTO L_FPSmenu_ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_8_404;//時間変更
Menu_CLS Menu;
Menu_ADD 終了,,0;
Menu_ADD 時間_夜,,1;
Menu_ADD 時間_朝,,2;
Menu_ADD 時間_昼,,3;
Loop_4_menu true;

switch @,@RetMenu;
switch case,1;	RET p_時間,=,19;RET p_分間,=,0;
switch case,2;	RET p_時間,=,5;	RET p_分間,=,0;
switch case,3;	RET p_時間,=,7;	RET p_分間,=,0;
switch end;
GOTO L_FPSmenu_ret;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_8_405;//兄を洗脳
Menu_CLS Menu;
Menu_ADD 終了,,0;
Menu_ADD 兄の性欲＋,,1;
Menu_ADD 兄の性欲−,,2;
switch @,p_ＬＶp;
switch case_d,A<=p,100;
	Menu_ADD 兄の怒り＋,,3;
	Menu_ADD 兄の怒り−,,4;
switch end;
Loop_4_menu true;

switch @,@RetMenu;
switch case,1;	LET p_旗兄性欲,=,p_旗兄性欲,+,100;
switch case,2;	LET p_旗兄性欲,=,p_旗兄性欲,-,100;
switch case,3;	LET p_旗兄怒り,=,p_旗兄怒り,+,100;
switch case,4;	LET p_旗兄怒り,=,p_旗兄怒り,-,100;
switch end;
GOTO L_FPSmenu_ret;








//-----------------------------------------------------------------------------+
//メニュー。特殊行動。現在の所はデバック用
//-----------------------------------------------------------------------------+
* L_FPSmenu_10;

Menu_CLS Menu;
Menu_ADD 終了,,0;
switch @,p_達成M;
switch case_t,key,大声;		Menu_ADD 大声で叫ぶ！,,21;
switch case_t,key,放尿1;	Menu_ADD ここで漏らす,,1;
switch case_t,key,放尿2;	Menu_ADD ここで放尿,,2;
switch end;
Menu_ADD 服を着る,,11;
Menu_ADD 下着に,,12;
Menu_ADD ハダカに,,13;
Menu_ADD オナニー,,31;
Loop_4_menu true;

Goto@ @RetMenu,1,L_FPSmenu_10_1;
Goto@ @RetMenu,2,L_FPSmenu_10_2;
Goto@ @RetMenu,11,L_FPSmenu_10_11;
Goto@ @RetMenu,12,L_FPSmenu_10_12;
Goto@ @RetMenu,13,L_FPSmenu_10_13;
Goto@ @RetMenu,21,L_FPSmenu_10_21;
Goto@ @RetMenu,31,L_FPSmenu_10_31;
GOTO L_FPSmenu_ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_10_1;
LET p_素行,=,p_素行,-,5;
XFile4_ID 0,true;
Motion_Load DF402/LM_HEV001.txt,false,,30;//良く考えたら痴漢では？
FPS Set_CharCOM_Hit,0,402放尿;
RET p_便意,=,0;
CALL DF402/set.txt,DIM_LOOP;//パラメータのターン変化//回復直後にﾍﾟﾅﾙﾃｨｰを解除する
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_10_2;
LET p_素行,=,p_素行,-,5;
FPS Set_CharCOM_Hit,0,402放尿2;
RET p_便意,=,0;
CALL DF402/set.txt,DIM_LOOP;//パラメータのターン変化//回復直後にﾍﾟﾅﾙﾃｨｰを解除する
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_10_11;
CALL DF402/set.txt,服着る;//服着る 下着に 裸に
GOTO L_FPSmenu_ret;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_10_12;
CALL DF402/set.txt,下着に;//服着る 下着に 裸に
GOTO L_FPSmenu_ret;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_10_13;
CALL DF402/set.txt,裸に;//服着る 下着に 裸に
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_10_21;//大声で悲鳴
CALL DF402/set_VOICE.txt,L_死亡;
LET p_素行,=,p_素行,-,1;
CALL DF402/set.txt,液_悲鳴;//悲鳴時に見えない液を出して周囲を警戒させる
XFile4_ID 0,true;
Motion_Load DF402/LM_HEV001.txt,false,,30;//良く考えたら痴漢では？
//FPS Set_CharCOM_Hit,0,男_MT300;
FPS Set_CharCOM_Hit,0,女_MT4;
GOTO L_FPSmenu_ret;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_10_31;//オナニー
Menu_CLS Menu;//メニューを消す。イベントでＨシーンに入る場合の対策
MapBool ,,,false;//FG消去
//ケイタイからＨシーンに入るパターンは初？↑の初期化で十分か？
GOSUB L_HEVS_Set;

MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print 自分で慰めます;

DF37PAR_ADD 0,0,0;
DF37PAR_PP2 0.00, 0.0,  0;//時間に応じて増える値
DF37PAR_PGP    0, 0.0,  0;//
// - - - - - - - - - - - - - - - - - - -
* L_FPSmenu_10_31_menu;//オナニー

	CALL DF402/set_VOICE.txt,L_LOVE兄_sex;//合意。本番類音声

	CALL DF402/set.txt,L_menuSet1;//←コレでメニューをリセットするのアリ？
4HS_EOF_CLS ALL;//EOF全てリセット
Menu_CLS Menu;
4HS_Menu1_ADD 終了,L_HEVS_Ret;
4HS_Menu1_ADD 仰向けオナニー,L_FPSmenu_10_31_1;
4HS_Menu1_ADD 仰向け悶絶,L_FPSmenu_10_31_3;
4HS_Menu1_ADD 座って,L_FPSmenu_10_31_2;
4HS_Menu1_ADD 座って2,L_FPSmenu_10_31_4;
switch @,p_ＬＶp;
switch case_d,A<=p,100;
	4HS_Menu1_ADD 快感0に,L_FPSmenu_10_31_set0;
	4HS_Menu1_ADD 快感95に,L_FPSmenu_10_31_set95;
	4HS_Menu1_ADD 快感100に,L_FPSmenu_10_31_set100;
switch end;

XFile4_ID 0,true;
Loop_4_Hscene true;

// - - - - - - - - - - - - - - - - - - -
* L_FPSmenu_10_31_1;
Motion_Load DF402/L_FPSmenu_10_31_1.txt,false,,30;//
DF37PAR_PP2 0.02, 0.0,  0;//時間に応じて増える値
GOTO L_FPSmenu_10_31_menu;

// - - - - - - - - - - - - - - - - - - -
* L_FPSmenu_10_31_2;
Motion_Load DF402/L_FPSmenu_10_31_2.txt,false,,30;//
DF37PAR_PP2 0.04, 0.0,  0;//時間に応じて増える値
GOTO L_FPSmenu_10_31_menu;

// - - - - - - - - - - - - - - - - - - -
* L_FPSmenu_10_31_3;
Motion_Load DF402/L_FPSmenu_10_31_3.txt,false,,30;//
DF37PAR_PP2 0.06, 0.0,  0;//時間に応じて増える値
GOTO L_FPSmenu_10_31_menu;

// - - - - - - - - - - - - - - - - - - -
* L_FPSmenu_10_31_4;
Motion_Load DF402/L_FPSmenu_10_31_4.txt,false,,30;//
DF37PAR_PP2 0.08, 0.0,  0;//時間に応じて増える値
GOTO L_FPSmenu_10_31_menu;

// - - - - - - - - - - - - - - - - - - -
* L_FPSmenu_10_31_set0;
DF37PAR_SET 0,,;//快感値を指定
DF37PAR_SETzet 0;//絶頂数を常に非表示にする工夫
GOTO L_FPSmenu_10_31_menu;

* L_FPSmenu_10_31_set95;
DF37PAR_SET 95,,;//快感値を指定
DF37PAR_SETzet 0;//絶頂数を常に非表示にする工夫
GOTO L_FPSmenu_10_31_menu;

* L_FPSmenu_10_31_set100;
DF37PAR_SET 100,,;//快感値を指定
DF37PAR_SETzet 0;//絶頂数を常に非表示にする工夫
GOTO L_FPSmenu_10_31_menu;












//-----------------------------------------------------------------------------+
//メニュー。ポイント能力向上
//-----------------------------------------------------------------------------+
* L_FPSmenu_11;

MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print レベルアップ得点を割り振って能力を向上します;
MSG_Print ＨＰ：ダメージを受けても死ににく成ります;
MSG_Print ＭＰ：ダッシュや攻撃で減る赤のゲージの最大値がアップ;
MSG_Print ＳｅＰ：精神力は性的ダメージを受けても絶頂気絶しにくい;

Menu_CLS Menu;
Menu_ADD 終了,,0;
CALL DF402/set.txt,L_PAR_PRINT5;//ポイント
Menu_ADD @[p_表示文字],,0;//現在
Menu_ADD HP体力_up,,1;
Menu_ADD MP行動_up,,2;
Menu_ADD SeP精神up,,3;
 switch @,p_ＬＶp;
 switch case_d,A<=p,100;
	//Menu_ADD HP体力_自動回復,,4;//空腹処理と重複するので実装困難
	Menu_ADD MP行動_自動回復,,5;
	Menu_ADD SeP精神自動回復,,6;
	//Menu_ADD SP移動速度UP,,7;
 switch end;
Loop_4_menu true;

Goto@ @RetMenu,0,L_FPSmenu_ret;

DF37PAR_GOTO @[p_得点],=,0,L_FPSmenu_11_err;
LET p_得点,=,p_得点,-,1;
CALL DF402/set.txt,DIM_Check;//変数の整合性


Goto@ @RetMenu,1,L_FPSmenu_11_1;
Goto@ @RetMenu,2,L_FPSmenu_11_2;
Goto@ @RetMenu,3,L_FPSmenu_11_3;
Goto@ @RetMenu,4,L_FPSmenu_11_4;
Goto@ @RetMenu,5,L_FPSmenu_11_5;
Goto@ @RetMenu,6,L_FPSmenu_11_6;
Goto@ @RetMenu,7,L_FPSmenu_11_7;
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_11_err;
MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print 能力向上に使える残りポイントが有りません;
MSG_Print ポイントはレベルアップ時に加算されます;
Loop_MSG true;
GOTO L_FPSmenu_ret;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_11_1;
FPS Set_CharST_add,0,100,,,;//2=HP 3=MP 5=Sep  //4=MP_Re 6=SeP_Re 7=SP 8=HP_Re
GOTO L_FPSmenu_11;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_11_2;
FPS Set_CharST_add,0,,100,,;//2=HP 3=MP 5=Sep
GOTO L_FPSmenu_11;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_11_3;
FPS Set_CharST_add,0,,,,100;//2=HP 3=MP 5=Sep
GOTO L_FPSmenu_11;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_11_4;
//S Set_CharST_add,0,,,mp,,sep,sp,hp;//2=HP 3=MP 5=Sep  //4=MP_Re 6=SeP_Re 7=SP 8=HP_Re
FPS Set_CharST_add,0,,,,,,,1;//2=HP 3=MP 5=Sep  //4=MP_Re 6=SeP_Re 7=SP 8=HP_Re
GOTO L_FPSmenu_11;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_11_5;
FPS Set_CharST_add,0,,,1,,,,;//2=HP 3=MP 5=Sep  //4=MP_Re 6=SeP_Re 7=SP 8=HP_Re
GOTO L_FPSmenu_11;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_11_6;
FPS Set_CharST_add,0,,,,,1,,;//2=HP 3=MP 5=Sep  //4=MP_Re 6=SeP_Re 7=SP 8=HP_Re
GOTO L_FPSmenu_11;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_11_7;
FPS Set_CharST_add,0,,,,,,0.1,;//2=HP 3=MP 5=Sep  //4=MP_Re 6=SeP_Re 7=SP 8=HP_Re
GOTO L_FPSmenu_11;



//-----------------------------------------------------------------------------+
//メニュー。メール
//-----------------------------------------------------------------------------+
* L_FPSmenu_12;

Menu_CLS Menu;
Menu_ADD 終了,,0;
Menu_ADD 変わったね,,1;

switch @,p_日齢;//生存日数。現在の肉体での経過日数
switch case_d,A<=p,2;	Menu_ADD 家出？,,2;
switch case_d,A<=p,3;	Menu_ADD 小遣い,,3;//駅前で稼ぐ
switch case_d,A<=p,4;	Menu_ADD バイト,,4;//店の説明
switch case_d,A<=p,5;
//switch case_d,A<=p,99;	Menu_ADD オマエ,,99;
switch end;

Loop_4_menu true;

MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print 送られてきたメールを閲覧します;
MSG_Print 日数が経過すれば新しい文章が増えるかもしれません;

Goto@ @RetMenu,1,L_FPSmenu_12_1;
Goto@ @RetMenu,2,L_FPSmenu_12_2;
Goto@ @RetMenu,3,L_FPSmenu_12_3;
Goto@ @RetMenu,4,L_FPSmenu_12_4;
Goto@ @RetMenu,5,L_FPSmenu_12_5;
Goto@ @RetMenu,6,L_FPSmenu_12_6;
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -□□□ - - - - +
* L_FPSmenu_12_1;	MSG_Cls ;
//MSG_Print 英子ちゃん最近フインキ変わったよね;
MSG_Print アンタ最近フインキ変わったよね;
MSG_Print イイと思うよ。明るくなった;
MSG_Print 前は正直ガリベンのヤナ感じで話し辛かったけど;
MSG_Print これからは仲良くしようね;
GOTO L_FPSmenu_12;

* L_FPSmenu_12_2;	MSG_Cls ;
MSG_Print 家出たんだー　あーわかるーおやってチョーうざいよねー;
MSG_Print 家に帰りたくないなら適当に男を捜して家に泊めて貰いなよ;
MSG_Print 街に行って駅前あたりで探せば声を掛けてくるオッサンが居るよ;
MSG_Print ホテルとか銭湯もあるけどお金が掛かるから損だよね！;
GOTO L_FPSmenu_12;

* L_FPSmenu_12_3;	MSG_Cls ;
MSG_Print 稼ぐなら仕事の仕方教えようか？;
MSG_Print 売るならヤッパリ駅前広場！おススメの稼ぎ場所だよ;
MSG_Print 声を掛けてくるおっさん達についてこさせて;
MSG_Print 物陰とかでサービスすればお金が貰えるって寸法よ;
GOTO L_FPSmenu_12;

* L_FPSmenu_12_4;	MSG_Cls ;//- - - - - - - - - - - - - - - - -□□□ - - - - +
MSG_Print バイトするなら駅の北にある店がオススメ;
MSG_Print お店は安心;
MSG_Print レイプされてタダマンやり逃げされる心配が無いからね;
MSG_Print そのかわり嫌な客も居るけど・・・相手を選べないのが欠点;
GOTO L_FPSmenu_12;

* L_FPSmenu_12_5;	MSG_Cls ;//- - - - - - - - - - - - - - - - -□□□ - - - - +
MSG_Print ;
MSG_Print ;
MSG_Print ;
MSG_Print ;
GOTO L_FPSmenu_12;

* L_FPSmenu_12_6;	MSG_Cls ;//- - - - - - - - - - - - - - - - -□□□ - - - - +
MSG_Print ;
MSG_Print ;
MSG_Print ;
MSG_Print ;
GOTO L_FPSmenu_12;


MSG_Print アンタ運動オンチだもんねー;
MSG_Print 走るのは方向キーを押しながらマウス右ボタンだけど;
MSG_Print アンタには無理かもね・・・;

MSG_Print ;
MSG_Print ;
MSG_Print ;
MSG_Print ;

MSG_Print ;
MSG_Print ;
MSG_Print ;
MSG_Print ;


* L_FPSmenu_12_99;	MSG_Cls ;
MSG_Print 英子・・・じゃないよね？;
MSG_Print 誰？なんで英子と同じ顔してるの？;
MSG_Print ;
MSG_Print ;
GOTO L_FPSmenu_12;


//マジ視ね
//○○な客って居るよねー最悪ー



//-----------------------------------------------------------------------------+
//メニュー。マップ。地図
//-----------------------------------------------------------------------------+
* L_FPSmenu_15;

MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print 現在値の周辺のマップを表示します;

Menu_CLS Menu;
Menu_ADD 終了,,0;
Menu_ADD 周辺マップ,,1;
Menu_ADD 周辺マップ中,,2;
Menu_ADD 周辺マップ広域,,3;
Menu_ADD 周辺マップ遠距離,,4;
//Menu_ADD 全体マップ,,1;

Loop_4_menu false;

Goto@ @RetMenu,0,L_FPSmenu_ret;

Goto@ @RetMenu,1,L_FPSmenu_15_1;
Goto@ @RetMenu,2,L_FPSmenu_15_2;
Goto@ @RetMenu,3,L_FPSmenu_15_3;
Goto@ @RetMenu,4,L_FPSmenu_15_4;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_15_menu;
Load_FG_SiriteFile DF402/FPSmenu_FG03.png;
MSG_Cls ;

IconDELL ;//ｱｲｺﾝを消して開放

Menu_INI ;//メニューの設定をクリアする
Menu_SetPos 480,20;
Menu_Sprite DF402/top_menu_2.png;
Menu_SetType 1,120,15,16;//液晶風

Menu_CLS Menu;
Menu_ADD 終了,,0;
Menu_ADD 周辺マップ,,1;
Menu_ADD 周辺マップ中,,2;
Menu_ADD 周辺マップ広域,,3;
Menu_ADD 周辺マップ遠距離,,4;
//Menu_ADD 全体マップ,,1;

Loop_4_menu false;

Goto@ @RetMenu,1,L_FPSmenu_15_1;
Goto@ @RetMenu,2,L_FPSmenu_15_2;
Goto@ @RetMenu,3,L_FPSmenu_15_3;
Goto@ @RetMenu,4,L_FPSmenu_15_4;

CALL DF402/set.txt,Set_icon;//アイコンを再準備！
Goto@ @RetMenu,0,L_FPSmenu_ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_15_1;
//Set_CharView 0,101,15;//表示するキャラのXFile4_ID,表示ﾀｲﾌﾟ
Set_CharView 0,102,15;//表示するキャラのXFile4_ID,表示ﾀｲﾌﾟ
GOTO L_FPSmenu_15_menu;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_15_2;
Set_CharView 0,102,30;//表示するキャラのXFile4_ID,表示ﾀｲﾌﾟ
GOTO L_FPSmenu_15_menu;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_15_3;
Set_CharView 0,102,60;//表示するキャラのXFile4_ID,表示ﾀｲﾌﾟ
GOTO L_FPSmenu_15_menu;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_15_4;
Set_CharView 0,102,120;//表示するキャラのXFile4_ID,表示ﾀｲﾌﾟ
GOTO L_FPSmenu_15_menu;


//-----------------------------------------------------------------------------+
//メニュー。ミュージックプレイヤー
//-----------------------------------------------------------------------------+
* L_FPSmenu_17;
Loop_Mmenu ;
GOTO L_FPSmenu_ret;


//-----------------------------------------------------------------------------+
//メニュー。ブラウザ
//-----------------------------------------------------------------------------+
* L_FPSmenu_18;

//フォルダを開くデバック
//Loop_4_FileMenu ./script/DF402_ACV/PDP,*.txt,VIEW;
//Loop_4_FileMenu ./script/DF402_ACV/PDP,*.txt~!_.,VIEW;
//Loop_4_FileMenu ./script/DF402_ACV/PDP,*?????.txt,VIEW;
//Loop_4_FileMenu ./script/DF402_ACV/PDP,*.txt,VIEW;
//Loop_4_FileMenu ./script/DF402_ACV/PDP,*_,VIEW;
//Loop_4_FileMenu ./script/DF402_ACV/PDP,＿*.txt,VIEW;
//Loop_4_FileMenu ./script/DF402_ACV/PDP,*＿.txt,VIEW;
//Loop_4_FileMenu ./script/DF402_ACV/PDP,　*.txt,VIEW;
Loop_4_FileMenu ./script/DF402_ACV/PDP,*_.txt,VIEW;

GOTO L_FPSmenu_ret;

//ファイル単体
//Loop_TextFile ,./script/DF402_ACV/ENDROLL.txt;

//フォルダを開く
//Loop_4_FileMenu ./script/DF402_ACV/PDP,*.txt,VIEW;
//Loop_4_FileMenu ./script/DF402_ACV/PDP,*?????.txt,VIEW;
Loop_4_FileMenu ./script/DF402_ACV/PDP,*.txt~!_.,VIEW;

//~!"word"

GOTO L_FPSmenu_ret;




//-----------------------------------------------------------------------------+
//メニュー。行動スタイル。　アクションの形式
//-----------------------------------------------------------------------------+
* L_FPSmenu_19;
Menu_CLS Menu;
Menu_ADD 終了,,0;
Menu_ADD デフォルト,,1;
Menu_ADD 水泳モード,,2;
Menu_ADD 更衣室モード,,3;
Menu_ADD 店員モード,,4;
Menu_ADD 監禁モード,,5;
Loop_4_menu false;

Goto@ @RetMenu,1,L_FPSmenu_19_1;
Goto@ @RetMenu,2,L_FPSmenu_19_2;
Goto@ @RetMenu,3,L_FPSmenu_19_3;
Goto@ @RetMenu,4,L_FPSmenu_19_4;
Goto@ @RetMenu,5,L_FPSmenu_19_5;

GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_19_1;
//FPS Set_DeffCom,0,;//デフォコマンドに戻す
//FPS Set_CharCOM_Deff,0,歩行402;//デフォコマンド変更。永続

RET p_COM_Deff,=,歩行402;
FPS Set_CharCOM_Deff,0,@[p_COM_Deff];
FPS Set_DeffCom,0,;//デフォコマンドに戻す
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_19_2;
//FPS Set_CharCOM_Hit,0,歩行402_飛込;
//FPS Set_CharCOM_Deff,0,歩行402_飛込;//デフォコマンド変更。永続

RET p_COM_Deff,=,歩行402_飛込;
FPS Set_CharCOM_Deff,0,@[p_COM_Deff];
FPS Set_DeffCom,0,;//デフォコマンドに戻す
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_19_3;
//FPS Set_CharCOM_Hit,0,歩行402_更衣室;
//FPS Set_CharCOM_Deff,0,歩行402_更衣室;//デフォコマンド変更。永続

RET p_COM_Deff,=,歩行402_更衣室;
FPS Set_CharCOM_Deff,0,@[p_COM_Deff];
FPS Set_DeffCom,0,;//デフォコマンドに戻す
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_19_4;
//FPS Set_CharCOM_Hit,0,歩行402_ｺﾝﾋﾞﾆ;
//FPS Set_CharCOM_Deff,0,歩行402_ｺﾝﾋﾞﾆ;//デフォコマンド変更。永続

RET p_COM_Deff,=,歩行402_ｺﾝﾋﾞﾆ;
FPS Set_CharCOM_Deff,0,@[p_COM_Deff];
FPS Set_DeffCom,0,;//デフォコマンドに戻す
GOTO L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_19_5;
RET p_COM_Deff,=,歩行402_監禁;
FPS Set_CharCOM_Deff,0,@[p_COM_Deff];
FPS Set_DeffCom,0,;//デフォコマンドに戻す
GOTO L_FPSmenu_ret;









//-----------------------------------------------------------------------------+
//メニュー。開放フラグ確認
//-----------------------------------------------------------------------------+
* L_FPSmenu_16;
Load_FG_SiriteFile DF402/FPSmenu_FG02.png;

Menu_INI ;//メニューの設定をクリアする
Menu_SetPos 100,100;
Menu_Sprite DF402/top_menu_2.png;
Menu_SetType 1,120,15,16;//液晶風

IconDELL ;//ｱｲｺﾝを消して開放

MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print ★★★開放フラグ☆☆☆;
MSG_Print 諸行無常の格差社会を生き抜く為のブラック資格取得履歴;
MSG_Print イケてる女は資格がデキる全部集めて面接官に自慢しよう;

GOTO L_FPSmenu_16_1;//デバック用。現状マップフラグしかないので。
* L_FPSmenu_16_top;

Menu_CLS Menu;
Menu_ADD 終了,,0;
Menu_ADD マップフラグ,,1;
Menu_ADD 回数フラグ,,2;
Menu_ADD レベルフラグ,,3;
//Menu_ADD イベントフラグ,,1;

Loop_4_menu false;

Goto@ @RetMenu,1,L_FPSmenu_16_1;
Goto@ @RetMenu,2,L_FPSmenu_16_2;
Goto@ @RetMenu,3,L_FPSmenu_16_3;


CALL DF402/set.txt,Set_icon;//アイコンを再準備！
Goto@ @RetMenu,0,L_FPSmenu_ret;

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
//マップフラグ
* L_FPSmenu_16_1;

MSG_Cls ;
IconDELL ;//ｱｲｺﾝを消して開放

switch @,p_達成M;
switch case_t,!key,自殺;
	IconADD2 DF402/menu_icon_FLG01.png,MENU01,自殺,200,200,19,50,50;
	IconMSG @-,条件:海まで行って入水自殺しよう;
switch case_t,key,自殺;
	IconADD2 DF402/menu_icon_FLG02.png,MENU01,自殺,200,200,19,50,50;
	IconMSG @-,ケイタイでいつでも自殺できるよ;

switch case_t,!key,兄秘密;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,兄の秘密,300,200,19,50,50;
	IconMSG @-,条件:日記を読んで兄の弱みを握ろう;
switch case_t,key,兄秘密;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,兄の秘密,300,200,19,50,50;
	IconMSG @-,ケイタイで何時でも兄を呼び出せるよ;

switch case_t,!key,父番号;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,父の番号,400,200,19,50,50;
	IconMSG @-,条件:父の携帯電話番号を聞こう;
switch case_t,key,父番号;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,父の番号,400,200,19,50,50;
	IconMSG @-,ケイタイで何時でも父を呼び出せるよ;

switch case_t,!key,転送;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,場所移動,500,200,19,50,50;
	IconMSG @-,条件:電車に乗って転送車両に行こう;
switch case_t,key,転送;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,場所移動,500,200,19,50,50;
	IconMSG @-,携帯でジャンプポイントに行けるよ;


switch case_t,!key,放尿2;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,放尿2,200,300,19,50,50;
	IconMSG @-,条件:街中の建物の影で放尿を経験しよう;
switch case_t,key,放尿2;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,放尿2,200,300,19,50,50;
	IconMSG @-,ケイタイで何時でも放尿できるよ;

switch case_t,!key,着替;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,着替,300,300,19,50,50;
	IconMSG @-,条件:下着売り場の更衣室に行こう;
switch case_t,key,着替;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,着替,300,300,19,50,50;
	IconMSG @-,いつでもお着替えが出来るよ;

switch case_t,!key,友人;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,友人呼出,400,300,19,50,50;
	IconMSG @-,条件:学校の校舎内のどこかにあるよ;
switch case_t,key,友人;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,友人呼出,400,300,19,50,50;
	IconMSG @-,友達なら呼べばスグくるよ;

switch case_t,!key,友人水;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,水着友人,500,300,19,50,50;
	IconMSG @-,条件:学校のプールの奥まで行こう;
switch case_t,key,友人水;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,水着友人,500,300,19,50,50;
	IconMSG @-,友達は水着で来るよ;


switch case_t,!key,音楽;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,音楽変更,200,400,19,50,50;
	IconMSG @-,条件:兄のオーディオに触ろう;
switch case_t,key,音楽;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,音楽変更,200,400,19,50,50;
	IconMSG @-,音楽を聴けるよ;

switch case_t,!key,大声;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,女の悲鳴,300,400,19,50,50;
	IconMSG @-,条件:森の滝の裏で修行しよう;
switch case_t,key,大声;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,女の悲鳴,300,400,19,50,50;
	IconMSG @-,悲鳴で周囲を警戒させるよ;

switch end;

GOTO L_FPSmenu_16_top;

	MSG_Print 自殺の名所！を達成した;
	MSG_Print ケイタイでいつでも自殺できるようになった;
	MSG_Print 兄の秘密！を達成した;
	MSG_Print ケイタイで何時でも兄を呼び出せる様に成った;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
//回数フラグ
* L_FPSmenu_16_2;

MSG_Cls ;
IconDELL ;//ｱｲｺﾝを消して開放

switch @,p_達成M;
switch case_t,!key,時間;
	IconADD2 DF402/menu_icon_FLG01.png,MENU01,時間変更,200,200,19,50,50;
	IconMSG @-,条件:お兄ちゃんと肉体関係をもとう;
switch case_t,key,時間;
	IconADD2 DF402/menu_icon_FLG02.png,MENU01,時間変更,200,200,19,50,50;
//	IconMSG @-,ケイタイでいつでも自殺できるよ;
	IconMSG @-,現在時刻を変更出来るよ;

switch case_t,!key,警戒;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,警戒操作,300,200,19,50,50;
	IconMSG @-,条件:お父さんと肉体関係を重ねよう;
switch case_t,key,警戒;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,警戒操作,300,200,19,50,50;
	IconMSG @-,街の治安を変更出来るよ;

switch case_t,!key,失神;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,絶頂失神,400,200,19,50,50;
	IconMSG @-,条件:海でナンパされまくろう;
switch case_t,key,失神;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,絶頂失神,400,200,19,50,50;
	IconMSG @-,絶頂失神(ｹﾞｰﾑｵｰﾊﾞｰ的意味で)出来るよ;

switch case_t,!key,音声;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,音声変更,500,200,19,50,50;
	IconMSG @-,条件:公園に居る敵とセックスしよう;
switch case_t,key,音声;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,音声変更,500,200,19,50,50;
	IconMSG @-,声変わりするよ;


switch case_t,!key,bit警官;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,警察通報,200,300,19,50,50;
	IconMSG @-,条件:親切なお兄さんの家に泊めてもらおう;
switch case_t,key,bit警官;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,警察通報,200,300,19,50,50;
	IconMSG @-,お巡りさんコノ人です;

switch case_t,!key,友人裸;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,裸の友情,300,300,19,50,50;
	IconMSG @-,条件:痴漢の被害にあいましょう;
switch case_t,key,友人裸;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,裸の友情,300,300,19,50,50;
	IconMSG @-,お友達が脱ぐよ！呼べばスグだよ;

switch case_t,!key,bitｻﾗ;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,モブ人物,400,300,19,50,50;
	IconMSG @-,条件:お店で働こう;
switch case_t,key,bitｻﾗ;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,モブ人物,400,300,19,50,50;
	IconMSG @-,モブキャラを召喚するよ;

switch case_t,!key,警察パ;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,正義ロボ,500,300,19,50,50;
	IconMSG @-,条件:レイプ被害回数が増える;
switch case_t,key,警察パ;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,正義ロボ,500,300,19,50,50;
	IconMSG @-,パトレイパーが犯罪者をハチの巣にするよ;


switch case_t,!key,放尿1;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,失禁,200,400,19,50,50;
	IconMSG @-,条件:路上でＨ回数を稼ごう;
switch case_t,key,放尿1;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,失禁,200,400,19,50,50;
	IconMSG @-,どこでも放尿できるよ;

switch end;

GOTO L_FPSmenu_16_top;




// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
//レベルフラグ
* L_FPSmenu_16_3;

MSG_Cls ;
IconDELL ;//ｱｲｺﾝを消して開放

switch @,p_達成M;
switch case_t,!key,ｻﾗ痴漢;
	IconADD2 DF402/menu_icon_FLG01.png,MENU01,痴漢男,200,200,19,50,50;
	IconMSG @-,条件:レベルを３以上にしてね;
switch case_t,key,ｻﾗ痴漢;
	IconADD2 DF402/menu_icon_FLG02.png,MENU01,痴漢男,200,200,19,50,50;
	IconMSG @-,痴漢男を携帯電話で呼び出せるよ;

switch case_t,!key,ｻﾗ強姦;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,強姦魔,300,200,19,50,50;
	IconMSG @-,条件:レベルを６以上にしてね;
switch case_t,key,ｻﾗ強姦;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,強姦魔,300,200,19,50,50;
	IconMSG @-,強姦魔を携帯電話で呼び出せるよ;

switch case_t,!key,ｻﾗｽﾄ;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,ストーカー,400,200,19,50,50;
	IconMSG @-,条件:レベルを９以上にしてね;
switch case_t,key,ｻﾗｽﾄ;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,ストーカー,400,200,19,50,50;
	IconMSG @-,ストーカーを携帯電話で呼び出せるよ;

switch case_t,!key,ｻﾗ客;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,客,500,200,19,50,50;
	IconMSG @-,条件:レベルを１２以上にしてね;
switch case_t,key,ｻﾗ客;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,客,500,200,19,50,50;
	IconMSG @-,ｻﾗﾘｰﾏﾝ客を携帯電話で呼び出せるよ;


switch case_t,!key,ｻﾗ走殴;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,走殴,200,300,19,50,50;
	IconMSG @-,条件:レベルを１５以上にしてね;
switch case_t,key,ｻﾗ走殴;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,走殴,200,300,19,50,50;
	IconMSG @-,走って殴る男を携帯電話で呼び出せるよ;

switch case_t,!key,ｻﾗ近殴;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,近殴,300,300,19,50,50;
	IconMSG @-,条件:レベルを１８以上にしてね;
switch case_t,key,ｻﾗ近殴;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,近殴,300,300,19,50,50;
	IconMSG @-,近付いて殴る男を携帯電話で呼び出せるよ;

switch case_t,!key,ｻﾗ強姦2;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,強姦２,400,300,19,50,50;
	IconMSG @-,条件:レベルを２１以上にしてね;
switch case_t,key,ｻﾗ強姦2;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,強姦２,400,300,19,50,50;
	IconMSG @-,強姦２を携帯電話で呼び出せるよ;

switch case_t,!key,ｻﾗ痴漢D;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,痴漢Ｄ,500,300,19,50,50;
	IconMSG @-,条件:レベルを２４以上にしてね;
switch case_t,key,ｻﾗ痴漢D;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,痴漢Ｄ,500,300,19,50,50;
	IconMSG @-,痴漢ダッシュを携帯電話で呼び出せるよ;

switch end;

GOTO L_FPSmenu_16_top;







switch case_t,!key,キーワード;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,機能名称,200,400,19,50,50;
	IconMSG @-,条件:開放条件;
switch case_t,key,キーワード;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,機能名称,200,400,19,50,50;
	IconMSG @-,出来る機能;

switch case_t,!key,キーワード;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,機能名称,300,400,19,50,50;
	IconMSG @-,条件:開放条件;
switch case_t,key,キーワード;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,機能名称,300,400,19,50,50;
	IconMSG @-,出来る機能;

switch case_t,!key,キーワード;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,機能名称,400,400,19,50,50;
	IconMSG @-,条件:開放条件;
switch case_t,key,キーワード;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,機能名称,400,400,19,50,50;
	IconMSG @-,出来る機能;

switch case_t,!key,キーワード;
	IconADD2 DF402/menu_icon_FLG01.png,MENU02,機能名称,500,400,19,50,50;
	IconMSG @-,条件:開放条件;
switch case_t,key,キーワード;
	IconADD2 DF402/menu_icon_FLG02.png,MENU02,機能名称,500,400,19,50,50;
	IconMSG @-,出来る機能;







//-----------------------------------------------------------------------------+
//メニュー。パラメータ確認　　ステータス
//-----------------------------------------------------------------------------+
* L_FPSmenu_6;

Menu_CLS Menu;
Menu_ADD 終了,,0;


RET p_表示文字,=,;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_日数];
LET$ p_表示文字,=,@[p_表示文字],+,日経過;
Menu_ADD @[p_表示文字];

RET p_表示文字,=,この肉体日数 ;//この肉体の日数 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_日齢];
Menu_ADD @[p_表示文字];




RET p_表示文字,=,汚れ ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_汚れ];
Menu_ADD @[p_表示文字];

RET p_表示文字,=,空腹 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_空腹];
Menu_ADD @[p_表示文字];

RET p_表示文字,=,便意 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_便意];
Menu_ADD @[p_表示文字];

RET p_表示文字,=,睡眠 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_睡眠];
Menu_ADD @[p_表示文字];

//Menu_ADD ;

//RET p_表示文字,=,善悪 ;
//LET$ p_表示文字,=,@[p_表示文字],+,@[p_善悪];
//Menu_ADD @[p_表示文字];

RET p_表示文字,=,素行 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_素行];
Menu_ADD @[p_表示文字];

//Menu_ADD ;

RET p_表示文字,=,レベル ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_ＬＶp];
Menu_ADD @[p_表示文字];

RET p_表示文字,=,所持金\n　;//金 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_資金];
Menu_ADD @[p_表示文字];

Loop_4_menu true;

Goto@ @RetMenu,0,L_FPSmenu_ret;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_6_2;//ステータス２ページ目

Menu_CLS Menu;
Menu_ADD 終了,,0;

RET p_表示文字,=,兄とＨ回数 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_兄Ｈ];
Menu_ADD @[p_表示文字];

RET p_表示文字,=,父とＨ回数 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_父Ｈ];
Menu_ADD @[p_表示文字];

RET p_表示文字,=,海のＨ回数 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_海Ｈ];
Menu_ADD @[p_表示文字];

RET p_表示文字,=,公園Ｈ回数 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_公Ｈ];
Menu_ADD @[p_表示文字];

RET p_表示文字,=,痴漢被害数 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_痴Ｈ];
Menu_ADD @[p_表示文字];

RET p_表示文字,=,レイプ被害 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_レＨ];
Menu_ADD @[p_表示文字];

RET p_表示文字,=,路上Ｈ回数 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_路Ｈ];
Menu_ADD @[p_表示文字];

RET p_表示文字,=,お泊りＨ数 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_泊Ｈ];
Menu_ADD @[p_表示文字];

RET p_表示文字,=,店でのＨ数 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_店Ｈ];
Menu_ADD @[p_表示文字];

Loop_4_menu true;

Goto@ @RetMenu,0,L_FPSmenu_ret;



// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_6_3;//ステータス３ページ目

Menu_CLS Menu;
Menu_ADD 終了,,0;

RET p_表示文字,=,死亡した数 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_死亡数];
Menu_ADD @[p_表示文字];

RET p_表示文字,=,気絶絶頂数 ;
LET$ p_表示文字,=,@[p_表示文字],+,@[p_絶頂数];
Menu_ADD @[p_表示文字];

Loop_4_menu true;

GOTO L_FPSmenu_ret;





// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
//MSG4を使って表示するバージョン
CALL DF402/set.txt,L_PAR_PRINT;

MSG4_Ini ;//p_MSG4_max=10;
MSG4_Add ;
MSG4_SetPar1 ,50, 250,,999,16,1.2,,false,;
MSG4_SetPar2 1,B,0;
MSG4_Print @[p_表示文字];

MSG_Cls ;
//G_Print □□□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print パラメータ確認;
MSG_Print ;
//Loop_MSG true;

MSG4_Ini ;//p_MSG4_max=10;

GOTO L_FPSmenu_ret;





//-----------------------------------------------------------------------------+
//メニュー。セーブ
//-----------------------------------------------------------------------------+
* L_FPSmenu_2;

Menu_CLS Menu;
Menu_ADD 終了,,0;
Menu_ADD SAVE_1,,1;
Menu_ADD SAVE_2,,2;
Menu_ADD SAVE_3,,3;
Loop_4_menu true;

MSG_Cls ;
switch @,@RetMenu;
switch case,1;
	FPS FileName,./DF402/saveFPS_dt_001.txt;
	FPS Save;
switch case,2;
	FPS FileName,./DF402/saveFPS_dt_002.txt;
	FPS Save;
switch case,3;
	FPS FileName,./DF402/saveFPS_dt_003.txt;
	FPS Save;
switch end;

FPS FileName,./DF402/saveFPS_dt_Auto.txt;
FPS AutoSave,true;

GOTO L_FPSmenu_ret;




//-----------------------------------------------------------------------------+
//メニュー。ロード
//-----------------------------------------------------------------------------+
* L_FPSmenu_3;

Menu_CLS Menu;
Menu_ADD 終了,,0;
Menu_ADD LOAD_1,,1;
Menu_ADD LOAD_2,,2;
Menu_ADD LOAD_3,,3;
Menu_ADD 前回のｵｰﾄｾｰﾌﾞ,,101;
Loop_4_menu true;

MSG_Cls ;
switch @,@RetMenu;
switch case,1;
	FPS FileName,./DF402/saveFPS_dt_001.txt;
	FPS Load;//位置や現在のパラメータを再現
switch case,2;
	FPS FileName,./DF402/saveFPS_dt_002.txt;
	FPS Load;//位置や現在のパラメータを再現
switch case,3;
	FPS FileName,./DF402/saveFPS_dt_003.txt;
	FPS Load;//位置や現在のパラメータを再現
switch case,101;
	FPS Load;//位置や現在のパラメータを再現
switch end;

FPS FileName,./DF402/saveFPS_dt_Auto.txt;
FPS AutoSave,false;

GOTO L_FPSmenu_ret;





//-----------------------------------------------------------------------------+
//4メニュー。ポーズ。
//-----------------------------------------------------------------------------+
* L_FPSmenu_4;

Menu_CLS Menu;
Menu_ADD 終了,,0;
Menu_ADD POSE_1,,1;
Menu_ADD POSE_2,,2;
Menu_ADD POSE_3,,3;
Menu_ADD POSE_4,,4;
Menu_ADD 椅子に座る,,5;
Menu_ADD 椅子(地面)１,,6;
Menu_ADD 椅子(地面)２,,7;
Menu_ADD 日光浴1,,8;
Menu_ADD 日光浴2,,9;
Loop_4_menu true;

XFile4_ID 0,true;

Goto@ @RetMenu,0,L_FPSmenu_ret;
switch @,@RetMenu;
switch case,1;
	Motion_Load DF402/L_pose01.txt,false,,30;//
switch case,2;
	Motion_Load DF402/L_pose02.txt,false,,30;//
switch case,3;
	Motion_Load DF402/L_pose03.txt,false,,30;//
switch case,4;
	Motion_Load DF402/L_pose04.txt,false,,30;//
switch case,5;
	Motion_Load DF402/L_pose05.txt,false,,30;//
switch case,6;
	Motion_Load DF402/L_pose06.txt,false,,30;//
switch case,7;
	Motion_Load DF402/L_pose07.txt,false,,30;//
switch case,8;
	Motion_Load DF402/L_pose08.txt,false,,30;//
switch case,9;
	Motion_Load DF402/L_pose09.txt,false,,30;//
switch end;

FPS Set_CharCOM_Hit,0,歩行402_POSE;//ポーズ行動後に待機モーションで上書きしない為
GOTO L_FPSmenu_4;








//-----------------------------------------------------------------------------+
//5メニュー。合体。試験。
//-----------------------------------------------------------------------------+
* L_FPSmenu_5;
FPS_AI AI_control,false;//スクリプトＨ中はAI処理を一時止める

Menu_CLS Menu;
Menu_ADD 終了,,0;
//Menu_ADD SEX_1,,1;
Menu_ADD フェラ,,1;//判りやすい名称に
Loop_4_menu true;

Goto@ @RetMenu,0,L_FPSmenu_ret;

FPS Set_CharPoint,1,Char,0;//1男性を0主人公の位置に揃える

Goto@ @RetMenu,1,L_FPSmenu_5_1;

GOTO L_FPSmenu_5;


//M_stand01_man
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_FPSmenu_5_1;
XFile4_ID 0,true;
Motion_Load DF402/LM_fe01.txt,false,,30;//
XFile4_ID 6,true;
Motion_Load DF402/LM_fe01_man.txt,false,,30;//

GOTO L_FPSmenu_5;







//-----------------------------------------------------------------------------+
//負け。主人公HPゼロ
//-----------------------------------------------------------------------------+
* L_GAME結果_負HP;
CALL DF402/set_VOICE.txt,L_死亡;
//Load_FG_SiriteFile DF401/taiFPS_FG13end_die.png;
Load_FG_SiriteFile DF402/GAMEOVER_FG01.png;
//Set_FG_SiritePar 3,90,15,1,1,3;//エフェクト指定
Set_FG_SiritePar 3,90,15,1,1,-3;//エフェクト指定
//1:Type,処理タイプ
//2:TotalTime,表示時間
//3:InOutTime,入りと出の時間(合計で２倍)
//4:ListNo,分割数
//5:OffsetTime,分割時の遅延時間
//6:Move,移動量

FPS Set_DeffCom,1;//キャラを通常行動に戻す
//Loop_FPS 3;//FAILED  ←合体イベントが再判定されてしまうので除外


CALL DF402/set.txt,暗くなる;

EF Feed,ON;
MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print 死んでしまった・・・;
MSG_Print 肉体を捨てて新たな娘を求めて彷徨う;
Loop_MSG true;
EF Feed,OFF;

CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
switch rand,3;	MSG4_Print 新しい肉体を手に入れた;
switch case,2;	MSG4_Print この肉体にも\n大分馴染んだぞ;
switch case,3;	MSG4_Print 体が…勝手に…!?;
switch end;
CALL DF402/set.txt,ADD_死亡数;//死亡した回数
CALL DF402/set.txt,DIM_ini_NEW2;//変数初期化。死亡時の初期化。新たな肉体。
GOTO L_GAME結果_aft;



XFile4_ID 0,true;
Set_CharView 0,1;//表示するキャラのXFile4_ID,表示ﾀｲﾌﾟ
CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
MSG4_Print 死ぬぅ…;
Loop_4_ft 0,180,1.0;

GOTO L_GAME結果_aft;



//-----------------------------------------------------------------------------+
//負け。主人公精神ゼロ
//-----------------------------------------------------------------------------+
* L_GAME結果_負SeP;
CALL DF402/set_VOICE.txt,L_精神崩壊;
Load_FG_SiriteFile DF402/GAMEOVER_FG02.png;
Set_FG_SiritePar 3,90,15,1,1,-3;//エフェクト指定
FPS Set_DeffCom,1;//キャラを通常行動に戻す
//Loop_FPS 3;//FAILED  ←合体イベントが再判定されてしまうので除外

CALL DF402/set.txt,暗くなる;

RAND@ 0,3;// 0 1 //一定確率で拉致監禁ルートへ
//RAND@ 0,1;//デバック確実
RET p_A1,=,@RAND;
Select@ p_A1,GOTO,L_GAME結果_監禁;


EF Feed,ON;
MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print イかされて絶頂した私は気を失い警察に保護され;
MSG_Print 自宅に連れ戻された・・・;
Loop_MSG true;
EF Feed,OFF;

CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
MSG4_Print 補導されて自宅に戻された;
CALL DF402/set.txt,ADD_絶頂数;//精神崩壊した回数
CALL DF402/set.txt,DIM_ini_NEW3;//変数初期化。精神崩壊時の初期化。自宅に戻される
GOTO L_GAME結果_aft;



XFile4_ID 0,true;
Set_CharView 0,1;//表示するキャラのXFile4_ID,表示ﾀｲﾌﾟ
CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
MSG4_Print もう…駄目…;
Loop_4_ft 0,180,1.0;

GOTO L_GAME結果_aft;


// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
* L_GAME結果_aft;
MapBool ,,,false;//FG消去
XFile4_ID 0,true;
FPS_AI AI_control,true;//スクリプトＨ中はAI処理を一時止める
//Loop_4_ft 0,30,1.0;

FPS Set_CharRETURN,0;//生き返らせる
FPS Set_CharRETURN,1;//　男性側の行動もリセットさせたいため
CALL DF402/FPS_Action_map_set.txt,orMAP_DF402_MyHomeB_IN2;//(402自宅２階)自室　（移動じゃない　セーブ用）
GOTO L_戦闘LOOP;





//-----------------------------------------------------------------------------+
//負け。主人公精神ゼロ。一定確率で拉致監禁ルートへ
//-----------------------------------------------------------------------------+
* L_GAME結果_監禁;

EF Feed,ON;
MSG_Cls ;// □□□□□□□□□□□□□□□□□□□□□□□□□□□□□;
MSG_Print 大丈夫だよ・・・ボクが助けてあげるからね;
Loop_MSG true;
EF Feed,OFF;

CALL DF402/FPS_Action_set.txt,M敵台詞1;//M4台詞1;
MSG4_Print ・・・？\nここ…ドコ？;
CALL DF402/set.txt,ADD_絶頂数;//精神崩壊した回数
CALL DF402/set.txt,DIM_ini_NEW3;//変数初期化。精神崩壊時の初期化。自宅に戻される



MapBool ,,,false;//FG消去
XFile4_ID 0,true;
FPS_AI AI_control,true;//スクリプトＨ中はAI処理を一時止める

FPS Set_CharRETURN,0;//生き返らせる
FPS Set_CharRETURN,1;//　男性側の行動もリセットさせたいため
CALL DF402/FPS_Action_map_set.txt,orMAP_DF402_PRISON_IN2;//(監禁部屋)拉致された場合
GOTO L_戦闘LOOP;

