yes but still..even if that is true...what could i lose from not posting it?
-------edit-------
ok im sry i didnt test it...thats weird it works fine but it wont work now?
----edit again-------
omfg now i see why im so sry about this here it is
i forgot to add that
Beginning:
if button(300,150,"Login")=1 then goto login
if button(290,180,"Register")=1 then goto register
sync
cls
register:
cls
input "What do you want your Characters name to be?" ;newname$
input "What do you want your Password to be?" ;newpass$
cls
goto start
do
if escapekey()=1 then goto Beginning
sync
loop
login:
input "Username " ;username$
input "Password " ;userpass$
cls
goto start
cls
Do
Start:
Button(20,35,"New Game")=1
Button(20,70,"Next Level")=1
Button(20,105,"Load Game")
If Button(20,135,"Exit")=1 then End
sync
loop
function Button(x1,y1,WORDS$)
Pressed=0
x2=Text Width(WORDS$)
y2=Text Height(WORDS$)
if mousex()>x1 and mousex()<x1+x2
if mousey()>y1-y2 and mousey()<y1+y2
Pressed=1
endif
endif
if pressed=1 then ink rgb(255,0,0),0 else ink rgb(255,255,255),0
if pressed=1
Pressed=Mouseclick()
else
pressed = 0
endif
text x1,y1,WORDS$
endfunction pressed
im so sorry
Alienmaster