-----------------------------------

magician

Mon Dec 18, 2006 12:56 am


help with the font for the GET

-----------------------------------

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 :D


-----------------------------------

uberwalla

Mon Dec 18, 2006 1:09 am



-----------------------------------

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:


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

Mon Dec 18, 2006 1:40 am



-----------------------------------

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


-----------------------------------

ericfourfour

Mon Dec 18, 2006 4:09 pm



-----------------------------------

Or you can use my getter found [url=http://www.compsci.ca/v2/viewtopic.php?t=14532]here.


-----------------------------------

magician

Tue Dec 19, 2006 11:10 pm



-----------------------------------

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

Tue Dec 19, 2006 11:15 pm



-----------------------------------

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

Tue Dec 19, 2006 11:31 pm



-----------------------------------

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
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)