Нужна помощь (2)

[Сарыч]

del

[♆ ГЛОРЕНЦЕЛЬКА ♆]

Может лучше аддон на чат поставить?!

[Benuory]

Сарыч, аддон общедоступным будет?

[Suonu]

500кб боже как же это много, что у тебя за калькулятор там стоит

[Benuory]

До ума доведу, дропну на форум

Ждём.

[Гелемар]

Сарыч, а почему в авторах не указан Funkeh, код которого использован?

[Гелемар]

Сарыч, 80% кода, откопанного на форуме, из Basic Chat Mod :)

[Гелемар]

Сарыч, с самого же начала:
btn.png

[Екзорцист]

https://www.mediafire.com/file/0qgue...pyUrl.rar/file
лайт версия

[Artur91425]

Отрыл в инете шикарный парсер URL.
Если будешь его использовать, то советую обновить список доменов, я его дополнил на основе списка из википедии.

local domains = [[.aaa.aarp.abarth.abb.abbott.abbvie.abc.abogado.abudhabi.ac.academy.accenture.accountant.accountants.aco.active.actor.ad.ads.adult.ae.aeg.aero.aetna.af.afl.africa.ag.agakhan.agency.ai.aig.aigo.airbus.airforce.airtel.akdn.al.alfaromeo.alibaba.alipay.allfinanz.allstate.ally.alsace.alstom.am.amazon.americanexpress.amex.amica.amsterdam.an.analytics.android.anz.ao.aol.apartments.app.apple.aq.aquarelle.ar.arab.aramco.archi.army.arpa.art.arte.as.asia.associates.at.attorney.au.auction.audi.audible.audio.auspost.author.auto.autos.aw.aws.ax.axa.az.azure.ba.baby.baidu.bananarepublic.band.bank.bar.barcelona.barclaycard.barclays.barefoot.bargains.baseball.basketball.bauhaus.bayern.bb.bbc.bbt.bbva.bcg.bcn.bd.be.beauty.beer.bentley.berlin.best.bestbuy.bet.bf.bg.bh.bharti.bi.bible.bid.bike.bing.bingo.bio.biz.bj.black.blackfriday.blanco.block******.blog.bloomberg.blue.bm.bms.bmw.bn.bnl.bnpparibas.bo.boehringer.bom.bond.boo.book.booking.boots.bosch.bostik.boston.bot.boutique.box.bq.br.bradesco.bridgestone.broadway.broker.brother.brussels.bs.bt.budapest.bugatti.build.builders.business.buy.buzz.bv.bw.by.bz.bzh.ca.cab.cafe.cal.call.calvinklein.cam.camera.camp.cancerresearch.canon.capetown.capital.capitalone.car.caravan.cards.care.career.careers.cars.cartier.casa.case.cash.casino.cat.catering.catholic.cba.cbn.cbre.cbs.cc.cd.center.ceo.cern.cf.cfa.cfd.cg.ch.chanel.channel.chase.chat.cheap.chintai.christmas.chrome.chrysler.church.ci.cipriani.circle.cisco.citadel.citi.citic.city.ck.cl.claims.cleaning.click.clinic.clinique.clothing.cloud.club.clubmed.cm.cn.co.coach.codes.coffee.college.cologne.com.comcast.commbank.community.company.compare.computer.condos.construction.consulting.contact.contractors.cooking.cool.coop.corsica.country.coupon.coupons.courses.cr.credit.creditcard.creditunion.cricket.crown.crs.cruise.cruises.cs.csc.cu.cuisinella.cv.cw.cx.cy.cymru.cz.dabur.dad.dance.data.date.dating.datsun.day.dd.de.deal.dealer.deals.degree.delivery.dell.deloitte.delta.democrat.dental.dentist.desi.design.dev.dhl.diamonds.diet.digital.direct.directory.discount.discover.dish.diy.dj.dk.dm.dnp.do.docs.doctor.dodge.dog.doha.domains.dot.download.drive.dubai.duck.dunlop.dupont.durban.dvag.dz.earth.eat.ec.eco.edeka.edu.education.ee.eg.eh.email.emerck.energy.engineer.engineering.enterprises.epost.epson.equipment.er.ericsson.erni.es.esq.estate.esurance.et.etisalat.eu.eurovision.eus.events.everbank.example.exchange.expert.exposed.express.extraspace.fage.fail.fairwinds.faith.family.fan.fans.farm.farmers.fashion.fast.fedex.feedback.ferrari.ferrero.fi.fiat.fidelity.film.final.finance.financial.fire.firestone.firm.firmdale.fish.fishing.fit.fitness.fj.fk.flickr.flights.flir.florist.flowers.flsmidth.fly.fm.fo.foo.food.foodnetwork.football.ford.forex.forsale.forum.foundation.fox.fr.free.fresenius.frl.frogans.frontdoor.frontier.fujitsu.fujixerox.fun.fund.furniture.futbol.fx.fyi.ga.gal.gallery.gallo.gallup.game.games.gap.garden.gay.gb.gbiz.gd.gdn.ge.gea.gent.genting.gf.gg.gh.gi.gift.gifts.gives.giving.gl.glass.gle.global.globo.gm.gmail.gmbh.gmo.gmx.gn.godaddy.gold.goldpoint.golf.goodyear.goog.google.gop.gov.gp.gq.gr.grainger.graphics.gratis.green.gripe.grocery.group.gs.gt.gu.guardian.gucci.guide.guitars.guru.gw.gy.hair.hamburg.hangout.haus.hbo.hdfc.hdfcbank.health.healthcare.help.helsinki.here.hermes.hiphop.hisamitsu.hitachi.hiv.hk.hkt.hm.hn.hockey.holdings.holiday.homegoods.homes.homesense.honda.honeywell.horse.hospital.host.hosting.hot.hoteles.hotels.hotmail.house.how.hr.hsbc.ht.hu.hughes.hyatt.hyundai.ibm.ice.icu.id.ie.ieee.ifm.ikano.il.im.imdb.immo.immobilien.in.industries.infiniti.info.ing.ink.institute.insurance.insure.int.intel.international.intuit.invalid.investments.io.ipiranga.iq.ir.irish.is.iselect.ist.istanbul.it.itau.itv.iveco.jaguar.java.jcb.jcp.je.jeep.jetzt.jewelry.jm.jo.jobs.joburg.joy.jp.jpmorgan.juegos.juniper.kaufen.kddi.ke.kerryhotels.kerrylogistics.kerryproperties.kfh.kg.kh.ki.kia.kim.kinder.kindle.kitchen.kiwi.km.kn.koeln.komatsu.kp.kpmg.kr.krd.kred.kuokgroup.kw.ky.kyoto.kz.la.lacaixa.ladbrokes.lamborghini.lancaster.lancia.lancome.land.landrover.lanxess.lasalle.lat.latrobe.law.lawyer.lb.lc.lds.lease.leclerc.legal.lego.lexus.lgbt.li.liaison.lidl.life.lifeinsurance.lifestyle.lighting.like.lilly.limited.limo.lincoln.linde.link.lipsy.live.living.lixil.lk.loan.loans.local.localhost.locker.locus.lol.london.lotte.lotto.love.lpl.lplfinancial.lr.ls.lt.ltd.ltda.lu.lundbeck.lupin.luxe.luxury.lv.ly.ma.macys.madrid.maif.maison.makeup.man.management.mango.map.market.marketing.markets.marriott.maserati.mattel.mba.mc.mckinsey.md.me.med.media.meet.melbourne.meme.memorial.men.menu.metlife.mg.mh.miami.microsoft.mil.mini.mint.mit.mitsubishi.mk.ml.mlb.mm.mma.mn.mo.mobi.mobile.mobily.moda.moe.moi.mom.monash.money.monster.mormon.mortgage.moscow.moto.motorcycles.mov.movie.movistar.mp.mq.mr.ms.msd.mt.mtn.mtr.mu.museum.music.mutual.mv.mw.mx.my.mz.na.nadex.nagoya.name.nationwide.nato.natura.navy.nba.nc.ne.nec.net.netflix.network.neustar.new.newholland.news.nexus.nf.nfl.ng.ngo.nhk.ni.nico.nike.nikon.ninja.nissan.nissay.nl.no.nokia.nom.northwesternmutual.norton.now.np.nr.nra.nrw.nt.ntt.nu.nyc.nz.obi.observer.off.office.okinawa.om.omega.one.ong.onion.onl.online.ooo.open.oracle.orange.org.organic.origins.osaka.otsuka.ovh.pa.page.panasonic.paris.partners.parts.party.passagens.pay.pccw.pe.pet.pf.pfizer.pg.ph.pharmacy.philips.phone.photo.photography.photos.physio.piaget.pics.pictet.pictures.pid.pin.ping.pink.pioneer.pizza.pk.pl.place.play.playstation.plumbing.plus.pm.pn.pohl.poker.politie.porn.post.pr.praxi.press.prime.pro.prod.productions.prof.progressive.promo.properties.property.protection.pru.prudential.ps.pt.pub.pw.pwc.py.qa.qpon.quebec.quest.qvc.racing.radio.re.read.realestate.realtor.realty.recipes.red.redstone.rehab.reise.reisen.reit.reliance.ren.rent.rentals.repair.report.republican.rest.restaurant.review.reviews.rexroth.rich.ricoh.rio.rip.rmit.ro.rocher.rocks.rodeo.rogers.room.rs.rsvp.ru.rugby.ruhr.run.rw.rwe.ryukyu.sa.saarland.safe.safety.sakura.sale.samsung.sandvik.sandvikcoromant.sanofi.sap.sarl.save.saxo.sb.sbi.sbs.sc.sca.scb.schaeffler.schmidt.scholarships.school.schule.schwarz.science.scjohnson.scor.scot.sd.se.search.seat.secure.security.seek.select.sener.services.ses.seven.sew.sex.sexy.sfr.sg.sh.shangrila.sharp.shaw.shell.shiksha.shoes.shop.shopping.shouji.show.showtime.shriram.si.silk.sina.singles.site.sj.sk.ski.skin.sky.skype.sl.sling.sm.smart.smile.sn.sncf.so.soccer.social.softbank.software.sohu.solar.solutions.song.sony.soy.space.spiegel.sport.spot.spreadbetting.sr.ss.st.stada.staples.star.starhub.statebank.statefarm.statoil.stc.stcgroup.stockholm.storage.store.stream.studio.study.style.su.sucks.supplies.supply.support.surf.surgery.suzuki.sv.swatch.swiftcover.swiss.sx.sy.sydney.symantec.systems.sz.taipei.talk.taobao.target.tatamotors.tatar.tattoo.tax.taxi.tc.td.tdk.team.tech.technology.tel.telecity.telefonica.temasek.tennis.test.teva.tf.tg.th.theater.theatre.tickets.tienda.tiffany.tips.tires.tirol.tj.tjx.tk.tl.tm.tn.to.today.tokyo.tools.top.toray.toshiba.total.tours.town.toyota.toys.tp.tr.trade.trading.training.travel.travelchannel.travelers.travelersinsurance.trust.tt.tube.tui.tunes.tushu.tv.tvs.tw.tz.ua.ubs.uconnect.ug.uk.um.unicom.university.uno.uol.ups.us.uy.uz.va.vacations.vanguard.vc.ve.vegas.ventures.verisign.versicherung.vet.vg.vi.viajes.video.vig.viking.villas.vip.virgin.visa.vision.vista.vistaprint.vivo.vlaanderen.vn.vodka.volkswagen.volvo.vote.voting.voto.voyage.vu.vuelos.wales.walmart.walter.wang.wanggou.watch.watches.weather.weatherchannel.web.webcam.weber.website.wed.wedding.weibo.weir.wf.whoswho.wien.wiki.williamhill.win.windows.wine.winners.wme.wolterskluwer.woodside.work.works.world.wow.ws.wtc.wtf.xbox.xerox.xfinity.xihuan.xin.xxx.xyz.yachts.yahoo.yamaxun.yandex.ye.yodobashi.yoga.yokohama.you.youtube.yt.yu.za.zappos.zara.zero.zip.zippo.zm.zone.zr.zuerich.zw]]

