Jump to content

JB_frozen

Members
  • Posts

    53
  • Joined

  • Last visited

Posts posted by JB_frozen

  1. here is a simple warn script Designed For GUS

    alias warnings.add  !writeini -n " $+ $scriptdir $+ warns.ini" warnings $1 $calc($readini($scriptdir $+ warns.ini,warnings,$mta.nick($1,%a)) + 1) 
    on *:SIGNAL:mta.command:{ 
      var %a = $iif((!$4),$2,$iif(($warn.getid($1,$4) == $null),$2,$v1)),%race = $replace($mta.race($1),$chr(32),$chr(45)) 
      if ($3 == !warn) { 
        if ($gus.level($1,$2) >= 10) { 
          if ($4 == $null) { 
            /mta.pm $1 $2 error. you have to fill in a reason and/or a name 
          } 
          /mta.text $1 $mta.nick($1,$2) has given $mta.nick($1,%a) A warning (Reason: $5- $+ ) 
          !writeini -n " $+ $scriptdir $+ warns.ini" warned $mta.nick($1,%a) 1 
          !writeini -n " $+ $scriptdir $+ warns.ini" Reason $mta.nick($1,%a) $5- 
          warnings.add $mta.nick($1,%a)  
        } 
        else /mta.pm $1 $2 sorry you are not admin lvl 10 
      } 
      elseif ($3 == !playerinfo) { 
        if ($gus.level($1,$2) >= 7) { 
          if ($4 == $null) { 
            /mta.pm $1 $2 sorry you havent state the name please retry 
          } 
          /mta.pm $1 $2 $mta.nick($1,%a) has been warned $readini($scriptdir $+ warns.ini,warnings,$mta.nick($1,%a) Times Reason: $readini($scriptdir $+ warns.ini,reason,$mta.nick($1,%a) 
        } 
        else /mta.pm $1 $2 sorry you are not admin lvl 7 
      } 
    } 
    on *:SiGnal:Mta.join:{  
      if ($readini($scriptdir $+ warns.ini,warnings,$mta.nick($1,%a)) >= 3) { 
        /msg #unifi5h Warning $mta.nick($1,$2) has more than 3 Warnings! Last reason whas: $readini($scriptdir $+ warns.ini,reason,mta.nick($1,$2)) 
      } 
    } 
    alias warn.getid { 
      var %a = 0 
      while (%a < %loop) { 
        if ($+(*,$2,*) iswm $mta.nick($1,%a)) !return %a 
        !inc %a 
      } 
    } 
    on *:TEXT:*:#:{ 
      if ($1 == !playerinfo) { 
        if ($nick Isop $chan) { 
          if ($2 == $null) { 
            .notice $nick sorry you havent state the name, please retry 
          } 
          .notice $nick $$2- has been warned $readini($scriptdir $+ warns.ini,warnings,$$2-) Times Reason: $readini($scriptdir $+ warns.ini,reason,$$2-) 
        } 
        else .notice $nick sorry you are not admin  
      } 
    } 
    

    Commands:

    !warn

    !unwarn

    !playerinfo (ingame)

    !playerinfo (IRC)

  2. here is a script to PM users from IRC to Ingame :D

      
    on *:TEXT:*:#:{ 
      if ($1 == !pm) { 
        if ($2 == $null) { 
          .notice $nick $2- isnt ingame or its not a full name please state a full name 
        } 
        else { 
          mta.pm 1 $$2 $nick $+ @ IRC: $3- 
          msg $chan Pm sent! 
        } 
      } 
    } 
      
    

  3. well accualy this one is for race but the main things are in it

      
    alias cash.add  !writeini -n " $+ $scriptdir $+ cash.ini" Money $1 $calc($iif($readini($scriptdir $+ cash.ini,Money,$mta.nick($1,$2),$1) == $null,5,$vl) + $2) 
    alias cash.sub  !writeini -n " $+ $scriptdir $+ cash.ini" Money $1 $calc($iif($readini($scriptdir $+ cash.ini,Money,$mta.nick($1,$2),$1) == $null,5,$v1) - $2) 
      
    on *:SIGNAL:mta.command:{ 
    if ($3 == !money) /mta.text $1 $mta.nick($1,$2) your money is: $ $+ $readini($scriptdir $+ cash.ini,Money,$mta.nick($1,$2)) 
    } 
    on *:SIGNAL:mta.Finish:{ 
      /mta.text $1 $mta.nick($1,$2) has won and receive $200 
      cash.add $mta.nick($1,$2) 200 
    } 
      
    

  4. I cant make it work lol how do i need to use it? just put the IPL in the same folder as the .map file is and then put the executer in there to?

    couse if i run the executer Nothing happens.

    (talking bout Map2ipl)

  5. @ toady no i dindt i had the Old one and didnt saw you reupdated but the old one didnt works so well so i edited it till it worked :P and hardi asked me for a script that echo's ingame chat and that he could use the commands from IRC and that only members could use it so i maded it this way

  6. and the other tinhg you asked for :P

    on *:START:{
     set %echoserverid 1
     set %echochan  #hardis_bot
    }
    on *:SIGNAL:mta.join:{
     if ($1 == %echoserverid) /msg  #hardis_bot [Join] $mta.nick($1,$2) has joined the game.
    }
    on *:SIGNAL:mta.part:{
     if ($1 == %echoserverid) /msg  #hardis_bot [Disconnect] $mta.nick($1,$2)  has left the game.
    }
    on *:SIGNAL:Mta.ban:{
     if ($1 == %echoserverid) /msg  #hardis_bot [ban] $mta.nick($1,$2) Banned by remote admin	
    }
    on *:SIGNAL:mta.Freeze:{
     if ($1 == %echoserverid) /msg  #hardis_bot [freeze] $mta.nick($1,$2) Frozen by remote admin
    }
    on *:SIGNAL:mta.kick:{
     if ($1 == %echoserverid) /msg  #hardis_bot [Kick] $mta.nick($1,$2) kicked by remote admin
    }
    on *:SIGNAL:Mta.mute:{
     if ($1 == %echoserverid) /msg  #hardis_bot [mute] $mta.nick($1,$2) succesfull Muted by remote admin
    }
    on *:signal:mta.command:{
     if ($1 == %echoserverid) /msg  #hardis_bot [command $mta.nick($1,$2) $+ : $3-
    }
    

    and the commands :P

    on *:signal:mta.command:{
     var %a = $iif($2,$iif($mta.nick(%serverID,$2) != $null,$2,$mta.getid(%serverID,$2)))  
    if ($1 == !mute) {
    if (neo_ isin $nick) {
    /mta.mute 1 %a
    }
    else notmember
    }
    if ($1 == !unmute) {
    if (neo_ isin $nick) {
    /mta.unmute 1 %a
    }
    else notmember
    }
    if ($1 == !freeze) {
    if (neo_ isin $nick) {
    /mta.freeze 1 %a
    }
    else notmember
    }
    if ($1 == !unfreeze) {
    if (neo_ isin $nick) {
    /mta.unfreeze 1 %a
    }
    else notmember
    }
    if ($1 == !ban) {
    if (neo_ isin $nick) {
    /mta.ban 1 %a
    }
    else notmember
    }
    if ($1 == !unban) {
    if (neo_ isin $nick) {
    /mta.unban 1 %a
    }
    else notmember
    }
    if ($1 == !kick) {
    if (neo_ isin $nick) {
    /mta.kick 1 %a
    }
    else notmember
    }
    }
    alias notmember /msg #hardis_bot sorry you arent member $nick
    

  7. hey hardi its me Rob_nl :P

    well i will make your postbox :o

    on *:signal:mta.command:{
    if ($3 == !comment) {
    if ($4 == $null) { mta.text $1 sorry you havent fill in a reason }
    else {
    !write " $+ $scriptdir $+ comments.txt" $4- 
    mta.pm $1 $2 The comment $4- has been added 
    }
    }
    if ($3 == !read) {
     var %x = 1, %z = $lines($scriptdir $+ comments.txt) 
     while %x <= %z { 
       mta.pm $1 $2 $read($scriptdir $+ comments.txt,n,%x) 
       inc %x 
     } 
    }
    }

    goodluck

  8. lol even the simplyest script you dont know xD

    well

    on *:signal:mta.command:{
     if ($3 == !lol) mta.text $1 $iif((!$4),$mta.nick($1,$2) is laughing out loud,$mta.nick($1,$2) is laughing @ $mta.nick($1,%a))
    
    elseif ($3 == !bye) mta.text $1 $iif((!$4),$mta.nick($1,$2) has to go. bye all gtg cya next time,bye bye $mta.nick($1,%a) cya next time)
    
    elseif ($3 == !n1) mta.text $1 $iif((!$4),$mta.nick($1,$2) says nice 1,$mta.nick($1,$2) says nice 1 $mta.nick($1,%a))
    
    elseif ($3 == !np) mta.text $1 $iif((!$4),$mta.nick($1,$2) says no problem,$mta.nick($1,$2) says no problem $mta.nick($1,%a))
    
    elseif ($3 == !srry) mta.text $1 $iif((!$4),$mta.nick($1,$2) says sorry my fault,$mta.nick($1,$2) says sorry to $mta.nick($1,%a))
    
     elseif ($3 == !gj) mta.text $1 $iif((!$4),$mta.nick($1,$2) says good job,$mta.nick($1,$2) says good job $mta.nick($1,%a))
    
    elseif ($3 == !hump) mta.text $1 $iif((!$4),$mta.nick($1,$2) humps himself,$mta.nick($1,$2) humps $mta.nick($1,%a) out loud)
    
    elseif ($3 == !scream) mta.text $1 $iif((!$4),$mta.nick($1,$2) is shouting,$mta.nick($1,$2) is shouting to $mta.nick($1,%a))
     elseif ($3 == !thx) mta.text $1 $iif((!$4),$mta.nick($1,$2) says thx,$mta.nick($1,$2) says thx to $mta.nick($1,%a))
    
    elseif ($3 == !hi) mta.text $1 $iif((!$4),$mta.nick($1,$2) says Hello all to every one,$mta.nick($1,$2) says hello and welcome $mta.nick($1,%a))
    
    elseif ($3 == !ram) mta.text $1 $iif((!$4),$mta.nick($1,$2) knocks every1 down,$mta.nick($1,$2) is ramming into $mta.nick($1,%a))
    
    elseif ($3 == !caps) mta.text $1 Please don't use caps! Thank you
    
    elseif ($3 == !swear) mta.text $1 Please don't swear! Thank you
    }
    

    for example

    hope it will help you out

  9. on *:signal:mta.command*:#:{

    if ($3 == !buy) {

    var %a = $rand(1,200)

    mta.text $1 $mta.nick($1,$2) has bought $4- for %a

    pgs.sub %a $mta.nick($1,$2)

    }

    if ($3 == !sell) {

    var %a = $rand(1,200)

    mta.text $1 $mta.nick($1,$2) has selled $4- for %a

    pgs.add %a $mta.nick($1,$2)

    }

    }

    goodluck with it

  10. it could maybe but in a different way

    on *:signal:mta.command:{
    if ($3 == !on) {
    if {Gus.level($1,$2) >= 10) {
    set %c mta.pm $1 $2
    }
    }
    elseif ($3 == !off) {
    if (gus.level($1,$2) >= 10) {
    set %c mta.text $1
    }
    }
    }

    and then set every thing that is mta.text $1 to %c

    and it will work only for admins from lvl 10

  11. on *:text:*:#:{
    if ($1 == !talk) /mta.text 1 $nick on irc: $2-
    }

    mta.text = text that will be send to ingame

    mta.command = a command used from ingame to trigger a script

    mta.pm = to use pm's to players

    mta.freeze = a command to freeze players

    and quess what the rest is

  12. no... its not great to copy the scripts of the Clan neo infact its more fun if you can script bij urself and dont have to ask ;) and its even more fun if you make ideas for yourself couse let i say i make the setreply command as the exact one as team neo has if your done then what... no fun :) u use it maybe 2 times then you want to copy something else but does that make sence? no.. just make scripts @ ur own thats more fun than copy someone else his ideas

  13. type !car add

    then you can buy that car

    to sel yor car type !car sell

    to see your info do !car info

    to rentout do !car rentout

    to buy a license do !car license

    to delete a car of the cars list do !car delete

  14. Ok guys i have a good script wich you guys gonna like ;)

    on *:signal:mta.command:{
     if ($3 == !car) car.ali $1-
    }
    on *:Signal:mta.join:{
     if ($readini($scriptdir $+ cars.ini,Rent,$mta.nick($1,$2)) == yes) {
       !writeini -n " $+ $scriptdir $+ cars.ini" Rent $mta.nick($1,$2) no
     }
     if ($readini($scriptdir $+ cars.ini,License,$mta.nick($1,$2)) == $null) {
       !writeini -n " $+ $scriptdir $+ cars.ini" License $mta.nick($1,$2) no
     }
     if ($readini($scriptdir $+ cars.ini,License,$mta.nick($1,$2)) == Failed) {
       !writeini -n " $+ $scriptdir $+ cars.ini" License $mta.nick($1,$2) no
     }
    }
    alias buy.drive {
     if ($readini($scriptdir $+ cars.ini,License,$mta.nick($1,$2)) == no) {
       second $1-
     }
     elseif ($readini($scriptdir $+ cars.ini,License,$mta.nick($1,$2)) == failed) {
       mta.text $1 The driving school is closed try later again
     }
     elseif ($readini($scriptdir $+ cars.ini,Nick,$mta.nick($1,$2)) == yes) {
       mta.text $1 sorry $mta.nick($1,$2) but you have already an driving license
     }
    }
    alias second {
     var %a = $rand(1,2)
     if (%a == 1) {
       pgs.sub $mta.nick($1,$2) 1500
       mta.text $1 Drive lesson past! you got an driving license you are now able to buy an car
       !writeini -n " $+ $scriptdir $+ cars.ini" License $mta.nick($1,$2) yes
     }
     else {
       mta.text $1 you didn't past the lesson!
       mta.text $1 Reason: $read(examen.txt,$rand(0,$lines(examen.txt)))
       !writeini -n " $+ $scriptdir $+ cars.ini" License $mta.nick($1,$2) failed
       .timer 1 900 !writeini -n " $+ $scriptdir $+ cars.ini" License $mta.nick($1,$2) no
     }
    }
    alias license {
     if ($readini($scriptdir $+ cars.ini,License,$mta.nick($1,$2)) == $null) {
       timer1 1 1 mta.text $1 Dealer: well.. were are you'r driving licenses? without one you cant buy an car!
       timer2 1 1 mta.pm $1 $2 Police: The dealer has reported you! 100 is token of you'r account!
       timer3 1 3 pgs.sub $mta.nick($1,$2) 100
     }
     elseif ($readini($scriptdir $+ cars.ini,License,$mta.nick($1,$2)) == failed) {
       timer1 1 1 mta.text $1 Dealer: well.. were are you'r driving licenses? without one you cant buy an car!
       timer2 1 1 mta.pm $1 $2 Police: The dealer has reported you! 100 is token of you'r account!
       timer3 1 3 pgs.sub $mta.nick($1,$2) 100
     }
     elseif ($readini($scriptdir $+ cars.ini,License,$mta.nick($1,$2)) == no) {
       timer1 1 1 mta.text $1 Dealer: well.. were are you'r driving licenses? without one you cant buy an car!
       timer2 1 1 mta.pm $1 $2 Police: The dealer has reported you! 100 is token of you'r account!
       timer3 1 3 pgs.sub $mta.nick($1,$2) 100
     }
     else buy.cars $1-
    }
    alias car.info {
     if ($readini($scriptdir $+ cars.ini,Nick,$mta.nick($1,$2)) == $null) {
       mta.text $1 sorry $mta.nick($1,$2) but you havent an car yet please buy one first
     }
     else {
       if ($readini($scriptdir $+ cars.ini,Nick,$mta.nick($1,$2)) == 1) {
         mta.text $1 $mta.nick($1,$2) owns an $readini($scriptdir $+ cars.ini,Cars,$mta.nick($1,$2)) Worth: $ $+ $readini($scriptdir $+ cars.ini,Worth,$mta.nick($1,$2)) Damage: $ $+ $rand(1,50) Rented Out: $readini($scriptdir $+ cars.ini,Rent,$mta.nick($1,$2))  
       }
     }
    }
    alias showroom {
     mta.pm $1 $2 Availeble Cars are:
     mta.pm $1 $2 $read($scriptdir $+ cars.txt)
    }
    alias rentout {
     if ($readini($scriptdir $+ cars.ini,Rent,$mta.nick($1,$2)) == yes) {
       mta.text $1 sorry $mta.nick($1,$2) but you have already rent out your car try later again please
     }
     elseif ($readini($scriptdir $+ cars.ini,Nick,$mta.nick($1,$2)) == $null) {
       mta.text $1 sorry $mta.nick($1,$2) but you have to buy an car first
     }
     else {
       if (carrank($1,$2) >= 7) {
         var %a = $rand(350,400)
         timer1 1 1 !writeini -n " $+ $scriptdir $+ cars.ini" Rent $mta.nick($1,$2) yes
         timer2 1 1  mta.text $1 $mta.nick($1,$2) has rented out and earned $ %a !
         timer3 1 1 pgs.add $mta.nick($1,$2) %a
         timer4 1 900 !writeini -n " $+ $scriptdir $+ cars.ini" Rent $mta.nick($1,$2) no
       }
       if (carrank($1,$2) >= 6) {
         var %b = $rand(300,350)
         timer1 1 1 !writeini -n " $+ $scriptdir $+ cars.ini" Rent $mta.nick($1,$2) yes
         timer2 1 1  mta.text $1 $mta.nick($1,$2) has rented out and earned $ %b !
         timer3 1 1 pgs.add $mta.nick($1,$2) %b
         timer4 1 900 !writeini -n " $+ $scriptdir $+ cars.ini" Rent $mta.nick($1,$2) no
       }
       if (carrank($1,$2) >= 5) {
         var %c = $rand(250,300)
         timer1 1 1 !writeini -n " $+ $scriptdir $+ cars.ini" Rent $mta.nick($1,$2) yes
         timer2 1 1  mta.text $1 $mta.nick($1,$2) has rented out and earned $ %c !
         timer3 1 1 pgs.add $mta.nick($1,$2) %c
         timer4 1 900 !writeini -n " $+ $scriptdir $+ cars.ini" Rent $mta.nick($1,$2) no
       }
       if (carrank($1,$2) >= 4) {
         var %d = $rand(200,250)
         timer1 1 1 !writeini -n " $+ $scriptdir $+ cars.ini" Rent $mta.nick($1,$2) yes
         timer2 1 1  mta.text $1 $mta.nick($1,$2) has rented out and earned $ %d !
         timer3 1 1 pgs.add $mta.nick($1,$2) %a
         timer4 1 900 !writeini -n " $+ $scriptdir $+ cars.ini" Rent $mta.nick($1,$2) no
       }
       if (carrank($1,$2) >= 3) {
         var %e = $rand(150,200)
         timer1 1 1 !writeini -n " $+ $scriptdir $+ cars.ini" Rent $mta.nick($1,$2) yes
         timer2 1 1  mta.text $1 $mta.nick($1,$2) has rented out and earned $ %e !
         timer3 1 1 pgs.add $mta.nick($1,$2) %e
         timer4 1 900 !writeini -n " $+ $scriptdir $+ cars.ini" Rent $mta.nick($1,$2) no
       }
       if (carrank($1,$2) >= 2) {
         var %f = $rand(100,150)
         timer1 1 1 !writeini -n " $+ $scriptdir $+ cars.ini" Rent $mta.nick($1,$2) yes
         timer2 1 1  mta.text $1 $mta.nick($1,$2) has rented out and earned $ %f !
         timer3 1 1 pgs.add $mta.nick($1,$2) %f
         timer4 1 900 !writeini -n " $+ $scriptdir $+ cars.ini" Rent $mta.nick($1,$2) no
       }
       if (carrank($1,$2) >= 1) {
         var %g = $rand(50,100)
         timer1 1 1 !writeini -n " $+ $scriptdir $+ cars.ini" Rent $mta.nick($1,$2) yes
         timer2 1 1  mta.text $1 $mta.nick($1,$2) has rented out and earned $ %g !
         timer3 1 1 pgs.add $mta.nick($1,$2) %g
         timer4 1 900 !writeini -n " $+ $scriptdir $+ cars.ini" Rent $mta.nick($1,$2) no
       }
     }
    }
    alias car.ali {
     if (!$4) mta.pm $1 $2 error !car buy/sell/info/showroom/rentout/license
     elseif ($4 == buy) license $1-
     elseif ($4 == info) car.info $1-
     elseif ($4 == sell) sell.cars $1-
     elseif ($4 == showroom) showroom $1-
     elseif ($4 == add) cars.add $1-
     elseif ($4 == rentout) rentout $1-
     elseif ($4 == license) buy.drive $1-
     elseif ($4 == delete) cars.delete $1-
    }
    alias carrank !return $iif($readini($scriptdir $+ cars.ini,Rank,$mta.nick($1,$2)),$v1,0)
    alias buy.cars { 
     if ($readini($scriptdir $+ car.ini,Price,$5) > $pgs.cash($1,$2)) mta.pm $1 $2 sorry $mta.nick($1,$2) but you haven't Enough Cash
     elseif ($readini($scriptdir $+ car.ini,cars,$5) == $null) { 
       mta.pm $1 $2 sorry $mta.nick($1,$2) but we not sell this car type !car showroom to see wich cars are availeble
     }
     elseif ($readini($scriptdir $+ cars.ini,Nick,$mta.nick($1,$2)) == 1) {
       mta.text $1 sorry $mta.nick($1,$2) but first sell your other car
     }
     else {
       mta.text $1 $mta.nick($1,$2) has bought a $5 for $ $+ $readini($scriptdir $+ car.ini,Price,$5)  Dealer: $read(cardealersell.txt,$rand(0,$lines(cardealersell.txt)))
       !writeini -n " $+ $scriptdir $+ cars.ini" Nick $mta.nick($1,$2) 1
       !writeini -n " $+ $scriptdir $+ cars.ini" Cars $mta.nick($1,$2) $5
       !writeini -n " $+ $scriptdir $+ cars.ini" Worth $mta.nick($1,$2) $readini($scriptdir $+ car.ini,Price,$5)
       !writeini -n " $+ $scriptdir $+ cars.ini" Rank $mta.nick($1,$2) $readini($scriptdir $+ car.ini,rank,$5) 
       pgs.sub $mta.nick($1,$2) $readini($scriptdir $+ car.ini,Price,$5)
     }
    }
    alias sell.cars {
     if ($readini($scriptdir $+ cars.ini,Nick,$mta.nick($1,$2)) == $null) {
       mta.text $1 sorry $mta.nick($1,$2) but you haven't an car yet please buy one first
     }
     else {
       !remini " $+ $scriptdir $+ cars.ini" Nick $mta.nick($1,$2)
       !remini " $+ $scriptdir $+ cars.ini" Cars $mta.nick($1,$2)
       !remini " $+ $scriptdir $+ cars.ini" Worth $mta.nick($1,$2)
       !remini " $+ $scriptdir $+ cars.ini" Rank $mta.nick($1,$2)
       pgs.add $mta.nick($1,$2) $readini($scriptdir $+ car.ini,newPrice,$5)
       mta.text $1 $mta.nick($1,$2) sold his $5 $+ ! for $ $+ $readini($scriptdir $+ car.ini,newPrice,$5) Dealer: $read(cardealer.txt,$rand(0,$lines(cardealer.txt)))
     }
    }
    alias Cars.add {
     if ($mta.level($1,$2) >= 5) {
       if (!$5) mta.pm $1 $2 error syntax: !car add 
       elseif (!$6) mta.pm $1 $2 error syntax: !car add 
       elseif (!$7) mta.pm $1 $2 error syntax: !car add 
       elseif (!$ mta.pm $1 $2 error syntax: !car add 
       else {
         !writeini -n " $+ $scriptdir $+ car.ini" Cars $5 $5
         !writeini -n " $+ $scriptdir $+ car.ini" Rank $5 $6
         !writeini -n " $+ $scriptdir $+ car.ini" Price $5 $7
         !writeini -n " $+ $scriptdir $+ car.ini" newprice $5 $8
         !write -n " $+ $scriptdir $+ cars.txt" $5 $+ , 
         mta.text $1 cars added
       }
       else mta.pm $1 $2 sorry you arent admin
     }
    }
    alias Cars.delete {
     if ($mta.level($1,$2) >= 5) {  
       if (!$5) mta.pm $1 $2 Specify a car name please
       !remini " $+ $scriptdir $+ car.ini" Cars $5
       !remini " $+ $scriptdir $+ car.ini" price $5
       !remini " $+ $scriptdir $+ car.ini" newprice $5
       !remini " $+ $scriptdir $+ car.ini" rank $5
     }
     else mta.pm $1 $2 sorry you arent admin
    }
    

    Good luck

×
×
  • Create New...