alias aliasdegis {  if ($dialog(aliasdegis)) { dialog -c aliasdegis } |  dialog -ma aliasdegis aliasdegis }
dialog aliasdegis {
  title "Alias Değiştirme"
  size -1 -1 210 247
  option dbu
  box "", 1, 3 0 204 19
  button "Tamam", 2, 160 230 47 14, ok
  edit "", 3, 22 6 80 10, autohs
  text " F1 :", 4, 6 7 14 8
  text " İşlevi :", 5, 103 7 19 8
  edit "", 6, 124 6 80 10, autohs
  box "", 7, 3 19 204 19
  text " F2 :", 8, 6 26 14 8
  text " İşlevi :", 9, 103 26 19 8
  edit "", 10, 22 25 80 10, autohs
  edit "", 11, 124 25 80 10, autohs
  box "", 12, 3 38 204 19
  text " F3 :", 13, 6 45 14 8
  text " İşlevi :", 14, 103 45 19 8
  edit "", 15, 22 44 80 10, autohs
  edit "", 16, 124 44 80 10, autohs
  box "", 17, 3 57 204 19
  text " F4 :", 18, 6 64 14 8
  text " İşlevi :", 19, 103 64 19 8
  edit "", 20, 22 63 80 10, autohs
  edit "", 21, 124 63 80 10, autohs
  box "", 22, 3 76 204 19
  text " F5 :", 23, 6 83 14 8
  text " İşlevi :", 24, 103 83 19 8
  edit "", 25, 22 82 80 10, autohs
  edit "", 26, 124 82 80 10, autohs
  box "", 27, 3 95 204 19
  text " F6 :", 28, 6 102 14 8
  text " İşlevi :", 29, 103 102 19 8
  edit "", 30, 22 101 80 10, autohs
  edit "", 31, 124 101 80 10, autohs
  box "", 32, 3 114 204 19
  text " F7 :", 33, 6 121 14 8
  text " İşlevi :", 34, 103 121 19 8
  edit "", 35, 22 120 80 10, autohs
  edit "", 36, 124 120 80 10, autohs
  box "", 37, 3 133 204 19
  text " F8 :", 38, 6 140 14 8
  text " İşlevi :", 39, 103 140 19 8
  edit "", 40, 22 139 80 10, autohs
  edit "", 41, 124 139 80 10, autohs
  box "", 42, 3 152 204 19
  text " F9 :", 43, 6 159 14 8
  text " İşlevi :", 44, 103 159 19 8
  edit "", 45, 22 158 80 10, autohs
  edit "", 46, 124 158 80 10, autohs
  box "", 47, 3 171 204 19
  text " F10 :", 48, 6 178 14 8
  text " İşlevi :", 49, 103 178 19 8
  edit "", 50, 22 177 80 10, autohs
  edit "", 51, 124 177 80 10, autohs
  box "", 52, 3 190 204 19
  text " F11 :", 53, 6 197 14 8
  text " İşlevi :", 54, 103 197 19 8
  edit "", 55, 22 196 80 10, autohs
  edit "", 56, 124 196 80 10, autohs
  box "", 57, 3 209 204 19
  text " F12 :", 58, 6 216 14 8
  text " İşlevi :", 59, 103 216 19 8
  edit "", 60, 22 215 80 10, autohs
  edit "", 61, 124 215 80 10, autohs
}

on 1:dialog:aliasdegis:*:*:{
  if ($devent == edit) {
    if ($did == 3) { .alias F1 $did(3) }
    if ($did == 6) { .set %F1 $did(6) }
    if ($did == 10) { .alias F2 $did(10) }
    if ($did == 11) { .set %F2 $did(11) }
    if ($did == 15) { .alias F3 $did(15) }
    if ($did == 16) { .set %F3 $did(16) }
    if ($did == 20) { .alias F4 $did(20) }
    if ($did == 21) { .set %F4 $did(21) }
    if ($did == 25) { .alias F5 $did(25) }
    if ($did == 26) { .set %F5 $did(26) }
    if ($did == 30) { .alias F6 $did(30) }
    if ($did == 31) { .set %F6 $did(31) }
    if ($did == 35) { .alias F7 $did(35) }
    if ($did == 36) { .set %F7 $did(36) }
    if ($did == 40) { .alias F8 $did(40) }
    if ($did == 41) { .set %F8 $did(41) }
    if ($did == 45) { .alias F9 $did(45) }
    if ($did == 46) { .set %F9 $did(46) }
    if ($did == 50) { .alias F10 $did(50) }
    if ($did == 51) { .set %F10 $did(51) }
    if ($did == 55) { .alias F11 $did(55) }
    if ($did == 56) { .set %F11 $did(56) }
    if ($did == 60) { .alias F12 $did(60) }
    if ($did == 61) { .set %F12 $did(61) }
  }
  if ($devent == init) {
    did -ra $dname 3 $isalias(F1).alias
    did -ra $dname 6 %F1
    did -ra $dname 10 $isalias(F2).alias
    did -ra $dname 11 %F2
    did -ra $dname 15 $isalias(F3).alias
    did -ra $dname 16 %F3
    did -ra $dname 20 $isalias(F4).alias
    did -ra $dname 21 %F4
    did -ra $dname 25 $isalias(F5).alias
    did -ra $dname 26 %F5
    did -ra $dname 30 $isalias(F6).alias
    did -ra $dname 31 %F6
    did -ra $dname 35 $isalias(F7).alias
    did -ra $dname 36 %F7
    did -ra $dname 40 $isalias(F8).alias
    did -ra $dname 41 %F8
    did -ra $dname 45 $isalias(F9).alias
    did -ra $dname 46 %F9
    did -ra $dname 50 $isalias(F10).alias
    did -ra $dname 51 %F10
    did -ra $dname 55 $isalias(F11).alias
    did -ra $dname 56 %F11
    did -ra $dname 60 $isalias(F12).alias
    did -ra $dname 61 %F12
  }
}