opcode FltHP, 0, iikk
; KBT !!!!!
  iKBT, iOrder, kMod, kCF xin ;i  - ON/OFF button?
  ain zar 2 ; CHANGE 
  kmod zkr 1 ; CHANGE 
  aout atonex ain, kCF+kmod*kMOd, iOrder
  zaw aout, 2  ; CHANGE 
endop
