diff -r -c Hengband/lib/pref/pref-opt.prf Hengband.tennen/lib/pref/pref-opt.prf
*** Hengband/lib/pref/pref-opt.prf	2003-12-17 04:41:47.000000000 +0900
--- Hengband.tennen/lib/pref/pref-opt.prf	2004-10-10 11:04:42.000000000 +0900
***************
*** 76,82 ****
  Y:empty_levels
  X:bound_walls_perm
  Y:last_words
! Y:send_score
  X:allow_debug_opts
  
  ##### Disturbance #####
--- 76,82 ----
  Y:empty_levels
  X:bound_walls_perm
  Y:last_words
! #Y:send_score
  X:allow_debug_opts
  
  ##### Disturbance #####
diff -r -c Hengband/src/birth.c Hengband.tennen/src/birth.c
*** Hengband/src/birth.c	2004-08-11 23:49:28.000000000 +0900
--- Hengband.tennen/src/birth.c	2004-10-10 21:13:33.000000000 +0900
***************
*** 1909,1914 ****
--- 1909,1927 ----
  
  "いかさまは、初心者の練習用の性格です。あらゆる能力が高くなっています。この性格を使えば勝利者になることは容易ですが、勝利しても全く自慢になりません。",
  
+ "てんねんは、若干ずれた感覚の持ち主で、場の雰囲気を読めません。決して精神を侵されることはありませんが、ちょっと賢いとは言えません。この性格は女性しか選ぶことができません。",
+ 
+ /* 性格:天然の仕様
+ ・腕力+0 知力+0 賢さ-2 器用-1 耐久+0 魅力+1
+ ・解除-5 魔道+5 魔防+4 隠密+1 探索-2 知覚+8 打撃-3 射撃-3 HD+0
+ ・女性専用
+ ・白いオーラを持っている
+ ・脳の生体コンピュータ化、精神薄弱、精神錯乱、躁鬱質にならない。
+ ・階の雰囲気を感じる事ができない
+ ・簡易鑑定を時々間違える(1/13)
+ ・精神攻撃と脳攻撃を受け付けない (shimitei さんご指摘ありがとう)
+ */
+ 
  #else
  
  "\"Ordinary\" is a personality with no special skills or talents, with unmodified stats and skills.",
***************
*** 1934,1940 ****
  
  "A \"Patient\" person does things carefully.  Patient people have high constitution, and high resilience, but poor abilities in most other skills.  Also it directly influences your hit-points.",
  
! "\"munchkin\" is a personality for beginners.  It raises all your stats and skills.  With this personality, you can win the game easily, but gain little honor in doing so."
  #endif
  };
  
--- 1947,1956 ----
  
  "A \"Patient\" person does things carefully.  Patient people have high constitution, and high resilience, but poor abilities in most other skills.  Also it directly influences your hit-points.",
  
! "\"munchkin\" is a personality for beginners.  It raises all your stats and skills.  With this personality, you can win the game easily, but gain little honor in doing so.",
! 
! "\"Tennen\" is very characteristic and people cannot understand her mind. Her mind is never polluted, but she is not wise. Only females can choose this personality.",
! 
  #endif
  };
  
