0

我已经为我在图灵的一个程序制作了一个打字机程序,但我需要它使用不同的字体。我尝试过 Font.Draw,但由于它是一个程序,它不会让我在 Typewriter Proc 中使用它。有没有解决的办法?

var chars : array char of boolean 
var font : int

font := Font.New("Pokemon GB:18")

proc TypewriterPrint(text : string) 
loop 
  for i : 1..length(text) 
  Input.KeyDown (chars) 
 if chars (KEY_ENTER) then 
    delay(50) 
    put text(i) .. 
 else
  delay(100) 
  put text(i) .. 
 end if 
 end for 
 put "" 
end loop 
end TypewriterPrint 

Font.Draw (TypewriterPrint("This will be printed like a typewriter"), 150, 150, font, black)

我已经尝试过功能,但它也不起作用。

4

1 回答 1

0

您可以像调用常规过程一样调用它。只需在一切之外创建第一个过程,在第一个过程之外创建第二个过程,然后从第二个过程中调用第一个过程。

于 2018-04-10T20:53:39.197 回答