worlds/haxima-1.002/tutorial_wilderness.scm

   1
   2
   3 (kern-mk-place
   4  'p_tutorial_wilderness
   5  "¥Á¥å¡¼¥È¥ê¥¢¥ë¤Î¹ÓÌî"
   6  nil          ; sprite
   7  (kern-mk-map
   8   nil 19 19 pal_expanded
   9   (list
  10       "__ __ __ __ __ __ __ __ __ __ __ __ __ __ __ __ ^^ ^^ ^^ "
  11       "__ __ __ .. .. .. .. .. .. .. .. .. .. .. __ __ ^^ .. ^^ "
  12       "__ __ .. .. .. .. .. .. .. .. .. .. .. .. __ __ __ ee __ "
  13       "__ .. .. .. .. .. .. .. .. .. .. .. .. .. __ __ __ __ __ "
  14       "__ .. .. .. .. .. .. .. .. .. .. .. .. .. __ __ __ __ __ "
  15       "__ .. .. .. .. .. .. .. .. .. .. .. .. .. ee __ __ __ __ "
  16       "__ .. .. .. .. .. .. .. .. .. .. .. .. .. __ __ __ __ __ "
  17       "__ .. .. .. .. .. .. .. .. .. .. .. .. .. __ __ __ __ __ "
  18       "__ .. .. .. .. .. .. .. ^^ ^^ ^^ .. .. .. __ __ __ __ __ "
  19       "__ .. .. .. .. .. .. .. ^^ .. ^^ .. .. .. __ __ __ __ __ "
  20       "__ .. .. .. .. .. .. .. ^^ .. ^^ .. .. .. __ __ __ __ __ "
  21       "__ .. .. .. .. .. .. .. .. .. .. .. .. .. __ __ __ __ __ "
  22       "__ .. .. .. .. .. .. .. .. .. .. .. .. .. __ __ __ __ __ "
  23       "__ .. .. .. .. .. .. .. .. .. .. .. .. .. __ .. .. .. __ "
  24       "__ .. .. .. .. .. .. .. ^^ .. ^^ .. .. .. __ .. .. .. __ "
  25       "__ .. .. .. .. .. .. ^^ ^^ .. ^^ ^^ .. .. __ .. .. .. __ "
  26       "__ __ .. .. .. .. .. .. ^^ ^^ ^^ .. .. .. __ __ .. __ __ "
  27       "__ __ __ .. .. .. .. .. .. .. .. .. .. .. __ __ __ __ __ "
  28       "__ __ __ __ __ __ __ __ __ __ __ __ __ __ __ __ __ __ __ "
  29   )  )
  30  #f  ;; wraps
  31  #f  ;; underground
  32  #t  ;; wilderness
  33  #f  ;; tmp combat place
  34
  35  ;; subplaces:
  36  (list
  37   (list p_tutorial_town 9 9)
  38   )
  39
  40  nil ; neighborss
  41
  42  ;; objects:
  43  (list
  44
  45   (put (mk-step-clue "Æî¤Ë¤¤¤ëÅðÂ±¤ÈÀï¤¤¤Þ¤·¤ç¤¦¡£"
  46                      "ÀïÆ®¤ÏÊÌ¤ÎÃÏ¿Þ¾å¤Ç¹Ô¤ï¤ì¤Þ¤¹¡£"
  47                      "Àï¤¤¤Ï¡¢'<'¤ò²¡¤¹¤«¡¢Ã¼¤Þ¤Ç°ÜÆ°¤¹¤ë¤È½ªÎ»¤·¤Þ¤¹¡£")
  48        9 10)
  49   (put (mk-npc-party 'bandit-party-l1) 9 13)
  50   (put (mk-step-clue "¹ÓÌî¤Ç¤Ï¥¥ã¥ó¥×¤ÇÂÎÎÏ¤ò²óÉü¤¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£¤³¤³¤Ç»î¤·¤Æ¤ß¤Þ¤·¤ç¤¦¡£('k'¥³¥Þ¥ó¥É)") 9 13)
  51
  52   (put (mk-step-clue "²¼¤ÎÆ¶·¢¤Ë¤Ï½Å¤Ê¤ë¤ÈÆþ¤ì¤Þ¤¹¡£")
  53        9 14)
  54   (put (mk-dungeon 'p_tutorial_cave 7 17) 9 15)
  55
  56   (put (mk-step-clue "Á¥¤Î¾å¤Ë°ÜÆ°¤·¤Æ'b'¤ò²¡¤¹¤È¾è¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£"
  57                      "ËÌÅì¤ÎÃ¼¤Þ¤ÇÌð°õ¥¡¼¤Ç°ÜÆ°¤·¾åÎ¦¤·¤Þ¤·¤ç¤¦¡£") 14 5)
  58   (put (mk-step-clue "'f'¥¡¼¤ÈÌð°õ¥¡¼¤ò²¡¤·¤ÆÅç¤Ë¤¤¤ëÅðÂ±¤òË¤·â¤·¤Þ¤·¤ç¤¦¡£"
  59                      "Á¥¤ÏÂ¦ÌÌ¤ÎÊý¸þ¤Î¤ßË¤·â¤Ç¤¤Þ¤¹¡£¤è¤Ã¤Æ¾¯¤·¹Í¤¨¤ÆÁàºî¤·¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£")
  60        15 4)
  61   (put (mk-step-clue "'f'¥¡¼¤ÈÌð°õ¥¡¼¤ò²¡¤·¤ÆÅç¤Ë¤¤¤ëÅðÂ±¤òË¤·â¤·¤Þ¤·¤ç¤¦¡£"
  62                      "Á¥¤ÏÂ¦ÌÌ¤ÎÊý¸þ¤Î¤ßË¤·â¤Ç¤¤Þ¤¹¡£¤è¤Ã¤Æ¾¯¤·¹Í¤¨¤ÆÁàºî¤·¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£")
  63        15 6)
  64   (put (mk-step-clue "'f'¥¡¼¤ÈÌð°õ¥¡¼¤ò²¡¤·¤ÆÅç¤Ë¤¤¤ëÅðÂ±¤òË¤·â¤·¤Þ¤·¤ç¤¦¡£"
  65                      "Á¥¤ÏÂ¦ÌÌ¤ÎÊý¸þ¤Î¤ßË¤·â¤Ç¤¤Þ¤¹¡£¤è¤Ã¤Æ¾¯¤·¹Í¤¨¤ÆÁàºî¤·¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£")
  66        16 5)
  67
  68   (put (mk-ship) 15 5)
  69   (put (mk-npc-party 'bandit-party-l1) 16 14)
  70
  71   (put (mk-step-clue "¤³¤ì¤Ç¥Á¥å¡¼¥È¥ê¥¢¥ë¤Ï½ª¤ï¤ê¤Ç¤¹¡£ÀâÌÀ½ñ¤Ë¤Ï¤â¤Ã¤ÈÂ¿¤¯¤Î¾ðÊó¤¬½ñ¤«¤ì¤Æ¤¤¤Þ¤¹¡£"
  72                      "¤½¤ì¤Ï¤³¤Î¥²¡¼¥à¤ò¥¤¥ó¥¹¥È¡¼¥ë¤·¤¿¾ì½ê¤Îdoc¥Ç¥£¥ì¥¯¥È¥ê¡¢¤Þ¤¿¤Ï"
  73                      "¥ª¥ó¥é¥¤¥ó¤Î¥¦¥§¥Ö¥µ¥¤¥È¤Ë¤¢¤ê¤Þ¤¹¡£"
  74                      "'q'¥¡¼¤ò²¡¤¹¤È¥Á¥å¡¼¥È¥ê¥¢¥ë¤ò½ªÎ»¤·¤Þ¤¹¡£"
  75                      "¤½¤ì¤Ç¤ÏËÜÊÔ¤ò¤ª³Ú¤·¤ß¤¯¤À¤µ¤¤¡ª") 17 1)
  76
  77   ) ;; end of objects
  78
  79  nil ; hooks
  80  nil ; edge entrances
  81  )