diff -r -c Hengband/src/bldg.c Hengband.tennen/src/bldg.c
*** Hengband/src/bldg.c	2004-07-26 02:11:30.000000000 +0900
--- Hengband.tennen/src/bldg.c	2004-10-10 12:32:34.000000000 +0900
***************
*** 4778,4784 ****
  	case BACT_LOSE_MUTATION:
  		if (p_ptr->muta1 || p_ptr->muta2 ||
  		    (p_ptr->muta3 & ~MUT3_GOOD_LUCK) ||
! 		    (p_ptr->pseikaku != SEIKAKU_LUCKY &&
  		     (p_ptr->muta3 & MUT3_GOOD_LUCK)))
  		{
  			while(!lose_mutation(0));
--- 4778,4784 ----
  	case BACT_LOSE_MUTATION:
  		if (p_ptr->muta1 || p_ptr->muta2 ||
  		    (p_ptr->muta3 & ~MUT3_GOOD_LUCK) ||
! 		    ((p_ptr->pseikaku != SEIKAKU_LUCKY || p_ptr->pseikaku != SEIKAKU_TENNEN)&&
  		     (p_ptr->muta3 & MUT3_GOOD_LUCK)))
  		{
  			while(!lose_mutation(0));
diff -r -c Hengband/src/defines.h Hengband.tennen/src/defines.h
*** Hengband/src/defines.h	2004-08-07 12:03:58.000000000 +0900
--- Hengband.tennen/src/defines.h	2004-10-10 11:11:35.000000000 +0900
***************
*** 197,203 ****
   */
  #define MAX_CLASS            27
  
! #define MAX_SEIKAKU          12
  
  /* The number of "patrons" available (for Chaos Warriors) */
  #define MAX_PATRON          16
--- 197,203 ----
   */
  #define MAX_CLASS            27
  
! #define MAX_SEIKAKU          13
  
  /* The number of "patrons" available (for Chaos Warriors) */
  #define MAX_PATRON          16
***************
*** 917,922 ****
--- 917,923 ----
  #define SEIKAKU_LUCKY	 9
  #define SEIKAKU_GAMAN	 10
  #define SEIKAKU_MUNCHKIN 11
+ #define SEIKAKU_TENNEN 12
  
  /*** Screen Locations ***/
  
diff -r -c Hengband/src/dungeon.c Hengband.tennen/src/dungeon.c
*** Hengband/src/dungeon.c	2004-08-11 22:56:05.000000000 +0900
--- Hengband.tennen/src/dungeon.c	2004-10-10 12:05:01.000000000 +0900
***************
*** 109,116 ****
  	/* Skip non-feelings */
  	if (!feel) return;
  
! 	/* Bad luck */
! 	if ((p_ptr->muta3 & MUT3_BAD_LUCK) && !randint0(13))
  	{
  		switch (feel)
  		{
--- 109,116 ----
  	/* Skip non-feelings */
  	if (!feel) return;
  
! 	/* Bad luck and Tennen*/
! 	if (((p_ptr->muta3 & MUT3_BAD_LUCK) || (p_ptr->pseikaku == SEIKAKU_TENNEN)) && !randint0(13))
  	{
  		switch (feel)
  		{
***************
*** 3617,3622 ****
--- 3617,3625 ----
  	/* No feeling in the arena */
  	if (p_ptr->inside_battle) return;
  
+ 	/* Tennen girl cannot fell a mood */
+ 	if (p_ptr->pseikaku == SEIKAKU_TENNEN) return;
+ 
  	/* Extract delay time */
  	delay = MAX(10, 150 - p_ptr->skill_fos) * (150 - dun_level) * TURNS_PER_TICK / 100;
  
diff -r -c Hengband/src/mspells1.c Hengband.tennen/src/mspells1.c
*** Hengband/src/mspells1.c	2004-07-29 17:31:30.000000000 +0900
--- Hengband.tennen/src/mspells1.c	2004-10-10 21:06:37.000000000 +0900
***************
*** 2588,2594 ****
  
  			}
  
! 			dam = damroll(7, 7);
  			breath(y, x, m_idx, GF_MIND_BLAST, dam, 0, FALSE, MS_MIND_BLAST, learnable);
  			break;
  		}
--- 2588,2606 ----
  
  			}
  
! 			if (p_ptr->pseikaku == SEIKAKU_TENNEN)
! 				{
! #ifdef JP
! 					msg_format("しかし、よく理解できなかった!");
! #else
! 					msg_format("But you don't understand it");
! #endif
! 					dam = 0;
! 				}
! 			else
! 				{
! 					dam = damroll(7, 7);
! 				}
  			breath(y, x, m_idx, GF_MIND_BLAST, dam, 0, FALSE, MS_MIND_BLAST, learnable);
  			break;
  		}
***************
*** 2617,2623 ****
  
  			}
  
! 			dam = damroll(12, 12);
  			breath(y, x, m_idx, GF_BRAIN_SMASH, dam, 0, FALSE, MS_BRAIN_SMASH, learnable);
  			break;
  		}
--- 2629,2647 ----
  
  			}
  
! 			if (p_ptr->pseikaku == SEIKAKU_TENNEN)
! 				{
! #ifdef JP
! 					msg_format("しかし、よく理解できなかった!");
! #else
! 					msg_format("But you don't understand it");
! #endif
! 					dam = 0;
! 				}
! 			else
! 				{
! 					dam = damroll(12, 12);
! 				}
  			breath(y, x, m_idx, GF_BRAIN_SMASH, dam, 0, FALSE, MS_BRAIN_SMASH, learnable);
  			break;
  		}
diff -r -c Hengband/src/mutation.c Hengband.tennen/src/mutation.c
*** Hengband/src/mutation.c	2004-07-31 01:54:53.000000000 +0900
--- Hengband.tennen/src/mutation.c	2004-10-10 11:44:25.000000000 +0900
***************
*** 388,393 ****
--- 388,394 ----
  
  			break;
  		case 79:
+ 			if (p_ptr->pseikaku == SEIKAKU_TENNEN) break;
  			muta_class = &(p_ptr->muta2);
  			muta_which = MUT2_HALLU;
  #ifdef JP
***************
*** 458,463 ****
--- 459,465 ----
  
  			break;
  		case 90: case 91:
+ 			if (p_ptr->pseikaku == SEIKAKU_TENNEN) break;
  			muta_class = &(p_ptr->muta2);
  			muta_which = MUT2_SPEED_FLUX;
  #ifdef JP
***************
*** 692,697 ****
--- 694,700 ----
  
  			break;
  		case 126: case 127: case 128:
+ 			if (p_ptr->pseikaku == SEIKAKU_TENNEN) break;
  			muta_class = &(p_ptr->muta3);
  			muta_which = MUT3_HYPER_INT;
  #ifdef JP
