scripts
From
DavidG@VERT/SKYNET to
All on Thu Jan 25 07:04:00 2001
# yesnobar.srcãã# Sep 28 1995 - Digital Manãã# $id $ãã# @format.tab-size 8, @format.use-tabs trueããstr tmpããcopy tmp strãsetstr "S"ãprint "@QUESTION@? "ã:topãcompare_str "S"ãif_equalã print "[Si ] No "ãelseã print " Si [No]"ã end_ifãgetkeyãprint "\b\b\b\b\b\b\b\b\b\1n\1h\1>"ãcompare_key ^Mãif_trueã ungetstrã copy str tmpã returnã end_ifããcompare_keys "SN"ãif_trueã ungetkeyã copy str tmpã returnã end_ifããcompare_key ^@ãif_trueã copy str tmpã returnã end_ifãã# Toggleãcompare_str "S"ãif_trueã setstr "N"ãelseã setstr "S"ã end_ifãgoto topããThis is the script taht is causin' problems, i have to hit enter after i haveãmade the choice Si or No, what's wrong?. and here's the other BUG with the sameãscript here it is:ãã# noyesbar.srcãã# Sep 28 1995 - Digital Manãã# $id$ãã# @format.tab-size 8, @format.use-tabs trueããstr tmpããcopy tmp strãsetstr "N"ãprint "@QUESTION@? "ã:topãcompare_str "N"ãif_equalã print "[No] Si "ãelseã print " No [Si ]"ã end_ifãgetkeyãprint "\b\b\b\b\b\b\b\b\b\1n\1h\1>"ãcompare_key ^Mãif_trueã ungetstrã copy str tmpã returnã end_ifããcompare_keys "SN"ãif_trueã ungetkeyã copy str tmpã returnã end_ifããcompare_key ^@ãif_trueã copy str tmpã returnã end_ifãã# Toggleãcompare_str "S"ãif_trueã setstr "N"ãelseã setstr "S"ã end_ifãgoto topãã=================================ãHere the problem is when i use the O command to log off i chosse yes nad itãdoiesn't hang up, what's
wrong?.ããThanksãã---ã þ Synchronet þ SkyNet BBS, Lo mejor en Colombia, TELNET skynetbbs.thebbs.orgã