//ポーズエディタ試作
LoadingMSG DF37_tikan_load03.png;
INI seen;

CALL DF37_map_set.txt,DF37-POSE_EDIT_2;

Music STOP;
Music LOAD,h-koko.mid;
Music PLAY,true;
SetViewLimit ALL;

Loop_4_Work ;//表示しない内部処理

IconDELL ;



//▼ｾﾚｸﾀﾌﾞﾙﾛｰﾄﾞ
//●0:体
CALL DF37_char_set.txt,SET_BODY-CS;//SET_CPFT-02_1-BODY2;
//●1:顔・表情を切り替える為！
CALL DF37_char_set.txt,SET_CPFT-02_1-FACE01;
//●2:メガネ
CALL DF37_char_set.txt,SET_MEGA-CS;//●2:メガネ
//●3:髪の毛
CALL DF37_char_set.txt,SET_HAIR-CS;//●5:髪の毛
//●4:男
CALL DF37_char_set.txt,SET_CPFT-M3_2スーツ;
//CALL DF37_char_set.txt,SET_CPFT-M3_2スーツ露出;
//CALL DF37_char_set.txt,SET_CPFT-M3_2裸;
//●5:服
CALL DF37_char_set.txt,SET_Layer4_CS;
//CALL DF37_char_set.txt,SET_CPFT-01_1cHUKU2制服;
//●6:下着・水着
CALL DF37_char_set.txt,SET_SHORTS-CS;//●3:下着・水着

//●7:追加アイテム・ザコリーマン等
CALL DF37_char_set.txt,SET_Layer7_CS;
//CALL DF37_char_set.txt,SET_CPFT-M4_1-ABザコリーマン;
//CALL DF37_char_set.txt,SET_CPFT_It01_触手;
//CALL DF37_char_set.txt,SET_CPFT_It02_鎖;
//CALL DF37_char_set.txt,SET_CPFT_It03_ロープ;


XFile4_ID 0,true;
//エディット時のポーズ制限
XFile4_Bone_EditPoseLimit bone_EDIT_Limit_CPFT-02-mat.txt;
IconADD ;

Menu_INI ;//メニューの設定をクリアする
Menu_SetType 0,110,20,12;
Menu_SetPos 5,15;
4HS_Menu_SetType 3,100,20,12;//クリックポイント用


//Set_View 1.901,0.139,-1.570,-0.7504,0.0222,0.6605,0.006,0.999,-0.026,1.456;
//Mov_View 1.879,1.068,-1.668,-0.6828,-0.3391,0.6470,-0.314,0.935,0.158,0.256;
//Motion_Load DF37_EX3_03_B01ポーズ1.txt,true,,;
//Motion_Load user_pose\EDIT_Motion_deff00.txt,true,,;

Set_View -0.004,0.912,-3.279,-0.0078,-0.0226,0.9997,-0.000,0.999,0.022,0.255;
Motion_Load EDIT_Motion_deff00.txt,true,,;


* ポーズビュー;
Menu_CLS ;
Menu_Titol メニュー;
Menu_ADD 終了する;
Menu_ADD MAP選択;
Menu_ADD 顔選択;
Menu_ADD 着衣選択;
Menu_ADD 男選択;
Menu_ADD アイテム選択;
Menu_ADD 共通動作;
Menu_ADD ポーズ編集;
Menu_ADD ポーズ読込;
Menu_ADD ポーズ保存;
//Menu_ADD ポーズ１;
//Menu_ADD ポーズ２;
//Menu_ADD ポーズ３;
//Menu_ADD ポーズ４;
//Menu_ADD ポーズ５;
//Menu_ADD ポーズ６;
Loop_4_menu true;
Goto@ @RetMenu,0,RET;
Gosub@ @RetMenu,1,MAP変更;
Gosub@ @RetMenu,2,顔変更;
Gosub@ @RetMenu,3,着衣変更;
Gosub@ @RetMenu,4,男変更;
Gosub@ @RetMenu,5,アイテム;
Gosub@ @RetMenu,6,共通動作１;
Gosub@ @RetMenu,7,PoseEdit;
Gosub@ @RetMenu,8,PoseLoad;
Gosub@ @RetMenu,9,PoseSave;
//Gosub@ @RetMenu,7,POSE1;
//Gosub@ @RetMenu,8,POSE2;
//Gosub@ @RetMenu,9,POSE3;
//Gosub@ @RetMenu,10,POSE4;
//Gosub@ @RetMenu,11,POSE5;
//Gosub@ @RetMenu,12,POSE6;
GOTO ポーズビュー;

