Hourly Wages

   5 REM %H%O%U%R%L%Y% %W%A%G%E%S
  10 LET T=0
  20 LET W=0
  23 PRINT "ENTER EMPLOYEE NAME"
  24 INPUT E$
  25 PRINT E$
  28 PRINT 
  30 PRINT "HOURLY PAY RATE = $";
  40 INPUT P
  50 PRINT P
  60 PRINT "NUMBER OF HOURS WORKED = ";
  70 INPUT H
  80 PRINT H
  90 IF H>40 THEN LET T=H-40
 100 IF H>40 THEN GOTO 140
 110 LET W=H*P
 120 PRINT "GROSS WAGES = $ ";W
 130 STOP 
 140 LET W=(40*P)+(T*P*1.5)
 150 GOTO 120
 175 CLEAR 
 200 SAVE "1001%7"
 300 RUN