alias txt {
  set %txtkontrol $input(TXT satır eklemek için EVET satır silmek için HAYIR içeriğini görmek için İPTAL seçin,vn,Metin Belgesi Ekleme\Silme paneli)
  if %txtkontrol == $yes {
    if $input(TXT satır eklemek için veri giriniz,e,Metin girme paneli) != $null { write h.g.txt $!  | echo -a 06" $! " eklendi. | goto zıpzıp }
    else { goto zıpzıp }
  }
  if %txtkontrol == $no {
    if $input(TXT satır silmek için veri giriniz,e,Metin silme paneli) != $null { 
      if $read(h.g.txt,w,$+(*,$!,*)) { echo -a 06" $read(h.g.txt,$readn) " silindi. | write $+(-dl,$readn) h.g.txt | goto zıpzıp } 
      else { echo -a Böyle bir satır bulunamadı }
    }
    else { goto zıpzıp }
  }
  if %txtkontrol == $cancel {
    $iif($window(@Görüntüleme),clear @Görüntüleme,window -n @Görüntüleme)
    titlebar @Görüntüleme h.g.txt içeriği
    loadbuf @Görüntüleme h.g.txt
  }
  :zıpzıp
  unset %txtkontrol
}