* RET;
RETURN ;

* PoseEdit;
Loop_4_EditPose ;
RETURN ;

* 顔変更;
CALL DF37_EX_03共通.txt,顔変更;
RETURN ;

* 着衣変更;
CALL DF37_EX_03共通.txt,着衣変更;
RETURN ;

* アイテム;
Menu_CLS ;
Menu_Titol アイテム選択;
Menu_ADD 戻る;
Menu_ADD 無し;
Menu_ADD 触手;
Menu_ADD 鎖;
Menu_ADD ロープ;
Menu_ADD 武器-剣;
Menu_ADD 武器-ボード;
Menu_ADD 武器-クロー;
Loop_4_menu true;
Goto@ @RetMenu,0,RET;
Gosub@ @RetMenu,1,ITEM無し;
Gosub@ @RetMenu,2,ITEM触手;
Gosub@ @RetMenu,3,ITEM鎖;
Gosub@ @RetMenu,4,ITEMロープ;
Gosub@ @RetMenu,5,ITEM武器-剣;
Gosub@ @RetMenu,6,ITEM武器-ボード;
Gosub@ @RetMenu,7,ITEM武器-クロー;
XFile4_ID 0,true;
GOTO アイテム;

* ITEM無し;
CALL DF37_char_set.txt,SET_CPFT_It00_NULL;
RETURN ;

* ITEM触手;
CALL DF37_char_set.txt,SET_CPFT_It01_触手;
RETURN ;

* ITEM鎖;
CALL DF37_char_set.txt,SET_CPFT_It02_鎖;
RETURN ;

* ITEMロープ;
CALL DF37_char_set.txt,SET_CPFT_It03_ロープ;
RETURN ;

* ITEM武器-剣;
CALL DF37_char_set.txt,SET_CPFT_It04_A_武器_剣;
RETURN ;

* ITEM武器-ボード;
CALL DF37_char_set.txt,SET_CPFT_It04_B_武器_ボード;
RETURN ;

* ITEM武器-クロー;
CALL DF37_char_set.txt,SET_CPFT_It05_武器_クロー;
RETURN ;



* MAP変更;
Menu_CLS ;
Menu_Titol MAP選択;
Menu_ADD 戻る;
Menu_ADD 風呂;
Menu_ADD 洋室１;
Menu_ADD ビーチ;
Menu_ADD 公園;
Menu_ADD 和室;
Menu_ADD 教室;
Menu_ADD 体育倉庫;
Menu_ADD プール;
Menu_ADD 洋室２;
Menu_ADD バーガーショップ;
Menu_ADD 洋室３;
Menu_ADD 地下入口;
Menu_ADD 階段出口;
Menu_ADD 地下通路;
Menu_ADD ホームA3;
Menu_ADD ホームA1;
Menu_ADD ホームA1電車;
Menu_ADD 駅改札付近r;
Menu_ADD 駅改札付近r_群集なし;
Menu_ADD トイレ個室;
Menu_ADD トイレ個室2;
Menu_ADD 車内-全体Lo;
Menu_ADD 女子トイレA1;
Menu_ADD 女子トイレC1;
Menu_ADD フィギュアベース;
Menu_ADD フィギュアベース小;
Loop_4_menu true;
Goto@ @RetMenu,0,RET;
Gosub@ @RetMenu,1,EX1-風呂;
Gosub@ @RetMenu,2,EX2-洋室１;
Gosub@ @RetMenu,3,EX3-ビーチ;
Gosub@ @RetMenu,4,EX4-公園;
Gosub@ @RetMenu,5,EX5-和室;
Gosub@ @RetMenu,6,EX6-教室;
Gosub@ @RetMenu,7,EX7-体育倉庫;
Gosub@ @RetMenu,8,EX8-プール;
Gosub@ @RetMenu,9,EX9-洋室２;
Gosub@ @RetMenu,10,EX10-バーガーショップ;
Gosub@ @RetMenu,11,EX11-洋室３;
Gosub@ @RetMenu,12,地下入口;
Gosub@ @RetMenu,13,階段出口;
Gosub@ @RetMenu,14,地下通路;
Gosub@ @RetMenu,15,ホームA3;
Gosub@ @RetMenu,16,ホームA1;
Gosub@ @RetMenu,17,ホームA1電車;
Gosub@ @RetMenu,18,駅改札付近r;
Gosub@ @RetMenu,19,駅改札付近r_群集なし;
Gosub@ @RetMenu,20,トイレ個室;
Gosub@ @RetMenu,21,トイレ個室2;
Gosub@ @RetMenu,22,車内-全体Lo;
Gosub@ @RetMenu,23,女子トイレA1;
Gosub@ @RetMenu,24,女子トイレC1;
Gosub@ @RetMenu,25,POSE_EDIT;
Gosub@ @RetMenu,26,POSE_EDIT_2;
GOTO MAP変更;

