ThreadBoard ArchivesSite FeaturesActiveworlds SupportHistoric Archives |
Differences between MagsBot and Xelagot (Bots)
Differences between MagsBot and Xelagot // Botssgeo ~~~Mar 26, 2004, 12:34am
Why does deleting duplicates take so long in MagsBot, and is very quick in
the Xelagot? I need to use the bot to delete some duplicated tourist objects, and that's why I can't use the Xelagot rossyboyMar 31, 2004, 3:39pm
Does MagsBot use an older version of the SDK? It may have changed.
[View Quote] > Why does deleting duplicates take so long in MagsBot, and is very quick in > the Xelagot? I need to use the bot to delete some duplicated tourist > objects, and that's why I can't use the Xelagot > > magineApr 3, 2004, 9:15am
This is a multi-part message in MIME format.
--------------080900010302080708030002 Content-Type: text/plain; charset=us-ascii; format=flowed Content-Transfer-Encoding: 7bit How are you going about deleting the duplicates? (What button are you using, that is.) You should let me know <http://turtleflight.com/BBS> if there are problems. :) -Magine [View Quote] >Why does deleting duplicates take so long in MagsBot, and is very quick in >the Xelagot? I need to use the bot to delete some duplicated tourist >objects, and that's why I can't use the Xelagot > > > > --------------080900010302080708030002 Content-Type: text/html; charset=us-ascii Content-Transfer-Encoding: 7bit <!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <html> <head> <meta http-equiv="Content-Type" content="text/html;charset=ISO-8859-1"> <title></title> </head> <body text="#000000" bgcolor="#ffffff"> How are you going about deleting the duplicates? (What button are you using, that is.) You should <a href="http://turtleflight.com/BBS">let me know</a> if there are problems. :)<br> <br> -Magine<br> <br> [View Quote] </pre> </blockquote> </body> </html> --------------080900010302080708030002-- magineApr 3, 2004, 4:36pm
This is a multi-part message in MIME format.
--------------080803070504020000070002 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit Okay, I re-did the "Delete duplicates" button, it's much faster now. You can download either Magsbot 5.1 or 5.2 beta which has the new buttons, or you can just merge the attached buttons in, after deleting your current "Delete duplicate objects in obj list" button. (Make sure you're using at least version 4.6 though, as the new routine uses some functions not in earlier versions.) -Magine [View Quote] >Why does deleting duplicates take so long in MagsBot, and is very quick in >the Xelagot? I need to use the bot to delete some duplicated tourist >objects, and that's why I can't use the Xelagot > > > > --------------080803070504020000070002 Content-Type: text/plain; name="[CopyToVList].btn" Content-Transfer-Encoding: 8bit Content-Disposition: inline; filename="[CopyToVList].btn" Lists [CopyToVList] ARGS $LName at v; RESETLIST $LName; at ct= at itemcount[$LName]; FOR i 0 at ct-1 { at o= at nextnum[$LName]; $mk=$litem[$LName, at o]; STORE at v $str[ at o]=$mk } --------------080803070504020000070002 Content-Type: text/plain; name="Delete duplicate objects in obj list.btn" Content-Transfer-Encoding: 8bit Content-Disposition: inline; filename="Delete duplicate objects in obj list.btn" Build Delete duplicate objects in obj list $x="This will delete duplicate objects in the world, using an object list that you've already created. Proceed?"; IF at confirm[$fmt[$x,$DelList]]=0 { BREAK }; $x=$gets["Delete duplicate objects","Obj list to use?",$gv_[DelList]]; IF at eq[$x,""] { BREAK }; $$DelList=$x; at remove= at confirm["Remove duplicate entries from list also?"]; at log= at confirm["Store deleted object info in templog?"]; at v= at vlist; TRAP { REM copy to vlist; FTN "Lists/[CopyToVList]" $DelList at v; SORTVLIST at v; REM ----------------------------------; at ct= at lvarcount[ at v]; $mk1=""; FOR i 0 at ct-1 { $mkk=$lvar_[ at v, at i]; $mk=$left[$mkk, at iposl[",",$mkk]-1]; IF at eq[$mk,$mk1] { REM REPORT $fmt["DUPLICATE:%s%s%s%s",$mk1,$LF,$mk]; at o= at val[$tail[$lvarname_[ at v, at i],2]]; OBJECTDELETE at o at arg[1] at arg[2]; IF at log { SETITEM templog at o $mkk }; IF at remove { FREEITEM $DelList at o } }; $mk1=$mk } } { ERROR at error $error }; FREEVLIST at v; POPUP "Done."; QSTATE 1 --------------080803070504020000070002-- |