***************
*** 702,707 ****
--- 705,711 ----
  
  			break;
  		case 129: case 130: case 131:
+ 			if (p_ptr->pseikaku == SEIKAKU_TENNEN) break;
  			muta_class = &(p_ptr->muta3);
  			muta_which = MUT3_MORONIC;
  #ifdef JP
***************
*** 952,958 ****
  
  			break;
  		case 188:
! 			if (p_ptr->pseikaku == SEIKAKU_LUCKY) break;
  			muta_class = &(p_ptr->muta3);
  			muta_which = MUT3_BAD_LUCK;
  #ifdef JP
--- 956,962 ----
  
  			break;
  		case 188:
! 			if (p_ptr->pseikaku == SEIKAKU_LUCKY || p_ptr->pseikaku == SEIKAKU_TENNEN) break;
  			muta_class = &(p_ptr->muta3);
  			muta_which = MUT3_BAD_LUCK;
  #ifdef JP
***************
*** 2289,2295 ****
  
  			break;
  		case 193:
! 			if (p_ptr->pseikaku == SEIKAKU_LUCKY) break;
  			muta_class = &(p_ptr->muta3);
  			muta_which = MUT3_GOOD_LUCK;
  #ifdef JP
--- 2293,2299 ----
  
  			break;
  		case 193:
! 			if (p_ptr->pseikaku == SEIKAKU_LUCKY || p_ptr->pseikaku == SEIKAKU_TENNEN) break;
  			muta_class = &(p_ptr->muta3);
  			muta_which = MUT3_GOOD_LUCK;
  #ifdef JP
***************
*** 3280,3286 ****
  	 * only 5% decrease per additional mutation
  	 */
  
! 	if (p_ptr->pseikaku == SEIKAKU_LUCKY) count--;
  	if (p_ptr->prace == RACE_BEASTMAN)
  	{
  		count -= 10;
--- 3284,3290 ----
  	 * only 5% decrease per additional mutation
  	 */
  
! 	if (p_ptr->pseikaku == SEIKAKU_LUCKY || p_ptr->pseikaku == SEIKAKU_TENNEN) count--;
  	if (p_ptr->prace == RACE_BEASTMAN)
  	{
  		count -= 10;
diff -r -c Hengband/src/tables.c Hengband.tennen/src/tables.c
*** Hengband/src/tables.c	2004-07-04 16:13:05.000000000 +0900
--- Hengband.tennen/src/tables.c	2004-10-10 11:59:17.000000000 +0900
***************
*** 3837,3842 ****
--- 3837,3852 ----
  		 20, 40, 30, 10, 40, 40,  80, 80,
  		 15, 1, 0
  	},
+ 
+ 	{
+ #ifdef JP
+ 		"てんねん/テスト",
+ #endif
+ 		"Tennen",
+ 		{ 0, 0, -2, -1, 0, 1},
+ 		 -5, -5, 4, 1, -2, 8, -3, -3,
+ 		 0, 1, 1
+ 	},
  };
  
  
diff -r -c Hengband/src/xtra1.c Hengband.tennen/src/xtra1.c
*** Hengband/src/xtra1.c	2004-07-11 20:53:22.000000000 +0900
--- Hengband.tennen/src/xtra1.c	2004-10-10 11:36:27.000000000 +0900
***************
*** 1,4 ****
- 
  /* File: misc.c */
  
  /*
--- 1,3 ----
***************
*** 3625,3631 ****
  	if ((p_ptr->pseikaku == SEIKAKU_GAMAN) || (p_ptr->pseikaku == SEIKAKU_CHIKARA)) p_ptr->to_m_chance++;
  
  	/* Lucky man */
! 	if (p_ptr->pseikaku == SEIKAKU_LUCKY) p_ptr->muta3 |= MUT3_GOOD_LUCK;
  
  	if (p_ptr->pseikaku == SEIKAKU_MUNCHKIN)
  	{
--- 3624,3630 ----
  	if ((p_ptr->pseikaku == SEIKAKU_GAMAN) || (p_ptr->pseikaku == SEIKAKU_CHIKARA)) p_ptr->to_m_chance++;
  
  	/* Lucky man */
! 	if (p_ptr->pseikaku == SEIKAKU_LUCKY || p_ptr->pseikaku == SEIKAKU_TENNEN) p_ptr->muta3 |= MUT3_GOOD_LUCK;
  
  	if (p_ptr->pseikaku == SEIKAKU_MUNCHKIN)
  	{
diff -r -c Hengband/src/z-config.h Hengband.tennen/src/z-config.h
*** Hengband/src/z-config.h	2004-07-21 22:51:17.000000000 +0900
--- Hengband.tennen/src/z-config.h	2004-10-10 11:02:49.000000000 +0900
***************
*** 603,606 ****
--- 603,608 ----
  #define WORLD_SCORE
  #endif
  
+ #undef WORLD_SCORE
+ 
  #endif /* HAVE_CONFIG_H */