* POSE_EDIT;
CALL DF37_map_set.txt,DF37-POSE_EDIT;
RETURN ;
* POSE_EDIT_2;
CALL DF37_map_set.txt,DF37-POSE_EDIT_2;
RETURN ;
* 地下入口;
CALL DF37_map_set.txt,DF37-地下入口;
RETURN ;
* 階段出口;
CALL DF37_map_set.txt,DF37-階段出口;
RETURN ;
* 地下通路;
CALL DF37_map_set.txt,DF37-地下通路;
RETURN ;
* ホームA3;
CALL DF37_map_set.txt,DF37-ホームA3;
RETURN ;
* ホームA1;
CALL DF37_map_set.txt,DF37-ホームA1;
RETURN ;
* ホームA1電車;
CALL DF37_map_set.txt,DF37-ホームA1電車;
RETURN ;
* 駅改札付近r;
CALL DF37_map_set.txt,DF37-駅改札付近r;
RETURN ;
* 駅改札付近r_群集なし;
CALL DF37_map_set.txt,DF37-駅改札付近r_群集なし;
RETURN ;
* トイレ個室;
CALL DF37_map_set.txt,DF37-トイレ個室;
RETURN ;
* トイレ個室2;
CALL DF37_map_set.txt,DF37-トイレ個室2;
RETURN ;
* 車内-全体Lo;
CALL DF37_map_set.txt,DF37-車内-全体Lo;
RETURN ;
* 女子トイレA1;
CALL DF37_map_set.txt,DF37-女子トイレA1;
RETURN ;
* 女子トイレC1;
CALL DF37_map_set.txt,DF37-女子トイレC1;
RETURN ;

* EX1-風呂;
CALL DF37_map_set.txt,DF37-EX1-風呂;
RETURN ;
* EX2-洋室１;
CALL DF37_map_set.txt,DF37-EX2-洋室１;
RETURN ;
* EX3-ビーチ;
CALL DF37_map_set.txt,DF37-EX3-ビーチ;
RETURN ;
* EX4-公園;
CALL DF37_map_set.txt,DF37-EX4-公園;
RETURN ;
* EX5-和室;
CALL DF37_map_set.txt,DF37-EX5-和室;
RETURN ;
* EX6-教室;
CALL DF37_map_set.txt,DF37-EX6-教室;
RETURN ;
* EX7-体育倉庫;
CALL DF37_map_set.txt,DF37-EX7-体育倉庫;
RETURN ;
* EX8-プール;
CALL DF37_map_set.txt,DF37-EX8-プール;
RETURN ;
* EX9-洋室２;
CALL DF37_map_set.txt,DF37-EX9-洋室２;
RETURN ;
* EX10-バーガーショップ;
CALL DF37_map_set.txt,DF37-EX10-バーガーショップ;
RETURN ;
* EX11-洋室３;
CALL DF37_map_set.txt,DF37-EX11-洋室３;
RETURN ;



