;; load the file, too.
;;----------------------------------------------------------------------------
(load "naz.scm")
-(kern-script-version "0.7.0")
+(kern-script-version "0.7.1")
;; Setup progress bar for loading. I arrived at the number by printing the
;; current number of steps in src/foogod.c:foogod_progress_bar_finish().
-(kern-progress-bar-start "Loading" 205)
+(kern-progress-bar-start "Æɤ߹þ¤ßÃæ" 205)
;; Wrap the original definition of (load ...) with one that advances the
;; progress bar.
;;----------------------------------------------------------------------------
(kern-mk-char
'ch_wanderer
- "The Wanderer" ; name
+ "̤¤¿Í" ; name
sp_human ; species
oc_wanderer ; occ
s_wanderer ; sprite
;;----------------------------------------------------------------------------
(kern-mk-astral-body
'sun ; tag
- "Fyer (the sun)" ; name
+ "¥Õ¥£¥¢(ÂÀÍÛ)" ; name
1 ; relative astronomical distance
1 ; minutes per phase (n/a for sun)
(/ (* 24 60) 360) ; minutes per degree
;; with respect to phase vs sun position
;;----------------------------------------------------------------------------
(mk-moon 'lumis ; tag
- "Lumis" ; name
+ "¥ë¥ß¥¹" ; name
5 ; hours per phase
60 ; hours per revolution
22 ; initial arc
;; with respect to phase vs sun position
;;----------------------------------------------------------------------------
(mk-moon 'ord ; tag
- "Ord" ; name
+ "¥ª¡¼¥É" ; name
9 ; hours per phase
36 ; hours per revolution
67 ; initial arc
;;----------------------------------------------------------------------------
(define (start-scene kplayer)
- (kern-log-msg "A dark gate rises in a quiet clearing...")
+ (kern-log-msg "°Å¤¤Ì礬²¿¤â¤Ê¤¤½ê¤«¤éÉ⤫¤Ó¾å¤¬¤ê¡Ä")
(moongate-animate black-gate blackgate-stages)
(kern-sleep 2000)
(kern-obj-put-at kplayer (list p_moongate_clearing 11 12))
(kern-log-enable #t)
- (kern-log-msg "Then closes without a trace...")
+ (kern-log-msg "¤½¤·¤ÆÀ×·Á¤â¤Ê¤¯¾Ã¤¨µî¤Ã¤¿¡Ä")
(moongate-animate black-gate (reverse blackgate-stages))
(kern-sleep 1000)
- (kern-log-msg "You lie dreaming for a while, of another life...")
+ (kern-log-msg "¤·¤Ð¤é¤¯¤Î´Ö¡¢Ê̤οÍÀ¸¤ÎÌ´¤ò¸«¤Æ¤¤¤¿¤è¤¦¤À¡Ä")
(kern-sleep 2000)
(kern-log-enable #f)
(kern-char-set-sleep ch_wanderer #f)
(kern-player-set-follow-mode)
(kern-log-enable #t)
- (kern-log-msg "...then awaken to a strange new world.")
- (kern-log-msg "To the southwest you see a cave.")
+ (kern-log-msg "¡ÄÌܳФá¤ë¤È¤½¤³¤Ï´ñ̯¤Ê¿·¤·¤¤À¤³¦¤À¤Ã¤¿¡£")
+ (kern-log-msg "ÆîÀ¾¤Ëƶ·¢¤¬¸«¤¨¤ë¡£")
)
(define (simple-start kplayer)