Barqs

; IP Retrieval Script v1.0 by Barqs @ irc.Koach.com ; 2023-08-21 ; Discover a seamless way to uncover your public IP address within the mIRC environment ; with the IP Retrieval Script v1.0. Crafted by Barqs, this script simplifies the process of ; obtaining your IP address, whether you're a seasoned mIRC user or just starting your IRC journey. ; With a single command, the /ip command, you can harness the power of the script. ; Watch as it effortlessly establishes a connection to the reliable httpbin.org API and retrieves ; your public IP address. The result is swiftly presented on your mIRC client screen, making it ; easy to access the vital information that defines your online presence. ; Whether you're curious about your IP address or looking to enhance your mIRC experience, ; the IP Retrieval Script v1.0 offers a user-friendly solution that emphasizes simplicity, ; effectiveness, and convenience. Elevate your mIRC experience and embark on your journey ; into the world of IP retrieval with Barqs' expertly crafted script. ; Uncover your digital identity effortlessly with the IP Retrieval Script v1.0 – because knowing ; your IP address shouldn't be a challenge. ; Command usage: /ip alias ip { ; This is the alias definition for the /ip command. if ($sock(ip)) sockclose ip ; Checks if a socket with the identifier "ip" is open. ; If it is, the existing socket is closed using sockclose. sockopen ip httpbin.org 80 ; Opens a new socket with the identifier "ip" to the host "httpbin.org" on port 80. ; This will establish a connection to httpbin.org for communication. echo -ca info * Retrieving IP address... ; Displays a message in the mIRC client indicating that the script is retrieving the IP address. } on *:SOCKOPEN:ip: { ; This event is triggered when the socket with the identifier "ip" is successfully opened. sockwrite -nt ip GET /ip HTTP/1.1 ; Writes a GET request to the socket to retrieve the IP address. ; It specifies the path "/ip" and the HTTP version 1.1. sockwrite -nt ip Host: httpbin.org ; Writes the "Host" header to the socket, indicating the host to request data from. sockwrite -nt ip Connection: close ; Writes the "Connection" header to the socket, indicating that the connection should be closed after the response. sockwrite -nt ip $crlf ; Writes an empty line (carriage return + line feed) to indicate the end of the request headers. } on *:SOCKREAD:ip: { ; This event is triggered when data is read from the socket with the identifier "ip". var %ipAddress ; Declares a variable named %ipAddress to store the extracted IP address. sockread %ipAddress ; Reads a line of data from the socket and stores it in the %ipAddress variable. if ($regex(%ipAddress,/"origin": "(.*?)"/)) { ; Checks if the line of data matches a regular expression pattern. ; This pattern captures the IP address information from the response. ; The captured IP address will be stored in the $regml(1) identifier. var %ipAddress = $regml(1) ; Assigns the captured IP address to the %ipAddress variable. echo -ca info2 * Your IP: %ipAddress ; Displays a message in the mIRC client showing your IP address. echo -ca info * Retrieving IP address finished... ; Displays a message indicating that the process of retrieving the IP address is complete. sockclose ip ; Closes the socket with the identifier "ip" now that the IP address has been extracted. } }