bb_addobj = [
	$arg1 = (concat (getalias $arg1) $arg2)
]

bb_setobj = [
	$arg1 = (strreplace (getalias $arg1) (concatword (at (getalias $arg1) $arg2) " ") $arg3)
]

bb_getstep = [
	result (substr $arg1 8 (- (strstr $arg1 "-") 8))
]

bb_getchan = [
	result (substr $arg1 11)
]

bb_removechan = [
]

bb_channum 	= 0;
bb_chans 	= [];
bb_steps	= [];

newgui boombox [
	guititle "Boombox!";
	loop i $bb_channum [
		guibutton "" [bb_removechan @@i] "exit"
		guifield 0 3 [bb_setobj bb_chans @@i GUI_FIELD_INFO_HERE]  <<<------
	]
	guibutton "New channel" [
		bb_addobj bb_chans bb_chan_@(bb_channum)_0;
		bb_channum = (+ $bb_channum 1);
	]
]