- - - Updated - - -

Кстати, а почему не использовать готовое решение?))) Он прекрасно работает на 3.3.5 и без всякого лишнего г..., как ты любишь)
Правда, чтобы его запустить тебе нужно обновить Interface в .toc файле.

P.S. аддон хоть и рабочий и выполняющий свои функции, все же он не настолько гибко и корректно обрабатывает разные типы ссылок, чем пример, который я скинул выше. Конечно маловероятно, что будут в игре использовать сложные конструкции ссылок, но все же, ситуации разные бывают, а вдруг встретится такая "кривая" ссылка?)

[Artur91425]

Блин, я вчера когда ссылку на аддон вставлял не ту ссылку вставил, я имел ввиду вот этот аддон. Попробуй его, может тебе понравится его работа. Он как раз без всего лишнего и ненужного. Но если все же хочешь использовать тот парсер, то вот:

local color = "ff149bfd"

-- i fucking hate it
-- all characters allowed to be inside URL according to RFC 3986 but without
-- comma, semicolon, apostrophe, equal, brackets and parentheses
-- (as they are used frequently as URL separators)

local pattern1 = '(([%w_.~!*:@&+$/?%%#-]-)(%w[-.%w]*%.)(%w+)(:?)(%d*)(/?)([%w_.~!*:@&+$/?%%#=-]*))'
local pattern2 = '((%f[%w]%a+://)(%w[-.%w]*)(:?)(%d*)(/?)([%w_.~!*:@&+$/?%%#=-]*))'
-- https://en.wikipedia.org/wiki/List_of_Internet_top-level_domains
local domains = [[.aaa.aarp.abarth.abb.abbott.abbvie.abc.abogado.abudhabi.ac.academy.accenture.accountant.accountants.aco.active.actor.ad.ads.adult.ae.aeg.aero.aetna.af.afl.africa.ag.agakhan.agency.ai.aig.aigo.airbus.airforce.airtel.akdn.al.alfaromeo.alibaba.alipay.allfinanz.allstate.ally.alsace.alstom.am.amazon.americanexpress.amex.amica.amsterdam.an.analytics.android.anz.ao.aol.apartments.app.apple.aq.aquarelle.ar.arab.aramco.archi.army.arpa.art.arte.as.asia.associates.at.attorney.au.auction.audi.audible.audio.auspost.author.auto.autos.aw.aws.ax.axa.az.azure.ba.baby.baidu.bananarepublic.band.bank.bar.barcelona.barclaycard.barclays.barefoot.bargains.baseball.basketball.bauhaus.bayern.bb.bbc.bbt.bbva.bcg.bcn.bd.be.beauty.beer.bentley.berlin.best.bestbuy.bet.bf.bg.bh.bharti.bi.bible.bid.bike.bing.bingo.bio.biz.bj.black.blackfriday.blanco.block******.blog.bloomberg.blue.bm.bms.bmw.bn.bnl.bnpparibas.bo.boehringer.bom.bond.boo.book.booking.boots.bosch.bostik.boston.bot.boutique.box.bq.br.bradesco.bridgestone.broadway.broker.brother.brussels.bs.bt.budapest.bugatti.build.builders.business.buy.buzz.bv.bw.by.bz.bzh.ca.cab.cafe.cal.call.calvinklein.cam.camera.camp.cancerresearch.canon.capetown.capital.capitalone.car.caravan.cards.care.career.careers.cars.cartier.casa.case.cash.casino.cat.catering.catholic.cba.cbn.cbre.cbs.cc.cd.center.ceo.cern.cf.cfa.cfd.cg.ch.chanel.channel.chase.chat.cheap.chintai.christmas.chrome.chrysler.church.ci.cipriani.circle.cisco.citadel.citi.citic.city.ck.cl.claims.cleaning.click.clinic.clinique.clothing.cloud.club.clubmed.cm.cn.co.coach.codes.coffee.college.cologne.com.comcast.commbank.community.company.compare.computer.condos.construction.consulting.contact.contractors.cooking.cool.coop.corsica.country.coupon.coupons.courses.cr.credit.creditcard.creditunion.cricket.crown.crs.cruise.cruises.cs.csc.cu.cuisinella.cv.cw.cx.cy.cymru.cz.dabur.dad.dance.data.date.dating.datsun.day.dd.de.deal.dealer.deals.degree.delivery.dell.deloitte.delta.democrat.dental.dentist.desi.design.dev.dhl.diamonds.diet.digital.direct.directory.discount.discover.dish.diy.dj.dk.dm.dnp.do.docs.doctor.dodge.dog.doha.domains.dot.download.drive.dubai.duck.dunlop.dupont.durban.dvag.dz.earth.eat.ec.eco.edeka.edu.education.ee.eg.eh.email.emerck.energy.engineer.engineering.enterprises.epost.epson.equipment.er.ericsson.erni.es.esq.estate.esurance.et.etisalat.eu.eurovision.eus.events.everbank.example.exchange.expert.exposed.express.extraspace.fage.fail.fairwinds.faith.family.fan.fans.farm.farmers.fashion.fast.fedex.feedback.ferrari.ferrero.fi.fiat.fidelity.film.final.finance.financial.fire.firestone.firm.firmdale.fish.fishing.fit.fitness.fj.fk.flickr.flights.flir.florist.flowers.flsmidth.fly.fm.fo.foo.food.foodnetwork.football.ford.forex.forsale.forum.foundation.fox.fr.free.fresenius.frl.frogans.frontdoor.frontier.fujitsu.fujixerox.fun.fund.furniture.futbol.fx.fyi.ga.gal.gallery.gallo.gallup.game.games.gap.garden.gay.gb.gbiz.gd.gdn.ge.gea.gent.genting.gf.gg.gh.gi.gift.gifts.gives.giving.gl.glass.gle.global.globo.gm.gmail.gmbh.gmo.gmx.gn.godaddy.gold.goldpoint.golf.goodyear.goog.google.gop.gov.gp.gq.gr.grainger.graphics.gratis.green.gripe.grocery.group.gs.gt.gu.guardian.gucci.guide.guitars.guru.gw.gy.hair.hamburg.hangout.haus.hbo.hdfc.hdfcbank.health.healthcare.help.helsinki.here.hermes.hiphop.hisamitsu.hitachi.hiv.hk.hkt.hm.hn.hockey.holdings.holiday.homegoods.homes.homesense.honda.honeywell.horse.hospital.host.hosting.hot.hoteles.hotels.hotmail.house.how.hr.hsbc.ht.hu.hughes.hyatt.hyundai.ibm.ice.icu.id.ie.ieee.ifm.ikano.il.im.imdb.immo.immobilien.in.industries.infiniti.info.ing.ink.institute.insurance.insure.int.intel.international.intuit.invalid.investments.io.ipiranga.iq.ir.irish.is.iselect.ist.istanbul.it.itau.itv.iveco.jaguar.java.jcb.jcp.je.jeep.jetzt.jewelry.jm.jo.jobs.joburg.joy.jp.jpmorgan.juegos.juniper.kaufen.kddi.ke.kerryhotels.kerrylogistics.kerryproperties.kfh.kg.kh.ki.kia.kim.kinder.kindle.kitchen.kiwi.km.kn.koeln.komatsu.kp.kpmg.kr.krd.kred.kuokgroup.kw.ky.kyoto.kz.la.lacaixa.ladbrokes.lamborghini.lancaster.lancia.lancome.land.landrover.lanxess.lasalle.lat.latrobe.law.lawyer.lb.lc.lds.lease.leclerc.legal.lego.lexus.lgbt.li.liaison.lidl.life.lifeinsurance.lifestyle.lighting.like.lilly.limited.limo.lincoln.linde.link.lipsy.live.living.lixil.lk.loan.loans.local.localhost.locker.locus.lol.london.lotte.lotto.love.lpl.lplfinancial.lr.ls.lt.ltd.ltda.lu.lundbeck.lupin.luxe.luxury.lv.ly.ma.macys.madrid.maif.maison.makeup.man.management.mango.map.market.marketing.markets.marriott.maserati.mattel.mba.mc.mckinsey.md.me.med.media.meet.melbourne.meme.memorial.men.menu.metlife.mg.mh.miami.microsoft.mil.mini.mint.mit.mitsubishi.mk.ml.mlb.mm.mma.mn.mo.mobi.mobile.mobily.moda.moe.moi.mom.monash.money.monster.mormon.mortgage.moscow.moto.motorcycles.mov.movie.movistar.mp.mq.mr.ms.msd.mt.mtn.mtr.mu.museum.music.mutual.mv.mw.mx.my.mz.na.nadex.nagoya.name.nationwide.nato.natura.navy.nba.nc.ne.nec.net.netflix.network.neustar.new.newholland.news.nexus.nf.nfl.ng.ngo.nhk.ni.nico.nike.nikon.ninja.nissan.nissay.nl.no.nokia.nom.northwesternmutual.norton.now.np.nr.nra.nrw.nt.ntt.nu.nyc.nz.obi.observer.off.office.okinawa.om.omega.one.ong.onion.onl.online.ooo.open.oracle.orange.org.organic.origins.osaka.otsuka.ovh.pa.page.panasonic.paris.partners.parts.party.passagens.pay.pccw.pe.pet.pf.pfizer.pg.ph.pharmacy.philips.phone.photo.photography.photos.physio.piaget.pics.pictet.pictures.pid.pin.ping.pink.pioneer.pizza.pk.pl.place.play.playstation.plumbing.plus.pm.pn.pohl.poker.politie.porn.post.pr.praxi.press.prime.pro.prod.productions.prof.progressive.promo.properties.property.protection.pru.prudential.ps.pt.pub.pw.pwc.py.qa.qpon.quebec.quest.qvc.racing.radio.re.read.realestate.realtor.realty.recipes.red.redstone.rehab.reise.reisen.reit.reliance.ren.rent.rentals.repair.report.republican.rest.restaurant.review.reviews.rexroth.rich.ricoh.rio.rip.rmit.ro.rocher.rocks.rodeo.rogers.room.rs.rsvp.ru.rugby.ruhr.run.rw.rwe.ryukyu.sa.saarland.safe.safety.sakura.sale.samsung.sandvik.sandvikcoromant.sanofi.sap.sarl.save.saxo.sb.sbi.sbs.sc.sca.scb.schaeffler.schmidt.scholarships.school.schule.schwarz.science.scjohnson.scor.scot.sd.se.search.seat.secure.security.seek.select.sener.services.ses.seven.sew.sex.sexy.sfr.sg.sh.shangrila.sharp.shaw.shell.shiksha.shoes.shop.shopping.shouji.show.showtime.shriram.si.silk.sina.singles.site.sj.sk.ski.skin.sky.skype.sl.sling.sm.smart.smile.sn.sncf.so.soccer.social.softbank.software.sohu.solar.solutions.song.sony.soy.space.spiegel.sport.spot.spreadbetting.sr.ss.st.stada.staples.star.starhub.statebank.statefarm.statoil.stc.stcgroup.stockholm.storage.store.stream.studio.study.style.su.sucks.supplies.supply.support.surf.surgery.suzuki.sv.swatch.swiftcover.swiss.sx.sy.sydney.symantec.systems.sz.taipei.talk.taobao.target.tatamotors.tatar.tattoo.tax.taxi.tc.td.tdk.team.tech.technology.tel.telecity.telefonica.temasek.tennis.test.teva.tf.tg.th.theater.theatre.tickets.tienda.tiffany.tips.tires.tirol.tj.tjx.tk.tl.tm.tn.to.today.tokyo.tools.top.toray.toshiba.total.tours.town.toyota.toys.tp.tr.trade.trading.training.travel.travelchannel.travelers.travelersinsurance.trust.tt.tube.tui.tunes.tushu.tv.tvs.tw.tz.ua.ubs.uconnect.ug.uk.um.unicom.university.uno.uol.ups.us.uy.uz.va.vacations.vanguard.vc.ve.vegas.ventures.verisign.versicherung.vet.vg.vi.viajes.video.vig.viking.villas.vip.virgin.visa.vision.vista.vistaprint.vivo.vlaanderen.vn.vodka.volkswagen.volvo.vote.voting.voto.voyage.vu.vuelos.wales.walmart.walter.wang.wanggou.watch.watches.weather.weatherchannel.web.webcam.weber.website.wed.wedding.weibo.weir.wf.whoswho.wien.wiki.williamhill.win.windows.wine.winners.wme.wolterskluwer.woodside.work.works.world.wow.ws.wtc.wtf.xbox.xerox.xfinity.xihuan.xin.xxx.xyz.yachts.yahoo.yamaxun.yandex.ye.yodobashi.yoga.yokohama.you.youtube.yt.yu.za.zappos.zara.zero.zip.zippo.zm.zone.zr.zuerich.zw]]
local tlds = {}
for tld in domains:gmatch'%w+' do
  tlds[tld] = true
