Compare text

Find the difference between two text files

Real-time diff

Unified diff

Collapse lines

Highlight change

Syntax highlighting

Tools

Diffchecker Desktop The most secure way to run Diffchecker. Get the Diffchecker Desktop app: your diffs never leave your computer!Get Desktop

Comparing sensitive data, confidential files or internal emails?

Most legal and privacy policies prohibit uploading sensitive data online. Diffchecker Desktop ensures your confidential information never leaves your computer. Work offline and compare documents securely.

Download Diffchecker Desktop Learn more

Untitled diff

Created 10 years agoDiff never expires

5 removals

93 lines

16 additions

104 lines

bind "P" [showmenu "Private Servers"]

if (! (checkalias spamConnect)) [spamConnect = 0] // Disable SpamConnect by default.

if (! (checkalias menuColors)) [menuColors = 1] // Enable menu colors by default.

if (! (checkalias menuLocations)) [menuLocations = 1] // Enable menu locations by default.

newmenu "Private Servers Settings"

menuitemcheckbox "Use SpamConnect" "$spamConnect" [spamConnect = $arg1]

menuitemcheckbox "Use menu colors" "$menuColors" [menuColors = $arg1]

menuitemcheckbox "Show server locations" "$menuLocations" [menuLocations = $arg1]

menuitem [] -1

menuitem "Back" [closemenu "Private Servers Settings"]

menuconnect = [

connectstring = (concat $arg1 $arg2 $arg3)

if $spamConnect [

loop mcl 2 [ sleep (* $mcl 500) [say /connect $connectstring] ]

sleep 1200 [connect (at $connectstring 0) (at $connectstring 1) (at $connectstring 2)]

] [connect $arg1 $arg2 $arg3]

]

cl = [if $menuColors [result (c $arg1)]]

loc = [if $menuLocations [result (concatword (cl 5) "(" (cl 3) $arg1 (cl 5) ")")]]

