code:

---

dim $f,$lt,$,$fp,$fo,$fs,$fb,$pt
	$f = CreateObject("kixtart.form")
	$f.caption = "bbChecker II - Miscellaneous"
	$f.clientwidth = 250
	$f.clientheight = 330
	$f.top = $f.screen.height/2-100
	$f.Left = $f.screen.width-720
	$f.fontbold=1
	$f.fontname = "Bookman Old Style"
	$f.printxy(20,10,"bbChecker II 1.5.2.14")
	$f.fontbold=0
	$f.printxy(20,30,"Based on:")
	$f.printxy(20,45,"Kixtart 4.12 (wkix32.exe)")
	$f.printxy(20,60,"KixForms 2.1.3 (KixForms.dll)")
	$f.printxy(20,80,"Special thanks for helping me out")
	$f.printxy(20,95,"and making things possible go to:")
	$f.fontitalic=1
	$f.printxy(20,110,"Ruud van Velsen")
	$f.printxy(20,125,"Shawn Tassie")
	$f.printxy(20,140,"Patrick Rutten")
	$f.printxy(20,155,"...")
	$f.printxy(20,170,"BB regulars!")
	$f.fontitalic=0
	$f.fontname = "helvetica"
	$lt=$f.combobox(,150,235,40,17)
	$lt.style=1
	for $=10 to 99 $lt.additem($) next $lt.value=20
	$pt=$f.combobox(,150,210,40,17)
	$pt.style=1
	for $=1 to 30 $pt.additem($) next $pt.value=1 ;+$PMinterval
	$f.printxy(20,212,"PM check interval (mins):")
	$f.printxy(20,237,"Post check interval (secs):")
	$fp = $f.checkbox("Don't show my posts",20,258,130,15)
	$fo = $f.checkbox("Beep on post",20,280,110,15)
	$fs = $f.checkbox("Show slider",20,300,90,15)
	$fp.value = 1
	$fo.value = 1
	$fs.value = 1
	$fb = $f.button("OK",170,305,75,20)
	$fb.onclick = '$$f.hide'
	$f.show
	While $f.visible $=Execute($f.doevents)	Loop

---