Changeset 1137 for trunk


Ignore:
Timestamp:
02/04/12 17:25:10 (4 months ago)
Author:
znx
Message:

clear batchadd and whitespace cleanup

Location:
trunk/plugins/en
Files:
90 edited

Legend:

Unmodified
Added
Removed
  • trunk/plugins/en/action_complex_attack.tcl

    r936 r1137  
    1313bMotion_plugin_add_action_complex "attacks" "^attacks (.+) with " 100 bMotion_plugin_complex_action_attack "en" 
    1414 
    15 proc bMotion_plugin_complex_action_attack { nick host handle channel text } {   
    16         if {![bMotion_interbot_me_next $channel]} {  
    17                 return 1  
     15proc bMotion_plugin_complex_action_attack { nick host handle channel text } { 
     16        if {![bMotion_interbot_me_next $channel]} { 
     17                return 1 
    1818        } 
    1919        set damage [rand 1500] 
     
    2828} 
    2929 
    30 bMotion_abstract_register "attack_responses" 
    31 bMotion_abstract_batchadd "attack_responses" { 
     30bMotion_abstract_register "attack_responses" { 
    3231        "%% attacks %SETTING{complex:attacks:who:_:_} with '%SETTING{complex:attacks:item:_:_}' for %SETTING{complex:attacks:score:_:_} damage." 
    3332        "%SETTING{complex:attacks:who:_:_} takes %SETTING{complex:attacks:score:_:_} damage from %OWNER{%%} '%SETTING{complex:attacks:item:_:_}'" 
  • trunk/plugins/en/action_complex_away.tcl

    r936 r1137  
    3838  #save as newnick because if they do a /me next it'll be their new nick 
    3939  bMotion_plugins_settings_set "complex:away" "lastnick" $channel "" $nick 
    40    
     40 
    4141  #autoaway 
    4242  if [regexp -nocase "(auto( |-)?away|idle)" $text] { 
     
    7575    return 1 
    7676  } 
    77      
     77 
    7878  bMotionDoAction $channel [bMotionGetRealName $nick $host] "%VAR{cyas}" 
    7979  return 1 
     
    104104 
    105105  bMotionDoAction $channel [bMotionGetRealName $nick $host] "%VAR{welcomeBacks}" 
    106    
     106 
    107107        bMotion_plugins_settings_set "system:join" "lastgreeted" $channel "" $nick 
    108108  return 1 
  • trunk/plugins/en/action_complex_failsafe.tcl

    r1136 r1137  
    5252                bMotionGetHorny 
    5353                driftFriendship $nick 10 
    54         }  
     54        } 
    5555 
    5656 
     
    131131} 
    132132 
    133 bMotion_abstract_register "failsafe_nice" 
    134 bMotion_abstract_batchadd "failsafe_nice" [list "mmm" "%VAR{smiles}" "%VAR{smiles}%|/gives %% %VAR{sillyThings}" "i do love a good %2ing"] 
     133bMotion_abstract_register "failsafe_nice" [list "mmm" "%VAR{smiles}" "%VAR{smiles}%|/gives %% %VAR{sillyThings}" "i do love a good %2ing"] 
    135134 
    136135 
    137 bMotion_abstract_register "failsafes_a" 
    138 bMotion_abstract_batchadd "failsafes_a" [list "%VAR{rarrs}" "%REPEAT{3:7:m}" "%VAR{thanks}" "what" "/loves it" "/passes it on to %ruser" "/. o O ( ? )" "i do love a good %%ing"] 
     136bMotion_abstract_register "failsafes_a" [list "%VAR{rarrs}" "%REPEAT{3:7:m}" "%VAR{thanks}" "what" "/loves it" "/passes it on to %ruser" "/. o O ( ? )" "i do love a good %%ing"] 
    139137 
    140 bMotion_abstract_register "failsafes_b" 
    141 bMotion_abstract_batchadd "failsafes_b" [list "/%% %2 %SETTING{complex:failsafe:last:nick:moo} back with %VAR{sillyThings}" "/%% %2 %SETTING{complex:failsafe:last:nick:moo}" "/%VAR{sillyThings:verb,strip} %2 %SETTING{complex:failsafe:last:nick:moo} in the %VAR{bodypart:bothmixin}" "/%VAR{sillyThings:verb,strip} %2 %SETTING{complex:failsafe:last:nick:moo} in return" "i do love a good %%ing"] 
     138bMotion_abstract_register "failsafes_b" [list "/%% %2 %SETTING{complex:failsafe:last:nick:moo} back with %VAR{sillyThings}" "/%% %2 %SETTING{complex:failsafe:last:nick:moo}" "/%VAR{sillyThings:verb,strip} %2 %SETTING{complex:failsafe:last:nick:moo} in the %VAR{bodypart:bothmixin}" "/%VAR{sillyThings:verb,strip} %2 %SETTING{complex:failsafe:last:nick:moo} in return" "i do love a good %%ing"] 
    142139bMotion_abstract_add_filter "failsafes_b" "%VERB" 
    143140 
    144 bMotion_abstract_register "squeezeds" 
    145 bMotion_abstract_batchadd "squeezeds" [list "/pops" "/bursts" "/is compressed to a singularity and sucks in all of spacetime%|whoops" "/deflates" "%VAR{smiles}"] 
     141bMotion_abstract_register "squeezeds" [list "/pops" "/bursts" "/is compressed to a singularity and sucks in all of spacetime%|whoops" "/deflates" "%VAR{smiles}"] 
    146142 
    147 bMotion_abstract_register "whats" 
    148 bMotion_abstract_batchadd "whats" [list "what?" "hmm?" "hello? yes?" "er... they did it%|/points at %ruser" "/stares back"] 
     143bMotion_abstract_register "whats" [list "what?" "hmm?" "hello? yes?" "er... they did it%|/points at %ruser" "/stares back"] 
    149144 
    150  bMotion_abstract_register "failsafe_lookback" 
    151  bMotion_abstract_batchadd "failsafe_lookback" [list "/stares at %%" "hello, yes?" "i can still see you..." "/poses" "/bounces away" "%VAR{smiles}" "/looks at %%" ] 
    152   
    153 bMotion_abstract_register "failsafe_wtfs" 
    154 bMotion_abstract_batchadd "failsafe_wtfs" [list "%VAR{satOns}" "%VAR{shocked}" ] 
     145 bMotion_abstract_register "failsafe_lookback" [list "/stares at %%" "hello, yes?" "i can still see you..." "/poses" "/bounces away" "%VAR{smiles}" "/looks at %%" ] 
    155146 
    156 bMotion_abstract_register "failsafe_niceactions" 
    157 bMotion_abstract_batchadd "failsafe_niceactions" [list "wh%REPEAT{3:7:e} %VAR{smiles}" "%VAR{smiles}" "/bounces around" "*drool*" ] 
     147bMotion_abstract_register "failsafe_wtfs" [list "%VAR{satOns}" "%VAR{shocked}" ] 
     148 
     149bMotion_abstract_register "failsafe_niceactions" [list "wh%REPEAT{3:7:e} %VAR{smiles}" "%VAR{smiles}" "/bounces around" "*drool*" ] 
    158150 
    159151bMotion_abstract_register "sillyVerbs" 
  • trunk/plugins/en/action_complex_fucks.tcl

    r1136 r1137  
    2121                        frightened $nick $channel 
    2222                        return 1 
    23                 }                 
     23                } 
    2424 
    2525                if [bMotionLike $nick $host] { 
  • trunk/plugins/en/action_complex_hands.tcl

    r1114 r1137  
    6767                        } 
    6868                        return 1 
    69                 }  
     69                } 
    7070                #end of "hands dildo" 
    7171 
     
    120120                } 
    121121                return 1 
    122         }  
     122        } 
    123123        #end of "hands" handler 
    124124} 
  • trunk/plugins/en/action_complex_hands_dildo.tcl

    r936 r1137  
    4646    } 
    4747 
    48     #play with it  
     48    #play with it 
    4949    #TODO: Rationalise this! 
    5050    if {$got(dildo,count) == 1} { 
     
    5959 
    6060    if {[bMotionGetGender $nick $host] == "male"} { 
    61       #-- hander is male           
     61      #-- hander is male 
    6262      if [string match -nocase "*flute*" $item] { 
    6363        bMotionDoAction $channel $item "%VAR{dildoFlutePlays}" $nick 
     
    129129        return 0 
    130130      } else { 
    131         bMotionDoAction $channel $nick "%VAR{dildoMaleMale}" $item             
     131        bMotionDoAction $channel $nick "%VAR{dildoMaleMale}" $item 
    132132        #take turns 
    133133        set useTimer 1 
     
    149149        set useTimer 1 
    150150        set style "normal" 
    151       }           
    152     }  
     151      } 
     152    } 
    153153    #male bot, female hander 
    154154    bMotion_putloglev 1 * "bMotion: dildo (male) timer starting" 
  • trunk/plugins/en/action_complex_hugs.tcl

    r936 r1137  
    1414bMotion_plugin_add_action_complex "hugs" "^(hugs|snuggles|huggles|knuffelt) %botnicks" 100 bMotion_plugin_complex_action_hugs "en" 
    1515 
    16 proc bMotion_plugin_complex_action_hugs { nick host handle channel text } {   
     16proc bMotion_plugin_complex_action_hugs { nick host handle channel text } { 
    1717  bMotionGetUnLonely 
    1818  bMotionGetHappy 
  • trunk/plugins/en/action_complex_lifts.tcl

    r1112 r1137  
    3030} 
    3131 
    32 bMotion_abstract_register "nolift_channel_response" 
    33 bMotion_abstract_batchadd "nolift_channel_response" { 
     32bMotion_abstract_register "nolift_channel_response" { 
    3433        "hmmmph %SMILEY{sad}" 
    3534        "OI! Don't do that" 
     
    3938} 
    4039 
    41 bMotion_abstract_register "lift_channel_response" 
    42 bMotion_abstract_batchadd "lift_channel_response" { 
     40bMotion_abstract_register "lift_channel_response" { 
    4341        "Weeeeeeeeeeeeeeeeeeeee, do that again!" 
    4442        "Ooo aren't we strong" 
  • trunk/plugins/en/action_complex_light.tcl

    r936 r1137  
    1616bMotion_plugin_add_action_complex "light2" "^sets %botnicks (alight|on fire)" 100 bMotion_plugin_complex_action_light "en" 
    1717 
    18 proc bMotion_plugin_complex_action_light { nick host handle channel text } {   
     18proc bMotion_plugin_complex_action_light { nick host handle channel text } { 
    1919  bMotionDoAction $channel $nick "%VAR{burns}" 
    2020  bMotionGetUnLonely 
     
    2323} 
    2424 
    25 bMotion_abstract_register "burns" 
    26 bMotion_abstract_batchadd "burns" { 
     25bMotion_abstract_register "burns" { 
    2726  "/burns%|%bot[50,¬VAR{extinguishes}]" 
    2827  "*flames*%|%bot[50,¬VAR{extinguishes}]" 
     
    4039} 
    4140 
    42 bMotion_abstract_register "extinguishes" 
    43 bMotion_abstract_batchadd "extinguishes" { 
     41bMotion_abstract_register "extinguishes" { 
    4442  "/puts %% out" 
    4543  "/pours water on %%" 
  • trunk/plugins/en/action_complex_misc.tcl

    r1136 r1137  
    1414bMotion_plugin_add_action_complex "freshens" "^freshens %botnicks" 100 bMotion_plugin_complex_action_freshen "en" 
    1515 
    16 proc bMotion_plugin_complex_action_freshen { nick host handle channel text } {   
     16proc bMotion_plugin_complex_action_freshen { nick host handle channel text } { 
    1717        global botnicks 
    1818        if [regexp -nocase "freshens ${botnicks}('s (.+))?" $text matches 1 2 what] { 
     
    4242bMotion_plugin_add_action_complex "fallsout" "^falls out with %botnicks" 100 bMotion_plugin_complex_action_fallsout "en" 
    4343 
    44 proc bMotion_plugin_complex_action_fallsout { nick host handle channel text } {   
     44proc bMotion_plugin_complex_action_fallsout { nick host handle channel text } { 
    4545        if [bMotionIsFriend $nick] { 
    4646                bMotionDoAction $channel $nick "%VAR{felloutfriend}" 
  • trunk/plugins/en/action_complex_rolls.tcl

    r936 r1137  
    2020} 
    2121 
    22 bMotion_abstract_register "rolls_channel_response" 
    23 bMotion_abstract_batchadd "rolls_channel_response" { 
     22bMotion_abstract_register "rolls_channel_response" { 
    2423        "keep them doggies rolling RAWHIDE" 
    2524        "rolls a joint" 
  • trunk/plugins/en/action_complex_shows.tcl

    r1074 r1137  
    8888# abstracts 
    8989 
    90 bMotion_abstract_register "show_amazements" 
    91 bMotion_abstract_batchadd "show_amazements" { 
     90bMotion_abstract_register "show_amazements" { 
    9291  "amazement" 
    9392  "astonishment" 
     
    9897} 
    9998 
    100 bMotion_abstract_register "show_whoas" 
    101 bMotion_abstract_batchadd "show_whoas" { 
     99bMotion_abstract_register "show_whoas" { 
    102100  "whoa" 
    103101  "wow" 
     
    108106} 
    109107 
    110 bMotion_abstract_register "show_comparisons" 
    111 bMotion_abstract_batchadd "show_comparisons" { 
     108bMotion_abstract_register "show_comparisons" { 
    112109  "bigger" 
    113110  "smaller" 
     
    128125} 
    129126 
    130 bMotion_abstract_register "show_adjectives" 
    131 bMotion_abstract_batchadd "show_adjectives" { 
     127bMotion_abstract_register "show_adjectives" { 
    132128  "shiny" 
    133129  "pretty" 
     
    139135} 
    140136 
    141 bMotion_abstract_register "show_generic" 
    142 bMotion_abstract_batchadd "show_generic" { 
     137bMotion_abstract_register "show_generic" { 
    143138  "/gasps in %VAR{show_amazements}" 
    144139  "%VAR{show_whoas}%colen" 
  • trunk/plugins/en/action_complex_smacks.tcl

    r1136 r1137  
    3333} 
    3434 
    35 bMotion_abstract_register "trouts" 
    36 bMotion_abstract_batchadd "trouts" { 
     35bMotion_abstract_register "trouts" { 
    3736        "/slaps %% back using a default menu command" 
    3837        "%VAR{goAways}" 
     
    4342} 
    4443 
    45 bMotion_abstract_register "slapped" 
    46 bMotion_abstract_batchadd "slapped" { 
     44bMotion_abstract_register "slapped" { 
    4745        "ow hey! that was my %VAR{counts} %VAR{bodypart} %VAR{unsmiles}" 
    4846        "ow! that was my %VAR{counts} %VAR{bodypart} %VAR{unsmiles}" 
     
    6462} 
    6563 
    66 bMotion_abstract_register "counts" 
    67 bMotion_abstract_batchadd "counts" { 
     64bMotion_abstract_register "counts" { 
    6865        "last" 
    6966        "penultimate" 
  • trunk/plugins/en/action_complex_waves.tcl

    r936 r1137  
    2929} 
    3030 
    31 bMotion_abstract_register "waveTooMuch" 
    32 bMotion_abstract_batchadd "waveTooMuch" [list "What." "Are you practicing to be the Queen or something?" "..."] 
     31bMotion_abstract_register "waveTooMuch" [list "What." "Are you practicing to be the Queen or something?" "..."] 
  • trunk/plugins/en/action_simple_squeeze.tcl

    r936 r1137  
    1414bMotion_plugin_add_action_simple "squeeze" "^(squeezes|beeps|honks|knijpt( in)?) %botnicks" 100 "%VAR{honks}" "en" 
    1515 
    16 bMotion_abstract_register "honks" 
    17 bMotion_abstract_batchadd "honks" { 
     16bMotion_abstract_register "honks" { 
    1817  "/honks" 
    1918  "/beeps" 
  • trunk/plugins/en/complex_abbr.tcl

    r936 r1137  
    4141bMotion_plugin_add_complex "abbr" "^!abbr" 100 bMotion_plugin_complex_abbr "en" 
    4242 
    43 bMotion_abstract_register "abbr_nouns" 
    44 bMotion_abstract_batchadd "abbr_nouns" { 
     43bMotion_abstract_register "abbr_nouns" { 
    4544  "mullet" 
    4645  "cheese" 
     
    5352} 
    5453 
    55 bMotion_abstract_register "abbr_adj" 
    56 bMotion_abstract_batchadd "abbr_adj" { 
     54bMotion_abstract_register "abbr_adj" { 
    5755  "hot" "cold" "purple" "clean" "freezing" "thooper" "white" "starchy" "bavarian" "woolly" "blippy" "decent" "smart" "coloured" "flavoured" "norwegian" "swede" "brit" "dutchman" "american" "canadian" "german" 
    5856} 
    5957 
    60 bMotion_abstract_register "abbr_verbs" 
    61 bMotion_abstract_batchadd "abbr_verbs" { 
     58bMotion_abstract_register "abbr_verbs" { 
    6259  "wielding" 
    6360  "powered" 
     
    6764 
    6865 
    69 bMotion_abstract_register "abbr_adult_nouns_t" 
    70 bMotion_abstract_batchadd "abbr_adult_nouns_t" { 
     66bMotion_abstract_register "abbr_adult_nouns_t" { 
    7167  "sex" 
    7268  "vibrator" 
     
    7672} 
    7773 
    78 bMotion_abstract_register "abbr_adult_adj_t" 
    79 bMotion_abstract_batchadd "abbr_adult_adj_t" { 
     74bMotion_abstract_register "abbr_adult_adj_t" { 
    8075  "thexy" "horny" 
    8176  "hot" "moist" "wet" "lubricated" 
    8277} 
    8378 
    84 bMotion_abstract_register "abbr_adult_verbs_t" 
    85 bMotion_abstract_batchadd "abbr_adult_verbs_t" { 
     79bMotion_abstract_register "abbr_adult_verbs_t" { 
    8680  "licking" 
    8781  "moaning" 
     
    9084 
    9185#create the big lists :) 
    92 bMotion_abstract_register "abbr_adult_nouns" 
    93 bMotion_abstract_batchadd "abbr_adult_nouns" { 
     86bMotion_abstract_register "abbr_adult_nouns" { 
    9487  "%VAR{abbr_nouns}" 
    9588  "%VAR{abbr_adult_nouns_t}" 
    9689} 
    9790 
    98 bMotion_abstract_register "abbr_adult_verbs" 
    99 bMotion_abstract_batchadd "abbr_adult_verbs" { 
     91bMotion_abstract_register "abbr_adult_verbs" { 
    10092  "%VAR{abbr_verbs}" 
    10193  "%VAR{abbr_adult_verbs_t}" 
    10294} 
    10395 
    104 bMotion_abstract_register "abbr_adult_adj" 
    105 bMotion_abstract_batchadd "abbr_adult_adj" { 
     96bMotion_abstract_register "abbr_adult_adj" { 
    10697  "%VAR{abbr_adj}" 
    10798  "%VAR{abbr_adult_adj_t}" 
  • trunk/plugins/en/complex_action_hands_dildo.tcl

    r936 r1137  
    4646    } 
    4747 
    48     #play with it  
     48    #play with it 
    4949    #TODO: Rationalise this! 
    5050    if {$got(dildo,count) == 1} { 
     
    5959 
    6060    if {[bMotionGetGender $nick $host] == "male"} { 
    61       #-- hander is male           
     61      #-- hander is male 
    6262      if [string match -nocase "*flute*" $item] { 
    6363        bMotionDoAction $channel $item "%VAR{dildoFlutePlays}" $nick 
     
    129129        return 0 
    130130      } else { 
    131         bMotionDoAction $channel $nick "%VAR{dildoMaleMale}" $item             
     131        bMotionDoAction $channel $nick "%VAR{dildoMaleMale}" $item 
    132132        #take turns 
    133133        set useTimer 1 
     
    149149        set useTimer 1 
    150150        set style "normal" 
    151       }           
    152     }  
     151      } 
     152    } 
    153153    #male bot, female hander 
    154154    bMotion_putloglev 1 * "bMotion: dildo (male) timer starting" 
  • trunk/plugins/en/complex_activate.tcl

    r936 r1137  
    3030} 
    3131 
    32 bMotion_abstract_register "activateses" 
    33 bMotion_abstract_batchadd "activateses" { 
     32bMotion_abstract_register "activateses" { 
    3433  "/increases power to %%" 
    3534  "/brings %% online" 
  • trunk/plugins/en/complex_asl.tcl

    r936 r1137  
    1212 
    1313bMotion_plugin_add_complex "asl" {\ma/?s/?l\??\M} 100 bMotion_plugin_complex_asl "en" 
    14    
     14 
    1515proc bMotion_plugin_complex_asl { nick host handle channel text } { 
    1616  if {[bMotionTalkingToMe $text] || [rand 2]} { 
  • trunk/plugins/en/complex_bhar.tcl

    r936 r1137  
    2020    bMotionDoAction $channel $nick "%VAR{arrs}" 
    2121    return 1 
    22   }   
     22  } 
    2323} 
    2424 
    25 bMotion_abstract_register "arrs" 
    26 bMotion_abstract_batchadd "arrs" { 
     25bMotion_abstract_register "arrs" { 
    2726  "bhar" 
    2827  "boohar" 
  • trunk/plugins/en/complex_chomp.tcl

    r936 r1137  
    1313bMotion_plugin_add_complex "chomp" "^%botnicks,?:? ?(please )?chomp" 100 bMotion_plugin_complex_chomp "en" 
    1414 
    15 proc bMotion_plugin_complex_chomp { nick host handle channel text } {   
     15proc bMotion_plugin_complex_chomp { nick host handle channel text } { 
    1616  global botnicks 
    1717  if [regexp -nocase "^$botnicks,?:? ?(please )?chomp (.+)" $text matches ming ming2 who] { 
  • trunk/plugins/en/complex_correct.tcl

    r936 r1137  
    2424} 
    2525 
    26 bMotion_abstract_register "shouldhaves" 
    27 bMotion_abstract_batchadd "shouldhaves" { 
     26bMotion_abstract_register "shouldhaves" { 
    2827  "\"%% have\" %VAR{smiles}" 
    2928  "%% what?" 
  • trunk/plugins/en/complex_crap.tcl

    r1094 r1137  
    11# 
    22# vim: fdm=indent fdn=1 
    3 # 
    4 # Altered to new style bMotion_abstract_register/batchadd by Mark Sangster 
    53 
    64############################################################################### 
     
    3432bMotion_abstract_add_filter "random_crap_main" "\$ruser" 
    3533 
    36 bMotion_abstract_register "random_crap_adj" 
    37 bMotion_abstract_batchadd "random_crap_adj" { 
     34bMotion_abstract_register "random_crap_adj" { 
    3835         "lemon-flavoured" 
    3936         "tasty" 
     
    4239                                 "yummy" 
    4340  } 
    44    
    45 bMotion_abstract_register "random_crap_type" 
    46 bMotion_abstract_batchadd "random_crap_type" { 
     41 
     42bMotion_abstract_register "random_crap_type" { 
    4743         "poop" 
    4844         "crap" 
  • trunk/plugins/en/complex_eitheror.tcl

    r936 r1137  
    4444} 
    4545 
    46 bMotion_abstract_register "eitherors" 
    47 bMotion_abstract_batchadd "eitherors" [list "%%: %2" "/thinks%|%%: %2" "/ponders%|%%: %2" "/flips a coin%|%%: %2" "%%: %2%|Or you could just use a placebo" "%%: none of the above" "%%: actually, i think it's %VAR{sillyThings}"] 
     46bMotion_abstract_register "eitherors" [list "%%: %2" "/thinks%|%%: %2" "/ponders%|%%: %2" "/flips a coin%|%%: %2" "%%: %2%|Or you could just use a placebo" "%%: none of the above" "%%: actually, i think it's %VAR{sillyThings}"] 
  • trunk/plugins/en/complex_fact.tcl

    r1044 r1137  
    3030                return 0 
    3131        } 
    32    
     32 
    3333  if {[string range $text end end] == "?"} { return 0 } 
    3434  if [regexp -nocase {\m([^ !"]+)[!" ]+(is|was|==?|am) ?([a-z0-9 '_/-]+)} $text matches item blah fact] { 
  • trunk/plugins/en/complex_fry.tcl

    r1118 r1137  
    3333                        set response "%VAR{technically_worst}" 
    3434                } 
    35                 bMotionDoAction $channel $thing $response  
     35                bMotionDoAction $channel $thing $response 
    3636                return 1 
    3737        } 
  • trunk/plugins/en/complex_fuckoff.tcl

    r961 r1137  
    3434} 
    3535 
    36 bMotion_abstract_register "fuckYous" 
    37 bMotion_abstract_batchadd "fuckYous" [list "stfu" "shut up, you %VAR{PROM}" "eh fuck you buddy" "lalala not listening" "suck my balls you %VAR{dNouns}-%VAR{dVerbs}ing %VAR{prom_first}-%VAR{prom_second}" "yeah, whatever *yawn*" "shut it" "leave me alone" "oh go poo a bottom"] 
     36bMotion_abstract_register "fuckYous" [list "stfu" "shut up, you %VAR{PROM}" "eh fuck you buddy" "lalala not listening" "suck my balls you %VAR{dNouns}-%VAR{dVerbs}ing %VAR{prom_first}-%VAR{prom_second}" "yeah, whatever *yawn*" "shut it" "leave me alone" "oh go poo a bottom"] 
  • trunk/plugins/en/complex_getfact.tcl

    r936 r1137  
    1 #  
     1# 
    22# vim: fdm=indent fdn=1 
    33 
     
    66# Copyright (C) Kevin Smith 2003 
    77# 
    8 # This program is covered by the GPL, please refer the to LICENCE file in the  
    9 # distribution; further information can be found in the headers of the scripts  
    10 # in the modules directory.  
     8# This program is covered by the GPL, please refer the to LICENCE file in the 
     9# distribution; further information can be found in the headers of the scripts 
     10# in the modules directory. 
    1111############################################################################### 
    1212 
     
    1515# 
    1616# Usage: 
    17 #       !fact   
    18 #       botname what do you know  
     17#       !fact 
     18#       botname what do you know 
    1919#       botname tell me something new 
    2020 
    2121bMotion_plugin_add_complex "getfact1" "^!fact" 100 bMotion_plugin_complex_get_fact "en" 
    22 bMotion_plugin_add_complex "getfact2" "^%botnicks,?:? what do you know" 100 bMotion_plugin_complex_get_fact "en"  
     22bMotion_plugin_add_complex "getfact2" "^%botnicks,?:? what do you know" 100 bMotion_plugin_complex_get_fact "en" 
    2323bMotion_plugin_add_complex "getfact3" "^%botnicks,?:? tell me something new" 100 bMotion_plugin_complex_get_fact "en" 
    2424 
     
    3131        set i [lindex $items [rand [llength $items]]] 
    3232        if {[regexp "what,(.+)" $i matches item]} { 
    33                 #set item  
     33                #set item 
    3434        } 
    3535        #set property $bMotionFacts(what,$item) 
     
    4242} 
    4343 
    44 bMotion_abstract_register "get_fact_intros" 
    45 bMotion_abstract_batchadd "get_fact_intros" { 
     44bMotion_abstract_register "get_fact_intros" { 
    4645  "I think I heard that" 
    4746  "last time I knew, " 
  • trunk/plugins/en/complex_gollum.tcl

    r1092 r1137  
    1616proc bMotion_plugin_complex_gollum { nick host handle channel text } { 
    1717    bMotion_putloglev 2 * "bMotion: run complex_gollum," 
    18     if {![bMotion_interbot_me_next $channel]} {  
     18    if {![bMotion_interbot_me_next $channel]} { 
    1919        bMotion_putloglev 4 * "bMotion: would have run gollum, but not my turn" 
    20         return 0  
     20        return 0 
    2121    } 
    2222    bMotion_putloglev 4 * "bMotion: my turn when running complex_gollum" 
    2323    bMotionDoAction $channel [bMotionGetRealName $nick $host] "%VAR{gollums}" 
    24     return 1  
     24    return 1 
    2525    #this allows us to still respond to questions, right? 
    2626} 
    2727 
    28 bMotion_abstract_register "gollums" 
    29 bMotion_abstract_batchadd "gollums" [list "Foolishness!" "Stupid fat hobbit!" "We hates the fat hobbit! Him and his pots and pans and ropes." "Thieves. Thieves all!" "Stupid hobbit. Talking to %himherself like that. Not answering %himherself." "Yes. Sleep sweet sleep with our precious!" "Filthy little thief playing with our precious!" "If only fat hobbit would go away for a moment, we could go to master and take the precious away from him." "No! Must not take away our precious!" "We miss the song of the precious. We miss it. We wants it back!" "Everyone wants my precious. It's not fair! It's ours!" "Shiny, shiny." "pet it, yes. stroke it. mmm, nice, yes.%|nice precious, yes." ] 
     28bMotion_abstract_register "gollums" [list "Foolishness!" "Stupid fat hobbit!" "We hates the fat hobbit! Him and his pots and pans and ropes." "Thieves. Thieves all!" "Stupid hobbit. Talking to %himherself like that. Not answering %himherself." "Yes. Sleep sweet sleep with our precious!" "Filthy little thief playing with our precious!" "If only fat hobbit would go away for a moment, we could go to master and take the precious away from him." "No! Must not take away our precious!" "We miss the song of the precious. We miss it. We wants it back!" "Everyone wants my precious. It's not fair! It's ours!" "Shiny, shiny." "pet it, yes. stroke it. mmm, nice, yes.%|nice precious, yes." ] 
  • trunk/plugins/en/complex_hand.tcl

    r936 r1137  
    3131      if { [string match -nocase "me" $who] } { 
    3232        bMotion_plugin_complex_hug_do $channel $nick $host 
    33       } else {   
     33      } else { 
    3434        bMotion_plugin_complex_hug_do $channel $who $host 
    35       }   
     35      } 
    3636    } else { 
    3737      bMotionDoAction $channel $nick "%%: I'm sorry, I don't know how to hug %VAR{unsmiles}" 
     
    4545  } else { 
    4646    set whom [bMotionGetRealName $who] 
    47   }   
     47  } 
    4848 
    4949  #your -> his/her 
     
    5151    set item "[getHisHers] [string range $item 5 end]" 
    5252  } 
    53    
     53 
    5454  if [string match -nocase "something*" $item] { 
    5555    set item "%VAR{sillyThings}" 
    5656  } 
    57    
     57 
    5858  bMotion_putloglev d * "bMotion: Handed $whom $item on $channel (from $nick)" 
    5959  bMotionDoAction $channel $nick "/gives $whom $item" 
  • trunk/plugins/en/complex_hello.tcl

    r1109 r1137  
    1919        set exclaim "" 
    2020        regexp -nocase "^${botnicks}(!+|\[!\"£\$%^&*()#\]{3,})" $text bling pop exclaim 
    21         global bMotionInfo  
     21        global bMotionInfo 
    2222 
    2323        set lastGreeted [bMotion_plugins_settings_get "complex:hello" "lastGreeted" $channel ""] 
     
    6565} 
    6666 
    67 bMotion_abstract_register "hello_familiars" 
    68 bMotion_abstract_batchadd "hello_familiars" { 
     67bMotion_abstract_register "hello_familiars" { 
    6968        "%%%colen" 
    7069        "%%!" 
  • trunk/plugins/en/complex_invader.tcl

    r1084 r1137  
    8282 
    8383# random zimlike phrases 
    84 bMotion_abstract_register "randomZimness" 
    85 bMotion_abstract_batchadd "randomZimness" { 
     84bMotion_abstract_register "randomZimness" { 
    8685        "yes, my tallest!" 
    8786        "how can you have an operation impending doom 2 without me?" 
     
    182181        "people of earth! prepare to meet the mighty foot of my planet" 
    183182        "well... yes... i'm an unstoppable death machine" 
    184         } 
    185  
    186 bMotion_abstract_batchadd "randomZimness" { 
    187183        "i congratulate you in recognising my superiority and choosing me to be your love pig!" 
    188184        "your magical love adventure begins now" 
     
    225221 
    226222# random girlike phrases 
    227 bMotion_abstract_register "randomGirness" 
    228 bMotion_abstract_batchadd "randomGirness" { 
     223bMotion_abstract_register "randomGirness" { 
    229224        "i don't know... weee hoo hoo hoo!" 
    230225        "I'm gonna sing the doom song now... dooom doom doom" 
     
    291286 
    292287# random "duty" responses... inevitable Gir 
    293 bMotion_abstract_register "randomDootie" 
    294 bMotion_abstract_batchadd "randomDootie" { 
     288bMotion_abstract_register "randomDootie" { 
    295289        "dootie %VAR{smiles}" 
    296290        "doootie dootie dooootie dootie" 
     
    304298 
    305299# random zim/gir name change responses 
    306 bMotion_abstract_register "randomZimNameChange" 
    307 bMotion_abstract_batchadd "randomZimNameChange" { 
     300bMotion_abstract_register "randomZimNameChange" { 
    308301        "master, where did you go? I can't see you" 
    309302        "master?" 
     
    326319# nick change response 
    327320bMotion_plugin_add_irc_event "invader(nick)" "nick" ".*" 5 "bMotion_plugin_complex_invader_nick" "en" 
    328  
  • trunk/plugins/en/complex_joker.tcl

    r1078 r1137  
    1717# random joke callback 
    1818proc bMotion_plugin_complex_invoke_joke { nick host handle channel text } { 
    19         global bMotion_abstract_contents jokeInfo  
     19        global bMotion_abstract_contents jokeInfo 
    2020 
    2121        # I'll have no part in this if i'm telling a joke already 
     
    111111        bMotionDoAction $channel $nick "%DELAY{10}%|$answer" 
    112112 
    113         return 1  
     113        return 1 
    114114} 
    115115 
  • trunk/plugins/en/complex_knockknock.tcl

    r936 r1137  
    6161        } 
    6262} 
    63 bMotion_abstract_register "knock1" 
    64 bMotion_abstract_batchadd "knock1" [list "%%: Who's there?" "who's there?"] 
     63bMotion_abstract_register "knock1" [list "%%: Who's there?" "who's there?"] 
    6564 
    66 bMotion_abstract_register "knock2" 
    67 bMotion_abstract_batchadd "knock2" [list "%% who?"] 
     65bMotion_abstract_register "knock2" [list "%% who?"] 
    6866 
    69 bMotion_abstract_register "knock3" 
    70 bMotion_abstract_batchadd "knock3" [list "%REPEAT{3:10:ha}" "%REPEAT{3:10:ha}%|I don't get it." "..." "?" "lol" "what" "%VAR{smiles}"] 
     67bMotion_abstract_register "knock3" [list "%REPEAT{3:10:ha}" "%REPEAT{3:10:ha}%|I don't get it." "..." "?" "lol" "what" "%VAR{smiles}"] 
    7168 
  • trunk/plugins/en/complex_les.tcl

    r936 r1137  
    1212bMotion_plugin_add_complex "les" "^les .+" 40 bMotion_plugin_complex_les "en" 
    1313 
    14 proc bMotion_plugin_complex_les { nick host handle channel text } {   
     14proc bMotion_plugin_complex_les { nick host handle channel text } { 
    1515        if {![bMotion_interbot_me_next $channel]} { 
    1616                return 0 
  • trunk/plugins/en/complex_love.tcl

    r1112 r1137  
    2828        } 
    2929 
    30         driftFriendship $nick 8  
     30        driftFriendship $nick 8 
    3131        # people of the wrong gender get the platonic treatment 
    3232        if {![bMotionLike $nick $host]} { 
  • trunk/plugins/en/complex_nazi.tcl

    r1135 r1137  
    7676 
    7777 
    78 bMotion_abstract_register "nazi1" 
    79 bMotion_abstract_batchadd "nazi1" [list "%%: \"you're\"" "their what?" "s/your/you're/"] 
     78bMotion_abstract_register "nazi1" [list "%%: \"you're\"" "their what?" "s/your/you're/"] 
    8079 
    81 bMotion_abstract_register "nazi2" 
    82 bMotion_abstract_batchadd "nazi2" [list "Invalid regular expression." "You suck at the regular expression syntax." "/detects invalid regexp use" "%%: +/" "s/you/suck/"] 
     80bMotion_abstract_register "nazi2" [list "Invalid regular expression." "You suck at the regular expression syntax." "/detects invalid regexp use" "%%: +/" "s/you/suck/"] 
    8381 
    8482 
  • trunk/plugins/en/complex_nightmare.tcl

    r955 r1137  
    11451145bMotion_abstract_add "goodnights" "I hope you have a dream about %VAR{nicemare} %VAR{smiles}" 
    11461146 
    1147 bMotion_abstract_add "randomStuff" "/daydreams about %VAR{nicemare} %VAR{smiles}"  
     1147bMotion_abstract_add "randomStuff" "/daydreams about %VAR{nicemare} %VAR{smiles}" 
    11481148bMotion_abstract_add "randomStuff" "aw%REPEAT{2:8:w}... look! It's %VAR{nicemare}%|%VAR{smiles}" 
    11491149 
  • trunk/plugins/en/complex_pack.tcl

    r936 r1137  
    2828  return 0 
    2929} 
    30  
  • trunk/plugins/en/complex_pants.tcl

    r936 r1137  
    3232} 
    3333 
    34 bMotion_abstract_register "hateitem" 
    35 bMotion_abstract_batchadd "hateitem" { 
     34bMotion_abstract_register "hateitem" { 
    3635  "so, i hate your %% too" 
    3736  "yeah me too, %ruser gave them to me and i've never liked them" 
  • trunk/plugins/en/complex_phonetic.tcl

    r936 r1137  
    8181                } elseif { $letter == " " } { 
    8282                        set line "$line " 
    83                 }  
     83                } 
    8484        } 
    8585 
     
    9494        } 
    9595 
    96         return $line  
     96        return $line 
    9797} 
    9898# end bMotion_plugin_complex_phonetic_xform 
     
    124124#  bMotion_plugin_output_asshat procedure 
    125125# make the phonetic asshat plugin a general output filter 
    126 proc bMotion_plugin_output_asshat { channel text } {  
     126proc bMotion_plugin_output_asshat { channel text } { 
    127127        return [ bMotion_plugin_complex_phonetic_xform $text 1 ] 
    128128} 
     
    131131#  bMotion_plugin_output_phonetic procedure 
    132132# make the phonetic plugin a general output filter 
    133 proc bMotion_plugin_output_phonetic { channel text } {  
     133proc bMotion_plugin_output_phonetic { channel text } { 
    134134        return [ bMotion_plugin_complex_phonetic_xform $text 0 ] 
    135135} 
  • trunk/plugins/en/complex_pokemon.tcl

    r1112 r1137  
    8282        checkPokemon "Damoachu" $channel 
    8383        bMotionDoAction $channel $nick "Damoa...chu!" 
    84         if {$who == ""} {  
     84        if {$who == ""} { 
    8585          bMotionDoAction $channel $nick "*monkey* *monkey* *monkey* *squirtle*" 
    8686        } else { 
  • trunk/plugins/en/complex_questions.tcl

    r1123 r1137  
    460460                                        return 1 
    461461                                } 
    462                                 bMotionDoAction $channel "" "%VAR{cracker_your_hats_current}"  
     462                                bMotionDoAction $channel "" "%VAR{cracker_your_hats_current}" 
    463463                                return 1 
    464464                        } 
     
    478478                                        return 1 
    479479                                } 
    480                                 bMotionDoAction $channel $handle "%VAR{cracker_handle_hats_current}"  
     480                                bMotionDoAction $channel $handle "%VAR{cracker_handle_hats_current}" 
    481481                                return 1 
    482482 
     
    586586## end sid's functions 
    587587 
    588 bMotion_abstract_register "question_what_fact_wrapper" 
    589 bMotion_abstract_batchadd "question_what_fact_wrapper" { 
     588bMotion_abstract_register "question_what_fact_wrapper" { 
    590589  "%%" 
    591590  "%% i guess" 
     
    595594} 
    596595 
    597 bMotion_abstract_register "question_want_reply_wrapper" 
    598 bMotion_abstract_batchadd "question_want_reply_wrapper" { 
     596bMotion_abstract_register "question_want_reply_wrapper" { 
    599597  "Why? I've got %VAR{sillyThings}!" 
    600598  "With %VAR{sillyThings} I have no need for anything else." 
     
    612610} 
    613611 
    614 bMotion_abstract_register "question_colour_wrapper" 
    615 bMotion_abstract_batchadd "question_colour_wrapper" { 
     612bMotion_abstract_register "question_colour_wrapper" { 
    616613  "%VAR{colours}" 
    617614  "hmm.. %VAR{colours}, I think" 
  • trunk/plugins/en/complex_readings.tcl

    r936 r1137  
    22# 
    33# vim: fdm=indent fdn=1 
    4   
     4 
    55############################################################################### 
    66# This is a bMotion plugin 
     
    2727} 
    2828 
    29 bMotion_abstract_register "readings_scan" 
    30 bMotion_abstract_batchadd "readings_scan" { 
     29bMotion_abstract_register "readings_scan" { 
    3130  "/scans %%" 
    3231  "/analyses %%" 
     
    3635} 
    3736 
    38 bMotion_abstract_register "readings_result" 
    39 bMotion_abstract_batchadd "readings_result" { 
     37bMotion_abstract_register "readings_result" { 
    4038  "%%: That reads as %NUMBER{10000} %VAR{units}." 
    4139  "%SETTING{complex:readings:reading:reading:_} levels of %NUMBER{101} percent detected." 
  • trunk/plugins/en/complex_replicate.tcl

    r999 r1137  
    2121 
    2222        #make it so 
    23         if [regexp -nocase "^it so$" $details] {  
     23        if [regexp -nocase "^it so$" $details] { 
    2424                bMotionDoAction $channel $nick "/makes it so for %%" 
    2525                bMotion_plugins_settings_set "system" "lastdonefor" $channel "" $nick 
  • trunk/plugins/en/complex_scrap.tcl

    r1135 r1137  
    1 #  
     1# 
    22# 
    33# vim: fdm=indent fdn=1 
     
    3737    } 
    3838 
    39 # outputtype = 0 <-- regular output     
    40 # outputtype = 1 <-- silly output     
    41 # outputtype = 2 <-- adult output     
    42 # outputtype = 3 <-- silly adult output     
     39# outputtype = 0 <-- regular output 
     40# outputtype = 1 <-- silly output 
     41# outputtype = 2 <-- adult output 
     42# outputtype = 3 <-- silly adult output 
    4343 
    4444    # quality 
     
    129129} 
    130130 
    131 bMotion_abstract_register "scrap_qualities" 
    132 bMotion_abstract_batchadd "scrap_qualities" { 
     131bMotion_abstract_register "scrap_qualities" { 
    133132  "broken" 
    134133  "cheap" 
     
    162161} 
    163162 
    164 bMotion_abstract_register "scrap_adjectives" 
    165 bMotion_abstract_batchadd "scrap_adjectives" { 
     163bMotion_abstract_register "scrap_adjectives" { 
    166164  "broken down" 
    167165  "greasy" 
     
    218216bMotion_abstract_add_filter "scrap_adjectives" "mamoth" 
    219217 
    220 bMotion_abstract_register "scrap_power_adjectives" 
    221 bMotion_abstract_batchadd "scrap_power_adjectives" { 
     218bMotion_abstract_register "scrap_power_adjectives" { 
    222219  "super powered" 
    223220  "steam powered" 
     
    244241} 
    245242 
    246 bMotion_abstract_register "scrap_construction" 
    247 bMotion_abstract_batchadd "scrap_construction" { 
     243bMotion_abstract_register "scrap_construction" { 
    248244  "barge" 
    249245  "submarine" 
     
    304300} 
    305301 
    306 bMotion_abstract_register "scrap_silly_qualities_t" 
    307 bMotion_abstract_batchadd "scrap_silly_qualities_t" { 
     302bMotion_abstract_register "scrap_silly_qualities_t" { 
    308303  "weird" 
    309304  "strange" 
     
    318313} 
    319314 
    320 bMotion_abstract_register "scrap_silly_adjectives_t" 
    321 bMotion_abstract_batchadd "scrap_silly_adjectives_t" { 
     315bMotion_abstract_register "scrap_silly_adjectives_t" { 
    322316  "spotty" 
    323317  "funny" 
     
    342336} 
    343337 
    344 bMotion_abstract_register "scrap_silly_power_adjectives_t" 
    345 bMotion_abstract_batchadd "scrap_silly_power_adjectives_t" { 
     338bMotion_abstract_register "scrap_silly_power_adjectives_t" { 
    346339  "lunar powered" 
    347340  "psychicly charged" 
     
    354347} 
    355348 
    356 bMotion_abstract_register "scrap_silly_construction_t" 
    357 bMotion_abstract_batchadd "scrap_silly_construction_t" { 
     349bMotion_abstract_register "scrap_silly_construction_t" { 
    358350  "blamanche" 
    359351  "fork" 
     
    408400bMotion_abstract_add_filter "scrap_silly_construction_t" "coktail machine" 
    409401 
    410 bMotion_abstract_register "scrap_adult_qualities_t" 
    411 bMotion_abstract_batchadd "scrap_adult_qualities_t" { 
     402bMotion_abstract_register "scrap_adult_qualities_t" { 
    412403  "well formed" 
    413404  "well rounded" 
    414405  "slinky" 
    415406  "slender" 
    416   "slim"   
     407  "slim" 
    417408  "voluptuous" 
    418409  "bound" 
     
    421412} 
    422413 
    423 bMotion_abstract_register "scrap_adult_adjectives_t" 
    424 bMotion_abstract_batchadd "scrap_adult_adjectives_t" { 
     414bMotion_abstract_register "scrap_adult_adjectives_t" { 
    425415  "norty" 
    426416  "vary norty" 
     
    449439  "shagging" 
    450440  "fucking" 
    451   "screwing"   
     441  "screwing" 
    452442  "bulging" 
    453443  "tight" 
     
    481471bMotion_abstract_add_filter "scrap_adult_adjectives_t" "girating" 
    482472 
    483 bMotion_abstract_register "scrap_adult_power_adjectives_t" 
    484 bMotion_abstract_batchadd "scrap_adult_power_adjectives_t" { 
     473bMotion_abstract_register "scrap_adult_power_adjectives_t" { 
    485474  "jizz powered" 
    486475  "love juice powered" 
     
    491480} 
    492481 
    493 bMotion_abstract_register "scrap_adult_construction_t" 
    494 bMotion_abstract_batchadd "scrap_adult_construction_t" { 
     482bMotion_abstract_register "scrap_adult_construction_t" { 
    495483  "dildo" 
    496484  "love doll" 
     
    513501  "tongue" 
    514502  "lip" 
    515   "mouth"  
     503  "mouth" 
    516504  "teenager" 
    517505  "prostitute" 
     
    520508  "wench" 
    521509  "bitch" 
    522   "mistress"  
     510  "mistress" 
    523511  "box" 
    524512  "dominatrix" 
     
    543531 
    544532#create the big lists :) 
    545 bMotion_abstract_register "scrap_silly_qualities" 
    546 bMotion_abstract_batchadd "scrap_silly_qualities" { 
     533bMotion_abstract_register "scrap_silly_qualities" { 
    547534  "%VAR{scrap_qualities}" 
    548535  "%VAR{scrap_silly_qualities_t}" 
    549536} 
    550 bMotion_abstract_register "scrap_silly_power_adjectives" 
    551 bMotion_abstract_batchadd "scrap_silly_power_adjectives" { 
     537bMotion_abstract_register "scrap_silly_power_adjectives" { 
    552538  "%VAR{scrap_power_adjectives}" 
    553539  "%VAR{scrap_silly_power_adjectives_t}" 
    554540} 
    555 bMotion_abstract_register "scrap_silly_adjectives" 
    556 bMotion_abstract_batchadd "scrap_silly_adjectives" { 
     541bMotion_abstract_register "scrap_silly_adjectives" { 
    557542  "%VAR{scrap_adjectives}" 
    558543  "%VAR{scrap_silly_adjectives_t}" 
    559544} 
    560 bMotion_abstract_register "scrap_silly_construction" 
    561 bMotion_abstract_batchadd "scrap_silly_construction" { 
     545bMotion_abstract_register "scrap_silly_construction" { 
    562546  "%VAR{scrap_construction}" 
    563547  "%VAR{scrap_silly_construction_t}" 
    564548} 
    565549 
    566 bMotion_abstract_register "scrap_adult_qualities" 
    567 bMotion_abstract_batchadd "scrap_adult_qualities" { 
     550bMotion_abstract_register "scrap_adult_qualities" { 
    568551  "%VAR{scrap_qualities}" 
    569552  "%VAR{scrap_adult_qualities_t}" 
    570553} 
    571 bMotion_abstract_register "scrap_adult_power_adjectives" 
    572 bMotion_abstract_batchadd "scrap_adult_power_adjectives" { 
     554bMotion_abstract_register "scrap_adult_power_adjectives" { 
    573555  "%VAR{scrap_power_adjectives}" 
    574556  "%VAR{scrap_adult_power_adjectives_t}" 
    575557} 
    576 bMotion_abstract_register "scrap_adult_adjectives" 
    577 bMotion_abstract_batchadd "scrap_adult_adjectives" { 
     558bMotion_abstract_register "scrap_adult_adjectives" { 
    578559  "%VAR{scrap_adjectives}" 
    579560  "%VAR{scrap_adult_adjectives_t}" 
    580561} 
    581 bMotion_abstract_register "scrap_adult_construction" 
    582 bMotion_abstract_batchadd "scrap_adult_construction" { 
     562bMotion_abstract_register "scrap_adult_construction" { 
    583563  "%VAR{scrap_construction}" 
    584564  "%VAR{scrap_adult_construction_t}" 
    585565} 
    586566 
    587 bMotion_abstract_register "scrap_silly_adult_qualities" 
    588 bMotion_abstract_batchadd "scrap_silly_adult_qualities" { 
     567bMotion_abstract_register "scrap_silly_adult_qualities" { 
    589568  "%VAR{scrap_qualities}" 
    590569  "%VAR{scrap_silly_qualities_t}" 
    591570} 
    592 bMotion_abstract_register "scrap_silly_adult_power_adjectives" 
    593 bMotion_abstract_batchadd "scrap_silly_adult_power_adjectives" { 
     571bMotion_abstract_register "scrap_silly_adult_power_adjectives" { 
    594572  "%VAR{scrap_power_adjectives}" 
    595573  "%VAR{scrap_silly_power_adjectives_t}" 
    596574} 
    597 bMotion_abstract_register "scrap_silly_adult_adjectives" 
    598 bMotion_abstract_batchadd "scrap_silly_adult_adjectives" { 
     575bMotion_abstract_register "scrap_silly_adult_adjectives" { 
    599576  "%VAR{scrap_adjectives}" 
    600577  "%VAR{scrap_silly_adjectives_t}" 
    601578} 
    602 bMotion_abstract_register "scrap_silly_adult_construction" 
    603 bMotion_abstract_batchadd "scrap_silly_adult_construction" { 
     579bMotion_abstract_register "scrap_silly_adult_construction" { 
    604580  "%VAR{scrap_construction}" 
    605581  "%VAR{scrap_silly_construction_t}" 
     
    607583 
    608584#duplicate for second adjectives 
    609 bMotion_abstract_register "scrap_silly_adjectives2" 
    610 bMotion_abstract_batchadd "scrap_silly_adjectives2" { 
     585bMotion_abstract_register "scrap_silly_adjectives2" { 
    611586  "%VAR{scrap_silly_adjectives}" 
    612587} 
    613 bMotion_abstract_register "scrap_adult_adjectives2" 
    614 bMotion_abstract_batchadd "scrap_adult_adjectives2" { 
     588bMotion_abstract_register "scrap_adult_adjectives2" { 
    615589  "%VAR{scrap_adult_adjectives}" 
    616590} 
    617 bMotion_abstract_register "scrap_silly_adult_adjectives2" 
    618 bMotion_abstract_batchadd "scrap_silly_adult_adjectives2" { 
     591bMotion_abstract_register "scrap_silly_adult_adjectives2" { 
    619592  "%VAR{scrap_silly_adult_adjectives}" 
    620593} 
    621 bMotion_abstract_register "scrap_adjectives2" 
    622 bMotion_abstract_batchadd "scrap_adjectives2" { 
     594bMotion_abstract_register "scrap_adjectives2" { 
    623595  "%VAR{scrap_adjectives}" 
    624596} 
  • trunk/plugins/en/complex_sex.tcl

    r936 r1137  
    1717proc bMotion_plugin_complex_sex_go_down_on { nick host handle channel text } { 
    1818  global botnicks 
    19   if [regexp -nocase "${botnicks}:?,? (please)?go down on (.+)" $text ming ming1 ming2 details] {     
    20     bMotionGoDownOn $channel $details $nick     
     19  if [regexp -nocase "${botnicks}:?,? (please)?go down on (.+)" $text ming ming1 ming2 details] { 
     20    bMotionGoDownOn $channel $details $nick 
    2121    return 1 
    2222  } 
     
    3434 
    3535proc bMotionGoDownOn {channel nick forNick} { 
    36     global mood botnick  
     36    global mood botnick 
    3737    regsub {^([^ ]+)( .+)?} $nick {\1} nick 
    3838    bMotion_putloglev d * "bMotion: Was asked to go down on '$nick' in $channel by $forNick" 
    39     if {[regexp -nocase "(himself|herself|your?self)" $nick] || [isbotnick $nick]} {  
     39    if {[regexp -nocase "(himself|herself|your?self)" $nick] || [isbotnick $nick]} { 
    4040      bMotionDoAction $channel "" "No. (ERR_EXCESS_RIBS)" 
    4141      return 0 
  • trunk/plugins/en/complex_snap.tcl

    r936 r1137  
    2020 
    2121    set ctime [clock seconds] 
    22      
     22 
    2323    if { 
    2424        ($text == [bMotion_plugins_settings_get "complex:snap" $channel "" "text"]) && 
  • trunk/plugins/en/complex_sosyour.tcl

    r979 r1137  
    3333} 
    3434 
    35 bMotion_abstract_register "sosyours" 
    36 bMotion_abstract_batchadd "sosyours" [list "so's your face" "you're %2"] 
     35bMotion_abstract_register "sosyours" [list "so's your face" "you're %2"] 
    3736 
  • trunk/plugins/en/complex_spoonerism.tcl

    r1136 r1137  
    9595 
    9696 
    97 bMotion_abstract_register "spoonerisms" 
    98 bMotion_abstract_batchadd "spoonerisms" [list "%% ... more like %2, am i rite?" "%% ... more like %2, am i right?" "%%? More like %2, am I correct?" "/. o O (%2)"] 
     97bMotion_abstract_register "spoonerisms" [list "%% ... more like %2, am i rite?" "%% ... more like %2, am i right?" "%%? More like %2, am I correct?" "/. o O (%2)"] 
    9998 
    10099bMotion_abstract_register "xhery_male" [list "I'd %% her %2"] 
  • trunk/plugins/en/complex_sport.tcl

    r1112 r1137  
    2525} 
    2626 
    27 bMotion_abstract_register "sport_superadjectives" 
    28 bMotion_abstract_batchadd "sport_superadjectives" { 
     27bMotion_abstract_register "sport_superadjectives" { 
    2928  "extreme" 
    3029  "super" 
     
    6564} 
    6665 
    67 bMotion_abstract_register "sport_adjectives" 
    68 bMotion_abstract_batchadd "sport_adjectives" { 
     66bMotion_abstract_register "sport_adjectives" { 
    6967  "downhill" 
    7068  "uphill" 
     
    102100} 
    103101 
    104 bMotion_abstract_register "sport_sports" 
    105 bMotion_abstract_batchadd "sport_sports" { 
     102bMotion_abstract_register "sport_sports" { 
    106103        "archery" 
    107104        "athletics" 
     
    191188} 
    192189 
    193 bMotion_abstract_register "sport_adult_superadjectives_t" 
    194 bMotion_abstract_batchadd "sport_adult_superadjectives_t" { 
     190bMotion_abstract_register "sport_adult_superadjectives_t" { 
    195191  "nude" 
    196192  "horny" 
     
    201197} 
    202198 
    203 bMotion_abstract_register "sport_adult_adjectives_t" 
    204 bMotion_abstract_batchadd "sport_adult_adjectives_t" { 
     199bMotion_abstract_register "sport_adult_adjectives_t" { 
    205200  "bent" 
    206201  "%ruser" 
     
    219214} 
    220215 
    221 bMotion_abstract_register "sport_adult_sports_t" 
    222 bMotion_abstract_batchadd "sport_adult_sports_t" { 
     216bMotion_abstract_register "sport_adult_sports_t" { 
    223217  "chicken fancying" 
    224218        "vomiting" 
     
    236230 
    237231#create the big lists :) 
    238 bMotion_abstract_register "sport_adult_superadjectives" 
    239 bMotion_abstract_batchadd "sport_adult_superadjectives" { 
     232bMotion_abstract_register "sport_adult_superadjectives" { 
    240233  "%VAR{sport_adjectives}" 
    241234  "%VAR{sport_adult_superadjectives_t}" 
    242235        "%VAR{scrap_adult_adjectives_t}" 
    243236} 
    244 bMotion_abstract_register "sport_adult_adjectives" 
    245 bMotion_abstract_batchadd "sport_adult_adjectives" { 
     237bMotion_abstract_register "sport_adult_adjectives" { 
    246238  "%VAR{sport_adjectives}" 
    247239  "%VAR{sport_adult_adjectives_t}" 
    248240        "%VAR{scrap_adult_construction_t}" 
    249241} 
    250 bMotion_abstract_register "sport_adult_sports" 
    251 bMotion_abstract_batchadd "sport_adult_sports" { 
     242bMotion_abstract_register "sport_adult_sports" { 
    252243  "%VAR{sport_sports}" 
    253244  "%VAR{sport_adult_sports_t}" 
  • trunk/plugins/en/complex_summon.tcl

    r1121 r1137  
    6363                                set msg [bMotionDoInterpolation "%VAR{summon_privmsg_response}" $nick ""] 
    6464                                # replacements (TODO: may not be needed after doInterpolation) 
    65                                 regsub "%channel" $msg $channel msg  
     65                                regsub "%channel" $msg $channel msg 
    6666                                regsub "%%" $msg $nick msg 
    6767                                # notify 
     
    7070                        return 1 
    7171                } 
    72         }  
     72        } 
    7373        bMotion_putloglev d * "bMotion: (summon) $nick doesn't know what they're doing" 
    7474        # poke fun at the idiot 
    7575        bMotionDoAction $channel $nick "%VAR{summon_channel_idiot}" 
    76         return 1  
     76        return 1 
    7777} 
    7878 
     
    8080bMotion_plugin_add_complex "summon" "^!summon" 100 "bMotion_plugin_complex_summon" "en" 
    8181 
    82 bMotion_abstract_register "summon_channel_response_notthere" 
    83 bMotion_abstract_batchadd "summon_channel_response_notthere" { 
     82bMotion_abstract_register "summon_channel_response_notthere" { 
    8483        "yoooo hooooo! %%!" 
    8584        "hello there, %%?" 
     
    9190} 
    9291 
    93 bMotion_abstract_register "summon_channel_response" 
    94 bMotion_abstract_batchadd "summon_channel_response" { 
     92bMotion_abstract_register "summon_channel_response" { 
    9593        "/prods at %% with %VAR{sillyThings}" 
    9694        "through my awesome powers of telepathy, I shall summon %%!!" 
     
    103101bMotion_abstract_add_filter "summon_channel_response" "%noun" 
    104102 
    105 bMotion_abstract_register "summon_privmsg_response" 
    106 bMotion_abstract_batchadd "summon_privmsg_response" { 
     103bMotion_abstract_register "summon_privmsg_response" { 
    107104        "FYI: %% was looking for you on %channel" 
    108105        "just so you know %% was asking about you on %channel" 
     
    114111bMotion_abstract_add_filter "summon_privmsg_response" "%chan(?!nel)" 
    115112 
    116 bMotion_abstract_register "summon_channel_idiot" 
    117 bMotion_abstract_batchadd "summon_channel_idiot" { 
     113bMotion_abstract_register "summon_channel_idiot" { 
    118114        "ANNOUNCEMENT: %% is an idiot. That is all." 
    119115        "Pay no attention to %%, the village idiot." 
     
    127123} 
    128124 
    129 bMotion_abstract_register "summon_bot" 
    130 bMotion_abstract_batchadd "summon_bot" { 
     125bMotion_abstract_register "summon_bot" { 
    131126        "oh! here i am!" 
    132127        "sup" 
  • trunk/plugins/en/complex_supermarkets.tcl

    r1108 r1137  
    1414 
    1515proc bMotion_plugin_complex_supermarket { nick host handle channel text } { 
    16   if {![bMotion_interbot_me_next $channel]} {  
    17                 return 1  
     16  if {![bMotion_interbot_me_next $channel]} { 
     17                return 1 
    1818        } 
    1919 
  • trunk/plugins/en/complex_taunt.tcl

    r936 r1137  
    4949 
    5050### and our abstracts... 
    51 bMotion_abstract_register "randomTauntPrefixes" 
    52 bMotion_abstract_batchadd "randomTauntPrefixes" { 
     51bMotion_abstract_register "randomTauntPrefixes" { 
    5352  "idiot" 
    5453  "stupid" 
     
    7675} 
    7776 
    78 bMotion_abstract_register "randomTauntSuffixes" 
    79 bMotion_abstract_batchadd "randomTauntSuffixes" { 
     77bMotion_abstract_register "randomTauntSuffixes" { 
    8078  "fool" 
    8179  "idiot" 
  • trunk/plugins/en/complex_techsupport.tcl

    r936 r1137  
    2424# abstracts 
    2525 
    26 bMotion_abstract_register "tech_software" 
    27 bMotion_abstract_batchadd "tech_software" { 
     26bMotion_abstract_register "tech_software" { 
    2827  "windows" 
    2928  "xml spy" 
     
    3837} 
    3938 
    40 bMotion_abstract_register "tech_answer" 
    41 bMotion_abstract_batchadd "tech_answer" { 
     39bMotion_abstract_register "tech_answer" { 
    4240  "I just bought %VAR{tech_software} and I can't get it to %VAR{tech_problem}, I've tried %VAR{tech_tries} and it still won't work" 
    4341  "I've just got %VAR{tech_software}, and it won't %VAR{tech_problem}. I've tried everything including %VAR{tech_tries} but nothing helps" 
     
    4644} 
    4745 
    48 bMotion_abstract_register "tech_problem" 
    49 bMotion_abstract_batchadd "tech_problem" { 
     46bMotion_abstract_register "tech_problem" { 
    5047  "install" 
    5148  "work" 
     
    5956} 
    6057 
    61 bMotion_abstract_register "tech_tries" 
    62 bMotion_abstract_batchadd "tech_tries" { 
     58bMotion_abstract_register "tech_tries" { 
    6359  "sacrificing my boss" 
    6460  "reinstalling it" 
     
    7268} 
    7369 
    74 bMotion_abstract_register "tech_functions" 
    75 bMotion_abstract_batchadd "tech_functions" { 
     70bMotion_abstract_register "tech_functions" { 
    7671  "virus-scan" 
    7772  "validate" 
  • trunk/plugins/en/complex_trivia.tcl

    r936 r1137  
    268268} 
    269269 
    270 bMotion_abstract_register "bahs" 
    271 bMotion_abstract_batchadd "bahs" [list "dang" "blast" "i was close %VAR{unsmiles}" "%colen" "curse you %%" "blah" "bleh" "damnit" "S%REPEAT{1:4:O} CLOSE" "no fair, %ruser told me the wrong answer %VAR{unsmiles}"] 
    272  
    273 bMotion_abstract_register "trivia_wins" 
    274 bMotion_abstract_batchadd "trivia_wins" [list "%VAR{harhars}" "own3d" "PWND!" "yes!" "w%REPEAT{3:6:o}!" "go %me, go %me!" "whe%REPEAT{3:7:e}" "muhar" "winnar!" "in your face, %ruser!"] 
    275  
    276 bMotion_abstract_register "trivia_loses" 
    277 bMotion_abstract_batchadd "trivia_loses" [list "hey stop copying me %VAR{unsmiles}" "i was going to say that next" "hay you're cheating %VAR{unsmiles}" "you're in league with the bot, i know it" "that's not the right answer; the right answer is obviously '%VAR{sillyThings}'" "feh" "*cough*google*cough*" "toss" "%VAR{unsmiles}" "I was distracted by %VAR{sillyThings}" "i wish i knew as much as you. really." "/dumb" "/stupid" "i knew that"] 
    278  
    279  
     270bMotion_abstract_register "bahs" [list "dang" "blast" "i was close %VAR{unsmiles}" "%colen" "curse you %%" "blah" "bleh" "damnit" "S%REPEAT{1:4:O} CLOSE" "no fair, %ruser told me the wrong answer %VAR{unsmiles}"] 
     271 
     272bMotion_abstract_register "trivia_wins" [list "%VAR{harhars}" "own3d" "PWND!" "yes!" "w%REPEAT{3:6:o}!" "go %me, go %me!" "whe%REPEAT{3:7:e}" "muhar" "winnar!" "in your face, %ruser!"] 
     273 
     274bMotion_abstract_register "trivia_loses" [list "hey stop copying me %VAR{unsmiles}" "i was going to say that next" "hay you're cheating %VAR{unsmiles}" "you're in league with the bot, i know it" "that's not the right answer; the right answer is obviously '%VAR{sillyThings}'" "feh" "*cough*google*cough*" "toss" "%VAR{unsmiles}" "I was distracted by %VAR{sillyThings}" "i wish i knew as much as you. really." "/dumb" "/stupid" "i knew that"] 
  • trunk/plugins/en/complex_unf.tcl

    r1114 r1137  
    1313 
    1414bMotion_plugin_add_complex "unf" "((~(rarr|oof|unf)~)|unf|lick(s)?) %botnicks" 100 bMotion_plugin_complex_unf "en" 
    15    
     15 
    1616proc bMotion_plugin_complex_unf { nick host handle channel text } { 
    1717  set bodyPaintNick [bMotion_plugins_settings_get "complexaction:hands" "paint_nick" "" ""] 
    1818  set bodyPaintChannel [bMotion_plugins_settings_get "complexaction:hands" "paint_channel" "" ""] 
    19    
     19 
    2020  if {$bodyPaintNick != "" && $bodyPaintChannel == $channel && $nick == $bodyPaintNick} { 
    2121    bMotionDoAction $channel $bodyPaintNick "OOoooooooooooo thanks %%, thats some good tongue action" 
    22     bMotion_plugins_settings_set "complexaction:hands" "paint_nick" "" "" ""  
    23     bMotion_plugins_settings_set "complexaction:hands" "paint_channel" "" "" ""  
     22    bMotion_plugins_settings_set "complexaction:hands" "paint_nick" "" "" "" 
     23    bMotion_plugins_settings_set "complexaction:hands" "paint_channel" "" "" "" 
    2424  } 
    2525  bMotionGetHorny 
  • trunk/plugins/en/complex_want_catch.tcl

    r1078 r1137  
    3838        global botnicks 
    3939  if [regexp -nocase {^mm+[,.]* (.+)} $text matches item] { 
    40      
     40 
    4141                if {![bMotion_filter_sillyThings $item]} { 
    4242                        return 0 
     
    4747        return 1 
    4848    } 
    49      
     49 
    5050    bMotion_abstract_add "sillyThings" $item 
    5151         
     
    6161        global botnicks 
    6262  if [regexp -nocase {^(.+)\+{2}$} $text matches item] { 
    63      
     63 
    6464                if {![bMotion_filter_sillyThings $item]} { 
    6565                        return 0 
     
    7171        return 1 
    7272    } 
    73      
     73 
    7474    bMotion_abstract_add "sillyThings" $item 
    7575         
     
    134134} 
    135135 
    136 bMotion_abstract_register "gotone" 
    137 bMotion_abstract_batchadd "gotone" [list "I've already got one%|%BOT\[are you sure?\]%|yes yes, it's very nice" "I already have one of those." "I had one of them the other week. They're very nice, aren't they?" "r"] 
     136bMotion_abstract_register "gotone" [list "I've already got one%|%BOT\[are you sure?\]%|yes yes, it's very nice" "I already have one of those." "I had one of them the other week. They're very nice, aren't they?" "r"] 
    138137 
    139 bMotion_abstract_register "betters" 
    140 bMotion_abstract_batchadd "betters" [list "mm%REPEAT{1:5:m}, %VAR{sillyThings:strip}" "%VAR{sillyThings:strip} > %%" "%% < %VAR{sillyThings:strip}" "%%++"] 
     138bMotion_abstract_register "betters" [list "mm%REPEAT{1:5:m}, %VAR{sillyThings:strip}" "%VAR{sillyThings:strip} > %%" "%% < %VAR{sillyThings:strip}" "%%++"] 
  • trunk/plugins/en/complex_wins.tcl

    r936 r1137  
    2222} 
    2323 
    24 bMotion_abstract_register "wins" 
    25 bMotion_abstract_batchadd "wins" { 
     24bMotion_abstract_register "wins" { 
    2625  "victory for %me%colen" 
    2726  "this victory strengthens the soul of %me!" 
  • trunk/plugins/en/complex_woot.tcl

    r936 r1137  
    2121} 
    2222 
    23 bMotion_abstract_register "woots" 
    24 bMotion_abstract_batchadd "woots" { 
     23bMotion_abstract_register "woots" { 
    2524  "i like %%" 
    2625  "\\o/" 
  • trunk/plugins/en/complex_worried.tcl

    r936 r1137  
    2424} 
    2525 
    26 bMotion_abstract_register "dontworrys" 
    27 bMotion_abstract_batchadd "dontworrys" { 
     26bMotion_abstract_register "dontworrys" { 
    2827  "Don't you worry about %%. I'll worry about blank." 
    2928} 
  • trunk/plugins/en/complex_wrong_console.tcl

    r1106 r1137  
    1616# bMotion_plugin_complex_wrong_console 
    1717proc bMotion_plugin_complex_wrong_console { nick host handle channel text } { 
    18         if {![bMotion_interbot_me_next $channel]} {  
     18        if {![bMotion_interbot_me_next $channel]} { 
    1919                return 0 
    2020        } 
     
    2626 
    2727# random wrong console responses 
    28 bMotion_abstract_register "randomWrongConsoleReply" 
    29 bMotion_abstract_batchadd "randomWrongConsoleReply" { 
     28bMotion_abstract_register "randomWrongConsoleReply" { 
    3029        "yay! %% can't get it right" 
    3130        "why don't you tell us your password as well?" 
  • trunk/plugins/en/irc_join.tcl

    r1112 r1137  
    1111 
    1212 
    13 proc bMotion_plugins_irc_default_join { nick host handle channel text } {  
     13proc bMotion_plugins_irc_default_join { nick host handle channel text } { 
    1414        bMotion_putloglev 4 * "bMotion_plugins_irc_default_join $nick $host $handle $channel $text" 
    1515 
     
    112112bMotion_plugin_add_irc_event "default join" "join" ".*" 40 "bMotion_plugins_irc_default_join" "en" 
    113113 
    114 bMotion_abstract_register "insult_joins" 
    115 bMotion_abstract_batchadd "insult_joins" [list "%ruser: yeah, %% does suckOH HI %%!" "\[%%\] I'm a %VAR{PROM}%|%VAR{wrong_infoline}" "\[%%\] I love %ruser%|%VAR{wrong_infoline}" "/looks at %%%|so THAT'S where my oil-skin thong got to!" ] 
     114bMotion_abstract_register "insult_joins" [list "%ruser: yeah, %% does suckOH HI %%!" "\[%%\] I'm a %VAR{PROM}%|%VAR{wrong_infoline}" "\[%%\] I love %ruser%|%VAR{wrong_infoline}" "/looks at %%%|so THAT'S where my oil-skin thong got to!" ] 
    116115 
    117 bMotion_abstract_register "wrong_infoline" 
    118 bMotion_abstract_batchadd "wrong_infoline" [list "oops, wrong infoline, sorry" "huk, wrong infoline" "whoops" "o wait not that infoline"] 
     116bMotion_abstract_register "wrong_infoline" [list "oops, wrong infoline, sorry" "huk, wrong infoline" "whoops" "o wait not that infoline"] 
    119117 
    120 bMotion_abstract_register "dislike_joins" 
    121 bMotion_abstract_batchadd "dislike_joins" [list "shut up" "o no it's %%" "oh no it's %%" "oh noes it's %% %VAR{unsmiles}" "meh" "oh, it's %ruser.%|\"yay\"" "oh, it's fuckmaster mc shitty white clownhorse ass jacket pubic face." "you look beautiful%|incidentally my favourite artist is picasso"] 
     118bMotion_abstract_register "dislike_joins" [list "shut up" "o no it's %%" "oh no it's %%" "oh noes it's %% %VAR{unsmiles}" "meh" "oh, it's %ruser.%|\"yay\"" "oh, it's fuckmaster mc shitty white clownhorse ass jacket pubic face." "you look beautiful%|incidentally my favourite artist is picasso"] 
  • trunk/plugins/en/irc_nick_away.tcl

    r936 r1137  
    5858  bMotion_plugins_settings_set "complex:returned" "lastnick" $channel "" $newnick 
    5959 
    60   if {[regexp -nocase "(away|sleep|gone|afk|zzz+|bed|slaap|w(0|e|3|o)rk|school)" $nick] &&  
     60  if {[regexp -nocase "(away|sleep|gone|afk|zzz+|bed|slaap|w(0|e|3|o)rk|school)" $nick] && 
    6161       ![regexp -nocase "(away|sleep|gone|afk|slaap|w(0|e|3|o)rk|school)" $newnick]} { 
    62      
     62 
    6363    bMotion_plugins_settings_set "system" "lastdonefor" $channel "" $nick 
    6464    bMotion_plugins_settings_set "system:join" "lastgreeted" $channel "" $newnick 
  • trunk/plugins/en/irc_quit.tcl

    r979 r1137  
    1111 
    1212 
    13 proc bMotion_plugins_irc_default_quit { nick host handle channel text } {  
     13proc bMotion_plugins_irc_default_quit { nick host handle channel text } { 
    1414 
    1515        #has something happened since we last spoke? 
     
    7272bMotion_plugin_add_irc_event "default part" "part" ".*" 15 "bMotion_plugins_irc_default_quit" "en" 
    7373 
    74 bMotion_abstract_register "departs-nice" 
    75 bMotion_abstract_batchadd "departs-nice" [list "bye %%" "i like them %VAR{smiles}" "i wish they didn't have to go %VAR{unsmiles}" "mmm %%"] 
     74bMotion_abstract_register "departs-nice" [list "bye %%" "i like them %VAR{smiles}" "i wish they didn't have to go %VAR{unsmiles}" "mmm %%"] 
    7675 
    77 bMotion_abstract_register "departs-nasty" 
    78 bMotion_abstract_batchadd "departs-nasty" [list "bye sucker" "i don't like them" "i hope they don't come back" "%%: AND DON'T COME BACK!" "See You Next Tuesday, %%!" "%%: don't let the door hit your ass on the way out%|because I don't want ass-prints on my new door!" "what a %VAR{insults} %VAR{unsmiles}"] 
     76bMotion_abstract_register "departs-nasty" [list "bye sucker" "i don't like them" "i hope they don't come back" "%%: AND DON'T COME BACK!" "See You Next Tuesday, %%!" "%%: don't let the door hit your ass on the way out%|because I don't want ass-prints on my new door!" "what a %VAR{insults} %VAR{unsmiles}"] 
  • trunk/plugins/en/output_NUMBER.tcl

    r1081 r1137  
    11# vim: fdm=indent fdn=1 
    22# 
    3   
     3 
    44############################################################################### 
    55# This is a bMotion plugin 
  • trunk/plugins/en/output_SETTING.tcl

    r1019 r1137  
    11# vim: fdm=indent fdn=1 
    22# 
    3   
     3 
    44############################################################################### 
    55# This is a bMotion plugin 
  • trunk/plugins/en/output_SMILEY.tcl

    r1112 r1137  
    11# vim: fdm=indent fdn=1 
    22# 
    3   
     3 
    44############################################################################### 
    55# This is a bMotion plugin 
  • trunk/plugins/en/output_TIME.tcl

    r1019 r1137  
    11# vim: fdm=indent fdn=1 
    22# 
    3   
     3 
    44############################################################################### 
    55# This is a bMotion plugin 
  • trunk/plugins/en/output_VAR.tcl

    r1112 r1137  
    11# vim: fdm=indent fdn=1 
    22# 
    3   
     3 
    44############################################################################### 
    55# This is a bMotion plugin 
     
    7777                                set var [subst $$abstract] 
    7878                                set replacement [pickRandom $var] 
    79                         }] {  
     79                        }] { 
    8080                                bMotion_putloglev d * "Unable to handle %VAR{$abstract}" 
    8181                                return "" 
     
    102102                                                        set prefix [pickRandom $prefixes] 
    103103                                                        set replacement "$prefix$replacement" 
    104                                                 }  
     104                                                } 
    105105                                                1 { 
    106106                                                        regsub "((an?|the|some|his|her|their) )?" $replacement "\\1%VAR{noun_prefix} " replacement 
  • trunk/plugins/en/output_censor.tcl

    r983 r1137  
    1212############################################################################### 
    1313 
    14 bMotion_plugin_add_output "censor" bMotion_plugin_output_censor 0 "en" 90  
     14bMotion_plugin_add_output "censor" bMotion_plugin_output_censor 0 "en" 90 
    1515 
    1616proc bMotion_plugin_output_censor { channel line } { 
  • trunk/plugins/en/output_channel.tcl

    r979 r1137  
    33# vim: fdm=indent fdn=1 
    44# 
    5   
     5 
    66############################################################################### 
    77# This is a bMotion plugin 
  • trunk/plugins/en/output_demon.tcl

    r1108 r1137  
    33# vim: fdm=indent fdn=1 
    44# 
    5   
     5 
    66############################################################################### 
    77# This is a bMotion plugin 
  • trunk/plugins/en/output_ebonics.tcl

    r961 r1137  
    2424                if [regexp -nocase {^([aeiou]?[^aeiou]+[aeiou])\w{2,}$} $word matches first] { 
    2525                        set word "${first}zzle" 
    26                 }  
     26                } 
    2727 
    2828                set word [string map -nocase {for fo} $word] 
  • trunk/plugins/en/output_english.tcl

    r1112 r1137  
    2525  # me ___s --> /me 
    2626  # me __[^s] --> I 
    27    
     27 
    2828  if [regexp -nocase {^me ([^ ]+) (.+)} $line matches first rest] { 
    2929    bMotion_putloglev 2 * "bMotion: output:english detected a me* line" 
  • trunk/plugins/en/output_homophone.tcl

    r1124 r1137  
    3131  foreach word $words { 
    3232    if {[bMotion_plugin_output_homophone_chance $homophone_rate]} { 
    33      
     33 
    3434      bMotion_putloglev 1 * "trying to trigger homophone on $word" 
    35        
     35 
    3636      # we might want to replace this word. iterate through all homophone sets. 
    37        
     37 
    3838      foreach homSet $homList { 
    3939        set homItems [split $homSet ":"] 
    40          
     40 
    4141        bMotion_putloglev 1 * "working with $homSet" 
    42          
     42 
    4343        set haveReplaced 0 
    44          
     44 
    4545        foreach item $homItems { 
    4646          # only try to keep replacing things if we haven't done so yet, to avoid cyclical replacements 
     
    4848            # is it a word we can replace, possibly with some punctuation around it? 
    4949            if {[regexp -nocase "^\[\\\,\\\:\\\;\\\.\\\!\\\?\\\-\\\"\\\'\]*($item)\[\\\,\\\:\\\;\\\.\\\!\\\?\\\-\\\"\\\'\]*$" $word fullWord cleanWord]} { 
    50              
     50 
    5151              # found a match! replace with a random word from the list 
    52              
     52 
    5353              bMotion_putloglev 1 * "$word matches $item, cleanWord is $cleanWord" 
    54              
     54 
    5555              set newWord [pickRandom $homItems] 
    5656              while { [string equal -nocase $cleanWord $newWord] } { 
    5757                set newWord [pickRandom $homItems] 
    5858              } 
    59              
     59 
    6060              set haveReplaced 1 
    61              
     61 
    6262              # now just change the word and it will be output below 
    6363              regsub -all -nocase "\\\w\+" $word $newWord word 
    64              
     64 
    6565              bMotion_putloglev 1 * "leaving with $word" 
    6666            } 
  • trunk/plugins/en/output_preprocess.tcl

    r987 r1137  
    33# vim: fdm=indent fdn=1 
    44# 
    5   
     5 
    66############################################################################### 
    77# This is a bMotion plugin 
  • trunk/plugins/en/output_rbot.tcl

    r1019 r1137  
    11# vim: fdm=indent fdn=1 
    22# 
    3   
     3 
    44############################################################################### 
    55# This is a bMotion plugin 
  • trunk/plugins/en/output_ruser.tcl

    r1033 r1137  
    11# vim: fdm=indent fdn=1 
    22# 
    3   
     3 
    44############################################################################### 
    55# This is a bMotion plugin 
  • trunk/plugins/en/output_stop.tcl

    r1132 r1137  
    11# vim: fdm=indent fdn=1 
    22# 
    3   
     3 
    44############################################################################### 
    55# This is a bMotion plugin 
  • trunk/plugins/en/output_switch.tcl

    r1132 r1137  
    11# vim: fdm=indent fdn=1 
    22# 
    3   
     3 
    44############################################################################### 
    55# This is a bMotion plugin 
  • trunk/plugins/en/output_typos.tcl

    r1125 r1137  
    132132proc bMotion_plugin_output_typos { channel line } { 
    133133        bMotion_putloglev 4 * "bMotion_plugin_output_typos $channel $line" 
    134   global bMotionSettings  
     134  global bMotionSettings 
    135135 
    136136  set typochance $bMotionSettings(typos) 
     
    187187} 
    188188 
    189 bMotion_plugin_add_output "typos" bMotion_plugin_output_typos 1 "all" 99  
     189bMotion_plugin_add_output "typos" bMotion_plugin_output_typos 1 "all" 99 
  • trunk/plugins/en/simple_general.tcl

    r1082 r1137  
    5555bMotion_plugin_add_simple "cunt" "^(cunt|twat|bollocks)" 80 [list "cunt" "twat" "bollocks" "bastards" "idiot" "wanker" "%VAR{prom_first}" "pile of %VAR{prom_first}" "%VAR{prom_first}ing %VAR{prom_first}ers"] "en" 
    5656 
    57  
    58 bMotion_plugin_add_simple "likea-catch" "i do love a good (.+)" 40 [list "me too %VAR{smiles}" "same!" ] "en"  
     57bMotion_plugin_add_simple "likea-catch" "i do love a good (.+)" 40 [list "me too %VAR{smiles}" "same!" ] "en" 
    5958bMotion_plugin_add_simple "secretcatch" "(secret|sekrit)" 40 [list "we all know %ruser likes to %VAR{dVerbs} themselves with a %VAR{dNouns} %VAR{smiles}" "it was %ruser!" "%VAR{ididntresponses}" ] "en" 
    6059bMotion_plugin_add_simple "andthan-catch" "and( then| than)" 10 [list "and then a %VAR{animals} came" "and then a bear came" "and then my %VAR{bodypart} %VAR{fellOffs}" "and thaaan?"] "en" 
  • trunk/plugins/en/simple_here.tcl

    r936 r1137  
    1515# abstracts 
    1616 
    17 bMotion_abstract_register "here_responses" 
    18 bMotion_abstract_batchadd "here_responses" { 
     17bMotion_abstract_register "here_responses" { 
    1918  "%VAR{nos}" 
    2019} 
  • trunk/plugins/en/simple_ick.tcl

    r1061 r1137  
    1515# abstracts 
    1616 
    17 bMotion_abstract_register "ick_sentences" 
    18 bMotion_abstract_batchadd "ick_sentences" { 
     17bMotion_abstract_register "ick_sentences" { 
    1918  "Don't picture %VAR{ick_males} and %VAR{ick_females} in %VAR{ick_wraps} and covered in %VAR{ick_covereds} %VAR{ick_fucks} each other %VAR{ick_locations}" 
    2019  "Don't picture %VAR{ick_females} %VAR{ick_fucks} %VAR{ick_males} %VAR{ick_dildos} %VAR{ick_locations}" 
     
    2221} 
    2322 
    24 bMotion_abstract_register "ick_males" 
    25 bMotion_abstract_batchadd "ick_males" {  
    26   "yourself"  
    27   "Jean-Luc Picard"  
    28   "the Pope"  
    29   "John Major"  
    30   "your dad"  
    31   "the entire crew of Voyager"  
     23bMotion_abstract_register "ick_males" { 
     24  "yourself" 
     25  "Jean-Luc Picard" 
     26  "the Pope" 
     27  "John Major" 
     28  "your dad" 
     29  "the entire crew of Voyager" 
    3230  "your mum" 
    3331  "Bill Gates" 
     
    4442  "Tim" 
    4543  "Brian" 
    46         "%ruser{male}" 
     44  "%ruser{male}" 
    4745} 
    4846 
    49 bMotion_abstract_register "ick_females" 
    50 bMotion_abstract_batchadd "ick_females" {  
    51   "the queen"  
    52   "your mum"  
    53   "Miss Marple"  
    54   "that really minging woman who was on Eurovision"  
     47bMotion_abstract_register "ick_females" { 
     48  "the queen" 
     49  "your mum" 
     50  "Miss Marple" 
     51  "that really minging woman who was on Eurovision" 
    5552  "Ling Xiaoyu" 
    5653  "Britney Spears" 
     
    6057  "Jade of Big Brother" 
    6158  "Davina McCall" 
    62         "%ruser{female}" 
     59  "%ruser{female}" 
    6360} 
    6461 
    65 bMotion_abstract_register "ick_wraps" 
    66 bMotion_abstract_batchadd "ick_wraps" {  
    67   "cellophane"  
    68   "cling-film"  
    69   "pvc"  
    70   "latex"  
    71   "a thong"  
    72   "stockings"  
    73   "a miniskirt"  
     62bMotion_abstract_register "ick_wraps" { 
     63  "cellophane" 
     64  "cling-film" 
     65  "pvc" 
     66  "latex" 
     67  "a thong" 
     68  "stockings" 
     69  "a miniskirt" 
    7470  "zero-gravity" 
    7571  "pantyhose" 
    7672  "chains" 
    77         "hotpants" 
     73  "hotpants" 
    7874} 
    7975 
    80 bMotion_abstract_register "ick_covereds" 
    81 bMotion_abstract_batchadd "ick_covereds" {  
     76bMotion_abstract_register "ick_covereds" { 
    8277  "custard" "cooking oil" "motor oil" "baby oil" "cream" "whipped cream" "KY" "strawberry jam" 
    8378  "Raspberry yogurt *eg*" "chocolate sauce" "coconut oil" "peanut butter" "dairylea" "%ruser{:owner} love juice" 
     
    8681bMotion_abstract_add_filter "ick_covereds" "%OWNER" 
    8782 
    88 bMotion_abstract_register "ick_locations" 
    89 bMotion_abstract_batchadd "ick_locations" {  
    90   "in your bed"    
    91   "on a chair" "in a field" "on a checkout" "against a fish tank"  
    92   "on a trampoline" "from behind"  
    93   "on a train" "on a bus" "in a swimming pool" "at the bus stop" "in your parents' bed" "under that bush"  
    94    "under your desk" "at the local Tesco" "over there -->" "in the shower" "behind the bikesheds" 
    95      "in Essex" "in Wales" "on a hilltop" "at Pontins" "for a porn site" 
     83bMotion_abstract_register "ick_locations" { 
     84  "in your bed" 
     85  "on a chair" "in a field" "on a checkout" "against a fish tank" 
     86  "on a trampoline" "from behind" 
     87  "on a train" "on a bus" "in a swimming pool" "at the bus stop" "in your parents' bed" "under that bush" 
     88  "under your desk" "at the local Tesco" "over there -->" "in the shower" "behind the bikesheds" 
     89  "in Essex" "in Wales" "on a hilltop" "at Pontins" "for a porn site" 
    9690  "in %ruser{:owner} bed" 
    9791} 
    9892 
    99 bMotion_abstract_register "ick_fucks" 
    100 bMotion_abstract_batchadd "ick_fucks" {  
    101   "doing it to"  
    102   "fucking"  
    103   "shagging"  
    104   "having sex with"  
    105   "having intercourse with"  
     93bMotion_abstract_register "ick_fucks" { 
     94  "doing it to" 
     95  "fucking" 
     96  "shagging" 
     97  "having sex with" 
     98  "having intercourse with" 
    10699  "being intimate with" 
    107100  "fscking" 
    108101  "fux0ring" 
    109         "rogering" 
    110         "making sweet love to" 
     102  "rogering" 
     103  "making sweet love to" 
    111104} 
    112105 
    113 bMotion_abstract_register "ick_dildos" 
    114 bMotion_abstract_batchadd "ick_dildos" {  
     106bMotion_abstract_register "ick_dildos" { 
    115107  "with a strap-on" "with a big dildo" "with a cucumber" "with a banana" "with a chicken" 
    116108  "whith a cucumber" "with a keyboard" "with bananna motion lotion" "with a ribbed tickler" 
  • trunk/plugins/en/simple_list.tcl

    r936 r1137  
    1717 
    1818# abstracts 
    19 bMotion_abstract_register "list1" 
    20 bMotion_abstract_batchadd "list1" { 
     19bMotion_abstract_register "list1" { 
    2120  "No. Try \002/msg NoTopic ftp?? ...\002 instead of saying it in the channel. Sheesh." 
    2221} 
    2322 
    24 bMotion_abstract_register "list2" 
    25 bMotion_abstract_batchadd "list2" { 
     23bMotion_abstract_register "list2" { 
    2624  "Heh, idiot." 
    2725  "Fool." 
  • trunk/plugins/en/simple_littlebit.tcl

    r936 r1137  
    1313bMotion_plugin_add_simple "littlebit" "(what, )?not even a little bit" 40 "%VAR{goonthens}" "en" 
    1414 
    15 bMotion_abstract_register "goonthens" 
    16 bMotion_abstract_batchadd "goonthens" { 
     15bMotion_abstract_register "goonthens" { 
    1716  "sssh sekrit" 
    1817  "go on then" 
  • trunk/plugins/en/simple_notbot.tcl

    r1112 r1137  
    1515bMotion_plugin_add_simple "arebot" "((is %botnicks a bot)|(are you a bot,? %botnicks)|(^%botnicks%:? are you a bot))" 60 "%VAR{nos}" "en" 
    1616 
    17 bMotion_abstract_register "notbots" 
    18 bMotion_abstract_batchadd "notbots" { 
     17bMotion_abstract_register "notbots" { 
    1918  "no I'm not" 
    2019  "am not %SMILEY{sad}" 
  • trunk/plugins/en/simple_notlong.tcl

    r936 r1137  
    1717} 
    1818 
    19 bMotion_abstract_register "notlong"  
     19bMotion_abstract_register "notlong" 
  • trunk/plugins/en/simple_sneeze.tcl

    r936 r1137  
    1515 
    1616# abstracts 
    17 bMotion_abstract_register "blessyous" 
    18 bMotion_abstract_batchadd "blessyous" { 
     17bMotion_abstract_register "blessyous" { 
    1918  "gesuntheit" 
    2019  "bless you" 
     
    2625  "Rogue bogey!" 
    2726  "/ducks" 
    28   "/hides behind %ruser"    
     27  "/hides behind %ruser" 
    2928  "Great. Now I'm gonna get a cold %VAR{unsmiles}" 
    3029  "Eek. Don't give it to me" 
Note: See TracChangeset for help on using the changeset viewer.