//------------------------------------------------------------------------------
* 男変更;
MSG_Cls ;
MSG_Print 追加カスタムで男を変更している場合は、;
MSG_Print 裸やスーツを選択しても;
MSG_Print 追加カスタムのモデルが表示されます;

Menu_CLS ;
Menu_Titol 男選択;
Menu_ADD 戻る;
Menu_ADD 無し;
Menu_ADD 男-裸;
Menu_ADD 男-半裸;
Menu_ADD 男-スーツ;
Loop_4_menu true;
Goto@ @RetMenu,0,男変更-RET;
Gosub@ @RetMenu,1,男変更-無し;
Gosub@ @RetMenu,2,男変更-裸;
Gosub@ @RetMenu,3,男変更-半裸;
Gosub@ @RetMenu,4,男変更-スーツ;
XFile4_ID 0,true;
Menu_CLS ;
MSG_Cls ;
GOTO 男変更;

* 男変更-RET;
XFile4_ID 0,true;
MSG_Cls ;
RETURN ;

* 男変更-無し;
XFile4_ID 6,false;
RETURN ;

* 男変更-裸;
CALL DF37_char_set.txt,SET_CPFT-M3_2裸;
RETURN ;

* 男変更-半裸;
CALL DF37_char_set.txt,SET_CPFT-M3_2スーツ露出;
RETURN ;

* 男変更-スーツ;
CALL DF37_char_set.txt,SET_CPFT-M3_2スーツ;
RETURN ;



//------------------------------------------------------------------------------
//ファイル名を指定してモーションを読込
* PoseLoad;
Load_FG_SiriteFile DF37_MOTION_FG02.png;
Set_FG_SiritePar 4,600,30,1,1,400;//エフェクト指定
Loop_4_ft 0,30,1.0;
Set_FG_SiritePar 0;//常に表示

EditPose_DATA_Load ;

Set_FG_SiritePar 4,600,30,1,1,-400;//エフェクト指定
Set_FG_SiritePar after;
Loop_4_ft 0,30,1.0;
Set_FG_SiritePar -1;//常に非表示
RETURN ;


//ファイル名を指定してモーションを保存
* PoseSave;
Load_FG_SiriteFile DF37_MOTION_FG01.png;
Set_FG_SiritePar 4,600,30,1,1,400;//エフェクト指定
Loop_4_ft 0,30,1.0;
Set_FG_SiritePar 0;//常に表示

EditPose_DATA_Save ;

Set_FG_SiritePar 4,600,30,1,1,-400;//エフェクト指定
Set_FG_SiritePar after;
Loop_4_ft 0,30,1.0;
Set_FG_SiritePar -1;//常に非表示
RETURN ;


//------------------------------------------------------------------------------
* 共通動作１;
CALL DF37_EX_03共通.txt,共通動作１;
RETURN ;

* POSE1;
Motion_Load EDIT_Motion_deff1.txt,true,,;
RETURN ;

* POSE2;
Motion_Load EDIT_Motion_deff2.txt,true,,;
RETURN ;

* POSE3;
Motion_Load EDIT_Motion_deff3.txt,true,,;
RETURN ;

* POSE4;
Motion_Load EDIT_Motion_deff4.txt,true,,;
Motion_SetSpeed 0.2;
Motion_KeyType 0;
RETURN ;

* POSE5;
Motion_Load EDIT_Motion_deff5.txt,true,,;
RETURN ;

//アイテムが有る場合のモーションテスト
* POSE6;
Motion_Load EDIT_Motion_deff6.txt,true,,;
RETURN ;

Motion_Load EDIT_Motion.txt,true,,;
Motion_Save EDIT_Motion.txt,true,,;

Motion_Load DF37_EX9_It01_01_C02ピストン1b.txt,true,,;
Motion_SetSpeed 1.0;
Motion_KeyType 2;
RETURN ;
