help with the font for the GET

[magician]

Is there any way to change font of the answer from "get" or use the one i have from my Font.Draw in "get"??


thanks

[uberwalla]

i do not think that you can change the font but u can make it so that u cant see the get and it just inputs it after. like so:

code:

setscreen ("noecho") var font : int := Font.New ("Arial:12") var stuff : string get stuff Font.Draw (stuff, maxx div 2, maxy div 2, font, 7)

hope that helps a bit.

[magician]

thanks i think it would look better with this than the original font of get

[ericfourfour]

Or you can use my getter found here.

[magician]

i have a question again... how can use the suggestion above for int? coz it seems that it only works for string... sorry.. a newbie here =/

[uberwalla]

do the exact thing except when you later need the string as an integer just make a variable called num:int or something and do the strint command. so basically it would be...

num := strint (stuff)

[magician]

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
var font1, font2, font3,font4 : int
font1 := Font.New ("arial:12:bold")
font2 := Font.New ("Basic Font:14:bold")
font3 := Font.New ("Courier New:11")
font4 := Font.New ("Arial:14")
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%



Font.Draw ("Please enter your Cashier I.D number to start.", 65, 450, font3, 1)
% drawbox (220, 400, 320, 430, 24)
% drawfillbox (220, 400, 320, 430, 24)
% Text.ColorBack (5)

var cashier: int
loop
locatexy (250, 420)
get cashier
Font.Draw (cashier , 10, 20, font4, 1)
if cashier = 21321 then
Font.Draw ("Welcome Back. Have a Good Day!", 115, 350, font3, 1)
else
Font.Draw ("The I.D number you have entered is not valid.", 65, 300, font3, 1)
Font.Draw ("Please insert the proper I.D number or ", 65, 270, font3, 1)
Font.Draw ("ask your manager for help.", 65, 240, font3, 1)
end if
exit when cashier = 12345
end loop
put skip
delay (1000)
cls


for the cashier part..it doesnt work... i want to font of get to be font4 (look at the top of my code)