loc = [

num = $numargs

if $num [

a1 = $arg1

if (> $num 1) [

a2 = $arg2

] [ a2 = [] ]

if $menuLocations [

result (concatword (cl 5) "(" (cl 3) $a1 (cl 5) ")" (if (&& (> $num 1) $a2) [result (concatword (cl 5) " [" (cl 4) "hitfixed" (cl 5) "]")]))

]

newmenu "Private Servers"

menuitem "Menu Settings..." [showmenu "Private Servers Settings"]

menuitem [] -1

menuitemvar [concatword (cl 9) ".aK " (loc "US")] [showmenu ".aK"]

menuitemvar [concatword (cl 2) "AusDis " (loc "AUS/US")] [showmenu "AusDis"]

menuitemvar [concatword (cl 0) "FD " (loc "GER")] [showmenu "FD"]

menuitemvar [concatword (cl 1) "Haunted Matches " (loc "US")] [showmenu "Haunted Matches"]

menuitemvar [concatword (cl 2) "#M|A# " (loc "US")] [showmenu "M|A"]

menuitemvar [concatword (cl 0) "Mutsketeer " (loc "US")] [menuconnect xrd.me 4000 match]

menuitemvar [concatword (cl 1) "Noobicus " (loc "US")] [showmenu "Noobicus"]

menuitemvar [concatword (cl 1) "Noobicus " (loc "US" 1)] [showmenu "Noobicus"]

menuitemvar [concatword (cl 2) "THS " (loc "UK")] [menuconnect ths.cubers.net 1313]

menuitemvar [concatword (cl 9) "TyD " (loc "NL")] [menuconnect tearyoudown.com 21000 match]

menuitemvar [concatword (cl 0) "Waka Waka " (loc "US")][menuconnect match.wakawaka.ac]

menuitemvar [concatword (cl 1) "w00p " (loc "FR/UK")][showmenu "w00p"]

menuitemvar [concatword (cl 1) "w00p " (loc "FR/UK" 1)][showmenu "w00p"]

menuitem [] -1

menuitemvar [concatword (cl 2) "Zombies " (loc "US")] [modconnect XRD.me 3000]

newmenu ".aK"

menuitemvar [concatword (cl 1) "kings-ac.tk " (cl 5) "5555"] [menuconnect kings-ac.tk 5555 match]

menuitemvar [concatword (cl 1) "kings-ac.tk " (cl 5) "6666"] [menuconnect kings-ac.tk 6666 match]

menuitemvar [concatword (cl 1) "kings-ac.tk " (cl 5) "7777"] [menuconnect kings-ac.tk 7777 match]

newmenu "AusDis"

menuitemvar [concatword (c 2) "Australia: "] -1

menuitemvar [concatword (cl 1) "ausdis " (cl 5) "ac-radio"] [menuconnect ausdis.info 9001]

menuitemvar [concatword (cl 1) "ausdis " (cl 5) "foxy"] [menuconnect ausdis.info 8999]

menuitem [] -1

menuitemvar [concatword (c 2) "United States: "] -1

menuitemvar [concatword (cl 1) "ausdis " (cl 5) "corll"] [menuconnect us.ausdis.info 9001]

newmenu "FD"

menuitemvar [concatword (cl 1) "ac.fd.tc "] [menuconnect ac.fd.tc match]

menuitemvar [concatword (cl 1) "ac.fd.tc " (cl 5) "22222"] [menuconnect ac.fd.tc 22222 match]

newmenu "Haunted Matches"

menuitemvar [concatword (cl 1) "thh.no-ip.info " (cl 5) "6999"] [menuconnect thh.no-ip.info 6999 match]

menuitemvar [concatword (cl 1) "thh.no-ip.info " (cl 5) "7999"] [menuconnect thh.no-ip.info 7999 match]

menuitemvar [concatword (cl 1) "thh.no-ip.info " (cl 5) "8999"] [menuconnect thh.no-ip.info 8999 match]

menuitemvar [concatword (cl 1) "thh.no-ip.info " (cl 5) "9999"] [menuconnect thh.no-ip.info 9999 match]

newmenu "M|A"

menuitemvar [concatword (cl 1) "#M|A# Tetitas " (cl 5) "2222"] [menuconnect ac.mafia-asesina.org 2222 match]

menuitemvar [concatword (cl 1) "#M|A# Leoi de Huanuco " (cl 5) "3333"] [menuconnect ac.mafia-asesina.org 3333 match]

newmenu "Noobicus"

menuitemvar [concatword (cl 1) "noobicus.org " (cl 5) "0"] [menuconnect noobicus.org 0 match]

menuitemvar [concatword (cl 1) "noobicus.org " (cl 5) "9999"][menuconnect noobicus.org 9999 match]

newmenu "w00p"

menuitemvar [concatword (c 2) "France: "] -1

menuitemvar [concatword (cl 1) "ac-akimbo.net " (cl 5) "5999"] [menuconnect ac-akimbo.net 5999 match]

menuitemvar [concatword (cl 1) "ac-akimbo.net " (cl 5) "6999"] [menuconnect ac-akimbo.net 6999 match]

menuitemvar [concatword (cl 1) "ac-akimbo.net " (cl 5) "7999"] [menuconnect ac-akimbo.net 7999 match]

menuitemvar [concatword (cl 1) "ac-akimbo.net " (cl 5) "8999"] [menuconnect ac-akimbo.net 8999 match]

menuitemvar [concatword (cl 1) "ac-akimbo.net " (cl 5) "9999"] [menuconnect ac-akimbo.net 9999 match]

menuitem [] -1

menuitemvar [concatword (c 2) "United Kingdom: "] -1

menuitemvar [concatword (cl 1) "hlin " (cl 5) "5999"] [menuconnect hlin.woop.us 5999 match]

menuitemvar [concatword (cl 1) "hlin " (cl 5) "6999"] [menuconnect hlin.woop.us 6999 match]

menuitemvar [concatword (cl 1) "hlin " (cl 5) "7999"] [menuconnect hlin.woop.us 7999 match]

menuitemvar [concatword (cl 1) "hlin " (cl 5) "8999"] [menuconnect hlin.woop.us 8999 match]

menuitemvar [concatword (cl 1) "hlin " (cl 5) "9999"] [menuconnect hlin.woop.us 9999 match]

// 0-green, 1-blue, 2-yellow, 3-red, 4-gray, 5-white, 6-dark brown, 7-dark red, 8-magenta, 9-orange

// Script by Wolf (thanks to Bukz for condensing and improving the script)

Saved diffs

Original text

Open file

bind "P" [showmenu "Private Servers"]

if (! (checkalias spamConnect)) [spamConnect = 0]     // Disable SpamConnect by default.
if (! (checkalias menuColors)) [menuColors = 1]       // Enable menu colors by default.
if (! (checkalias menuLocations)) [menuLocations = 1] // Enable menu locations by default.

newmenu "Private Servers Settings"
menuitemcheckbox "Use SpamConnect" "$spamConnect" [spamConnect = $arg1]
menuitemcheckbox "Use menu colors" "$menuColors" [menuColors = $arg1]
menuitemcheckbox "Show server locations" "$menuLocations" [menuLocations = $arg1]
menuitem [] -1
menuitem "Back" [closemenu "Private Servers Settings"]

menuconnect = [
  connectstring = (concat $arg1 $arg2 $arg3)
  if $spamConnect [
    loop mcl 2 [ sleep (* $mcl 500) [say /connect $connectstring] ]
    sleep 1200 [connect (at $connectstring 0) (at $connectstring 1) (at $connectstring 2)]
  ] [connect $arg1 $arg2 $arg3]
]

cl = [if $menuColors [result (c $arg1)]]

loc = [if $menuLocations [result (concatword (cl 5) "(" (cl 3) $arg1 (cl 5) ")")]]

newmenu "Private Servers"
menuitem "Menu Settings..." [showmenu "Private Servers Settings"]
menuitem [] -1
menuitemvar [concatword (cl 9) ".aK " (loc "US")] [showmenu ".aK"]
menuitemvar [concatword (cl 2) "AusDis " (loc "AUS/US")] [showmenu "AusDis"]
menuitemvar [concatword (cl 0) "FD " (loc "GER")] [showmenu "FD"]
menuitemvar [concatword (cl 1) "Haunted Matches " (loc "US")] [showmenu "Haunted Matches"]
menuitemvar [concatword (cl 2) "#M|A# " (loc "US")] [showmenu "M|A"]
menuitemvar [concatword (cl 0) "Mutsketeer " (loc "US")] [menuconnect xrd.me 4000 match]
menuitemvar [concatword (cl 1) "Noobicus " (loc "US")] [showmenu "Noobicus"]
menuitemvar [concatword (cl 2) "THS " (loc "UK")] [menuconnect ths.cubers.net 1313]
menuitemvar [concatword (cl 9) "TyD " (loc "NL")] [menuconnect tearyoudown.com 21000 match]
menuitemvar [concatword (cl 0) "Waka Waka " (loc "US")][menuconnect match.wakawaka.ac]
menuitemvar [concatword (cl 1) "w00p " (loc "FR/UK")][showmenu "w00p"]
menuitem [] -1
menuitemvar [concatword (cl 2) "Zombies " (loc "US")] [modconnect XRD.me 3000]

newmenu ".aK"
menuitemvar [concatword (cl 1) "kings-ac.tk " (cl 5) "5555"] [menuconnect kings-ac.tk 5555 match]
menuitemvar [concatword (cl 1) "kings-ac.tk " (cl 5) "6666"] [menuconnect kings-ac.tk 6666 match]
menuitemvar [concatword (cl 1) "kings-ac.tk " (cl 5) "7777"] [menuconnect kings-ac.tk 7777 match]

newmenu "AusDis"
menuitemvar [concatword (c 2) "Australia: "] -1
menuitemvar [concatword (cl 1) "ausdis " (cl 5) "ac-radio"] [menuconnect ausdis.info 9001]
menuitemvar [concatword (cl 1) "ausdis " (cl 5) "foxy"] [menuconnect ausdis.info 8999]
menuitem [] -1
menuitemvar [concatword (c 2) "United States: "] -1
menuitemvar [concatword (cl 1) "ausdis " (cl 5) "corll"] [menuconnect us.ausdis.info 9001]

newmenu "FD"
menuitemvar [concatword (cl 1) "ac.fd.tc "] [menuconnect ac.fd.tc match]
menuitemvar [concatword (cl 1) "ac.fd.tc " (cl 5) "22222"] [menuconnect ac.fd.tc 22222 match]

newmenu "Haunted Matches"
menuitemvar [concatword (cl 1) "thh.no-ip.info " (cl 5) "6999"] [menuconnect thh.no-ip.info 6999 match]
menuitemvar [concatword (cl 1) "thh.no-ip.info " (cl 5) "7999"] [menuconnect thh.no-ip.info 7999 match]
menuitemvar [concatword (cl 1) "thh.no-ip.info " (cl 5) "8999"] [menuconnect thh.no-ip.info 8999 match]
menuitemvar [concatword (cl 1) "thh.no-ip.info " (cl 5) "9999"] [menuconnect thh.no-ip.info 9999 match]

newmenu "M|A"
menuitemvar [concatword (cl 1) "#M|A# Tetitas " (cl 5) "2222"] [menuconnect ac.mafia-asesina.org 2222 match]
menuitemvar [concatword (cl 1) "#M|A# Leoi de Huanuco " (cl 5) "3333"] [menuconnect ac.mafia-asesina.org 3333 match]

newmenu "Noobicus"
menuitemvar [concatword (cl 1) "noobicus.org " (cl 5) "0"] [menuconnect noobicus.org 0 match]
menuitemvar [concatword (cl 1) "noobicus.org " (cl 5) "9999"][menuconnect noobicus.org 9999 match]

newmenu "w00p"
menuitemvar [concatword (c 2) "France: "] -1
menuitemvar [concatword (cl 1) "ac-akimbo.net " (cl 5) "5999"] [menuconnect ac-akimbo.net 5999 match]
menuitemvar [concatword (cl 1) "ac-akimbo.net " (cl 5) "6999"] [menuconnect ac-akimbo.net 6999 match]
menuitemvar [concatword (cl 1) "ac-akimbo.net " (cl 5) "7999"] [menuconnect ac-akimbo.net 7999 match]
menuitemvar [concatword (cl 1) "ac-akimbo.net " (cl 5) "8999"] [menuconnect ac-akimbo.net 8999 match]
menuitemvar [concatword (cl 1) "ac-akimbo.net " (cl 5) "9999"] [menuconnect ac-akimbo.net 9999 match]
menuitem [] -1
menuitemvar [concatword (c 2) "United Kingdom: "] -1
menuitemvar [concatword (cl 1) "hlin " (cl 5) "5999"] [menuconnect hlin.woop.us 5999 match]
menuitemvar [concatword (cl 1) "hlin " (cl 5) "6999"] [menuconnect hlin.woop.us 6999 match]
menuitemvar [concatword (cl 1) "hlin " (cl 5) "7999"] [menuconnect hlin.woop.us 7999 match]
menuitemvar [concatword (cl 1) "hlin " (cl 5) "8999"] [menuconnect hlin.woop.us 8999 match]
menuitemvar [concatword (cl 1) "hlin " (cl 5) "9999"] [menuconnect hlin.woop.us 9999 match]

// 0-green, 1-blue, 2-yellow, 3-red, 4-gray, 5-white, 6-dark brown, 7-dark red, 8-magenta, 9-orange
// Script by Wolf (thanks to Bukz for condensing and improving the script)

Changed text

Open file

bind "P" [showmenu "Private Servers"]

cl = [if $menuColors [result (c $arg1)]]

loc = [
  num = $numargs
  if $num [
    a1 = $arg1
    if (> $num 1) [
      a2 = $arg2
    ] [ a2 = [] ]
    if $menuLocations [
      result (concatword (cl 5) "(" (cl 3) $a1 (cl 5) ")" (if (&& (> $num 1) $a2) [result (concatword (cl 5) " [" (cl 4) "hitfixed" (cl 5) "]")]))
    ]
  ]
]

newmenu "Private Servers"
menuitem "Menu Settings..." [showmenu "Private Servers Settings"]
menuitem [] -1
menuitemvar [concatword (cl 9) ".aK " (loc "US")] [showmenu ".aK"]
menuitemvar [concatword (cl 2) "AusDis " (loc "AUS/US")] [showmenu "AusDis"]
menuitemvar [concatword (cl 0) "FD " (loc "GER")] [showmenu "FD"]
menuitemvar [concatword (cl 1) "Haunted Matches " (loc "US")] [showmenu "Haunted Matches"]
menuitemvar [concatword (cl 2) "#M|A# " (loc "US")] [showmenu "M|A"]
menuitemvar [concatword (cl 0) "Mutsketeer " (loc "US")] [menuconnect xrd.me 4000 match]
menuitemvar [concatword (cl 1) "Noobicus " (loc "US" 1)] [showmenu "Noobicus"]
menuitemvar [concatword (cl 2) "THS " (loc "UK")] [menuconnect ths.cubers.net 1313]
menuitemvar [concatword (cl 9) "TyD " (loc "NL")] [menuconnect tearyoudown.com 21000 match]
menuitemvar [concatword (cl 0) "Waka Waka " (loc "US")][menuconnect match.wakawaka.ac]
menuitemvar [concatword (cl 1) "w00p " (loc "FR/UK" 1)][showmenu "w00p"]
menuitem [] -1
menuitemvar [concatword (cl 2) "Zombies " (loc "US")] [modconnect XRD.me 3000]

newmenu "FD"
menuitemvar [concatword (cl 1) "ac.fd.tc "] [menuconnect ac.fd.tc match]
menuitemvar [concatword (cl 1) "ac.fd.tc " (cl 5) "22222"] [menuconnect ac.fd.tc 22222 match]

// 0-green, 1-blue, 2-yellow, 3-red, 4-gray, 5-white, 6-dark brown, 7-dark red, 8-magenta, 9-orange
// Script by Wolf (thanks to Bukz for condensing and improving the script)