Sephiroth
http://sephiroth.scifi-action.de/board/

Simple, Plain, but useful notepad ;)
http://sephiroth.scifi-action.de/board/viewtopic.php?f=4&t=29
Seite 1 von 1

Autor:  Sephiroth [ 18. März 2008 00:20 ]
Betreff des Beitrags:  Simple, Plain, but useful notepad ;)

;; /note - test it

alias note dialog - $+ $iif($dialog(note),v,dm) note note
dialog note {
  title "Notes [/note]"
  option -dbu
  size -1 -1 400 300
  edit "",1, 0 0 400 300,hsbar vsbar autohs autovs multi return
  button "",2,0 0 0 0 ,hide cancel
}
on 1:dialog:note:init:0:{ if ($exists(note.txt)) { loadbuf -o note 1 note.txt } }
on 1:dialog:note:sclick:2:{ .write -c note.txt | .savebuf -o note 1 note.txt | if (!$read(note.txt,$lines(note.txt))) write -dl $+ $readn note.txt }

Seite 1 von 1 Alle Zeiten sind UTC + 1 Stunde
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/