Source

ircfs / ii-plugins.brc

Full commit
#!/usr/bin/env brc

# individual, make this a function
dir		= $*
inF		= $^*/in
outF	= $^*/out
ifs=/ { *=`{echo -n $*} 
	chan = $$#*
	*=$* {	shift ; serv = $#*	}
	serv = $*($serv)
}

 echo -n loading: 
  for (* in `{ cat $dir/cmds } ) {
	echo '	'^$^*
	{ . /home/nal/Oven/Potatoes/ircfs/plugins/$^*.brc }
  }

fn say		{ echo $* > $inF }
fn reply	{ echo $^name: $* > $inF }

tail -f -n0 $^dir/out | while (true) { # that true bothers me
 *=`{ask}
 date = $1
 time = $2
 name = `` '<>' { echo -n $3 }
	shift 3
 text = $*
 for (* in $cmds) { $* }
}