put "Your balance now is $", num01 + num5

put "Your balance now is $", strint (num01) + num5

const rn := "Prashanna"
const rp := "063"
var num1, num5, num6, balance : int %Added new variable balance for easier balance display..
var num01 : int := 500
var n, p : string % but variables of same type on same lines..saves space
var count := 0
var win := Window.Open ("position:top,center,graphics:500;400")
proc userLogin
    loop
        put "What is your Account name?"
        get n
        if n = rn then
            put " "
            return
        else
            put "Please try again"
            count += 1
        end if
        if count = 3 then
            loop
                Window.Close (win)
            end loop
        end if
    end loop
end userLogin

proc userPwd
    loop
        put "Now enter your password"
        get p
        if p = rp then
            put "Password Correct"
            return
        else
            put "Please try again"
            count += 1
        end if
        if count = 3 then
            loop
                Window.Close (win)
            end loop
        end if
    end loop
end userPwd

userLogin
userPwd
num5 := 0
balance := 500
/*Gave predefined values to variables so that no matter what they do it works..
 you had it so if they clicked balance right away it would be an error... aswell i made it so the small if
 statements became 1, saving you 3 variables.. and space.. also now the balance is regularly
 updated when ever tehy are done something.(It is hown at top of screen).. the small changes will make
 your program run alot better and efficient*/
loop
    cls
    put "Your balance is ", balance %variablesed balance so it shows an accurate balance
    put "******************************************************"
    put " ***Welcome to Thistletown Banking*** "
    put " 1. Make a Deposit"
    put " 2. Make a Withdrawal"
    put " 3. View Balance"
    put " 4. Exit the Program"
    put "******************************************************"
    put "Enter the number that you would like to do " ..
    get num1
    cls
    if num1 = 1 then %ALL ONE BIG IF STATEMENT>>IT SHOULD ALWAYS BE LIKE THIS....
        put "How much would you like to deposit $" ..
        get num5
        delay (1000)
        cls
        put "Your balance now is $", num01 + num5
        balance := num01 + num5 %Balance gets balue
        delay (2000)
        cls
        put "******************************************************"
        put " ***Welcome to Thistletown Banking*** "
        put " 1. Make a Deposit"
        put " 2. Make a Withdrawal"
        put " 3. View Balance"
        put " 4. Exit the Program"
        put "******************************************************"
        put "Enter the number that you would like to do " ..
    elsif num1 = 2 then
        put "How much would you like to withdraw? " ..
        get num6
        balance := num01 + num5 - num6 %Balance gets balue
        if num6 > (num01 + num5) then
            put "You exceeded your balance please try put in another amount"
        else
            put "Your Balance now is ", num01 + num5 - num6 % your greater then sign was the wrong way here lol
        end if
        /*Also you had it so that no matter what tehy did it would add to their balance...now
         only does if they ACTUALY HAVE the money they want*/
        delay (2000)
        cls
        put "******************************************************"
        put " ***Welcome to Thistletown Banking*** "
        put " 1. Make a Deposit"
        put " 2. Make a Withdrawal"
        put " 3. View Balance"
        put " 4. Exit the Program"
        put "******************************************************"
        put "Enter the number that you would like to do " ..
    elsif num1 = 3 then
        put balance %Displayes variable
        delay (1500)
        cls
        put "******************************************************"
        put " ***Welcome to Thistletown Banking*** "
        put " 1. Make a Deposit"
        put " 2. Make a Withdrawal"
        put " 3. View Balance"
        put " 4. Exit the Program"
        put "******************************************************"
        put "Enter the number you would like to do " ..
    elsif num1 = 4 then
        put "Thank you for using Thistletown Banking"
        delay (1000)
        Window.Close (win)
    end if
end loop
/*try to rememebr in the future that an optiosn menu like this should all be in one big if statement.. and
loop if it is always being used, seperate variables for each new action is a waste of time, and complicates
things, i take it you are new..so it is a VERY good start..*/