end
local function max4(a,b,c,d) return math.max(a+0, b+0, c+0, d+0) end
local protocols = {[''] = 0, ['http://'] = 0, ['https://'] = 0, ['ftp://'] = 0}

function formatURL(url)
  return ("|c%s|Hurl:%s|h[%s]|h|r"):format(color, url, url)
end

function makeClickable(self, event, msg, ...)
  local finished = {}

  for url, prot, subd, tld, colon, port, slash, path in msg:gmatch(pattern1) do
    if not finished[url] and protocols[prot:lower()] == (1 - #slash) * #path and not subd:find'%W%W'
      and (colon == '' or port ~= '' and port + 0 < 65536)
      and (tlds[tld:lower()] or tld:find'^%d+$' and subd:find'^%d+%.%d+%.%d+%.$'
      and max4(tld, subd:match'^(%d+)%.(%d+)%.(%d+)%.$') < 256)
    then
      finished[url] = true
      msg = msg:gsub(url:gsub("([%%%+%-%*%(%)%?%[%]%^])", "%%%1"), formatURL("%1"))
    end
  end

  for url, prot, dom, colon, port, slash, path in msg:gmatch(pattern2) do
    if not finished[url] and not (dom..'.'):find'%W%W'
      and protocols[prot:lower()] == (1 - #slash) * #path
      and (colon == '' or port ~= '' and port + 0 < 65536)
    then
      finished[url] = true
      msg = msg:gsub(url:gsub("([%%%+%-%*%(%)%?%[%]%^])", "%%%1"), formatURL("%1"))
    end
  end

  return false, msg, ...
end

StaticPopupDialogs["CLICK_LINK_CLICKURL"] = {
  text = "Copy & Paste the link into your browser",
  button1 = "Close",
  timeout = 0,
  whileDead = true,
  preferredIndex = 3,
  OnShow = function(self, data)
    self.editBox:SetText(data.url)
    self.editBox:HighlightText()
  end,
  hasEditBox = true,
  EditBoxOnEscapePressed = function(self) self:GetParent():Hide() end,
  EditBoxOnEnterPressed = function(self) self:GetParent():Hide() end,
}

local SetItemRef_orig = SetItemRef;
function ClickURL_SetItemRef(link, text, button)
  if link:sub(1, 3) == "url" then
    local url = link:sub(5)
    local d = {}
    d.url = url
    StaticPopup_Show("CLICK_LINK_CLICKURL", "", "", d)
  else
    SetItemRef_orig(link, text, button)
  end
end
SetItemRef = ClickURL_SetItemRef


local CHAT_TYPES = {
  "AFK",
  "BATTLEGROUND_LEADER",
  "BATTLEGROUND",
  "BN_WHISPER",
  "BN_WHISPER_INFORM",
  "CHANNEL",
  "DND",
  "EMOTE",
  "GUILD",
  "OFFICER",
  "PARTY_LEADER",
  "PARTY",
  "RAID_LEADER",
  "RAID_WARNING",
  "RAID",
  "SAY",
  "WHISPER",
  "WHISPER_INFORM",
  "YELL",
  "SYSTEM"
}

for _, chat_type in pairs(CHAT_TYPES) do
  ChatFrame_AddMessageEventFilter("CHAT_MSG_" .. chat_type, makeClickable)
end

P.S. за основу был взят код из вышеуказанного аддона. В нем реализована обработка всех сообщений чата игры лучше (на мой взгляд), чем в твоем аддоне.

- - - Updated - - -

Для проверки корректности обработки ссылок используй этот список: https://pastebin.pl/view/795a6467
Тут собраны различные варианты записи и типы ссылок. Заодно сможешь сверить несколько версий аддона и выбрать ту, какая больше понравится)

[Гелемар]

Сарыч, не агрись.

Совет:
1. Разбей файл на составные части по функциям, запихни их в отдельные файлы. Тогда можно будет включать/выключать функции чисто правкой toc.
2. Дерни из того же BCM ресайз и размещение поля ввода над фреймом чата.

Код на ресайз и размещение поля ввода над чатом оттуда

do
    for i = 1, 10 do
        --Разрешаем менять размер чатфрейма
        local cf = _G[format("%s%d", "ChatFrame", i)]
        cf:SetMinResize(0,0) --минимальный размер
        cf:SetMaxResize(0,0) --максимальный размер


        --Задаём границы перемещения чатфрейма в пределах экрана: число обозначает минимальный отступ от границ экрана, ближе которого чатфрейм поместить не получится
        cf:SetClampRectInsets(0,0,0,0)


        --Включаем переход стрелочками по символам в поле ввода
        local eb =  _G[format("%s%d%s", "ChatFrame", i, "EditBox")]
        eb:SetAltArrowKeyMode(false)
    end
    --Не даем чатфрейму выходить за пределы экрана
    BNToastFrame:SetClampedToScreen(true)
end

do
    for i =1, 10 do 
        local eb =  _G[format("%s%d%s", "ChatFrame", i, "EditBox")]
        local cf = _G[format("%s%d", "ChatFrame", i)]
        eb:ClearAllPoints()
        eb:SetPoint("BOTTOMLEFT",  cf, "TOPLEFT",  -5, 20) --значение 20 размещает поле ввода выше стандартных кнопок
        eb:SetPoint("BOTTOMRIGHT", cf, "TOPRIGHT", 5, 0)
    end
end