$regfile = "2313def.dat"
$crystal = 4000000

Config Pind.6 = Output
Config Int0 = Low Level

On Int0 Button:
Enable Interrupts
Enable Int0

Do
  Set Portd.6
  Wait 1
  Reset Portd.6
  Cls
  Lcd "power-idle..."
  Lowerline
  Lcd "pushbtn to wake"
  Powerdown
Loop

Button:
  Cls
  Lcd "awake!"
  Wait 1
Return

End