コメント - Rmake

このコメントは、【トピック】ノベルゲームでエラーが出てしまいました。へのコメントです。

コメントの内容

kage1215(投稿日：2013/10/03 12:10/03/13)

それを踏まえてちょっと使いやすく改良してみた


def name_speak(name,speak,size)

if size
setTextFontSize(size)
else
setTextFontSize(28)  #本文中の指定がないときの文字サイズ
end

image1 = showImagePosition(30, 450, 118704)
    txt1 = createText(40, 460, 720, 100)
    setText(txt1, speak)
image2 = showImagePosition(30, 412, 206104)
setTextFontSize(28)  #名前部分の文字サイズ
　  txt2 = createText(40, 419, 200, 40)
    setText(txt2, name)


  end
  startInput()
  loop = true
  while loop
    while hasInput() 
      takeInput()
      if isMouseDown() || isKeyDown("Z")
         loop = false
      end
    end
    waitTime(30)
  end
  endInput()
  hideImagePosition(image1)
  hideImagePosition(image2)
  deleteText(txt1)
  deleteText(txt2)
end

使用例

name_speak("kage","サイズを指定しないと本文中の指定がない文字サイズで話すし")
name_speak("kage","サイズを指定すると文字サイズが変わるよ",36)
name_speak("kage","名前の部分のサイズは変わらないね。。。ごにょごにょ・・・",8)

コメントの内容(一番最初の投稿)

kage1215(投稿日：2013/10/03 12:10/03/13)

それを踏まえてちょっと使いやすく改良してみた


def name_speak(name,speak,size)

if size
setTextFontSize(size)
else
setTextFontSize(28)  #本文中の指定がないときの文字サイズ
end

image1 = showImagePosition(30, 450, 118704)
    txt1 = createText(40, 460, 720, 100)
    setText(txt1, speak)
image2 = showImagePosition(30, 412, 206104)
setTextFontSize(28)  #名前部分の文字サイズ
　  txt2 = createText(40, 419, 200, 40)
    setText(txt2, name)


  end
  startInput()
  loop = true
  while loop
    while hasInput() 
      takeInput()
      if isMouseDown() || isKeyDown("Z")
         loop = false
      end
    end
    waitTime(30)
  end
  endInput()
  hideImagePosition(image1)
  hideImagePosition(image2)
  deleteText(txt1)
  deleteText(txt2)
end

使用例

name_speak("kage","サイズを指定しないと本文中の指定がない文字サイズで話すし")
name_speak("kage","サイズを指定すると文字サイズが変わるよ",36)
name_speak("kage","名前の部分のサイズは変わらないね。。。ごにょごにょ・・・",8)