;@ map DLY5m8 DLY258 DLY1h8 DLY5h8 DLY1s8 DLY2s8 DLY278

;@ ins a
;@ outs a a a a a a a a
opcode DlyEight, 0, kkkkkkkkkkk
  kTime,kRange,kin,ko1,ko2,ko3,ko4,ko5,ko6,ko7,ko8 xin
  ain zar kin

  if kRange == 0 then
    kTime table kTime, DLY5m8
  elseif kRange == 1 then
    kTime table kTime, DLY258
  elseif kRange == 2 then
    kTime table kTime, DLY1h8
  elseif kRange == 3 then
    kTime table kTime, DLY5h8
  elseif kRange == 4 then
    kTime table kTime, DLY1s8
  elseif kRange == 5 then
    kTime table kTime, DLY2s8
  elseif kRange == 6 then
    kTime table kTime, DLY278

  abuf delayr 2.7
  a1 deltapi a(kTime) 
  a2 deltapi a(kTime)*2
  a3 deltapi a(kTime)*3
  a4 deltapi a(kTime)*4
  a5 deltapi a(kTime)*5
  a6 deltapi a(kTime)*6
  a7 deltapi a(kTime)*7
  a8 deltapi a(kTime)*8
  delayw ain

  zaw a1, ko1
  zaw a2, ko2
  zaw a3, ko3
  zaw a4, ko4
  zaw a5, ko5
  zaw a6, ko6
  zaw a7, ko7
  zaw a8, ko8
endop
