Skip to content

Instantly share code, notes, and snippets.

use strict;
use MIME::Base64;
use Crypt::OpenSSL::AES;
sub descifra_ip {
my ($loc_3, $loc_4) = @_;
my ($loc_5, $loc_6, $loc_7, $loc_8, $loc_9, $loc_10);
$loc_3 = decode_base64($loc_3);
$loc_4 = decode_base64($loc_4);
package
{
import com.hurlant.util.Base64;
import com.hurlant.crypto.symmetric.AESKey;
import flash.utils.*;
public class Tester {
public function descifra_ip(cookie:String, claveCifrado:String) : String {
var t:ByteArray = Base64.decodeToByteArray(cookie);
@wodim
wodim / watch-ng.pl
Last active February 4, 2019 10:31
Irssi script that implements a notify list using the WATCH command
use Irssi;
use strict;
use vars qw($VERSION %IRSSI);
# Changelog
# 0.9: initial release
# 0.91: show online/offline notifications in query windows if open
# 0.92: fix connection time in stopped_watching_host_last
# 0.93: fix removal of nicks from the notify list
# 0.94: reduced the max length of WATCH commands
@wodim
wodim / ban-affects.pl
Last active August 9, 2020 22:37
Irssi script that shows a list of nicks affected by a ban once it's set or unset
use Irssi;
use strict;
use vars qw($VERSION %IRSSI);
$VERSION = "0.3";
%IRSSI = (
authors => "wodim",
contact => 'wodim@outlook.com',
name => "ban-affects",
description => "Shows a list of nicks affected by a ban once it's set or unset",
@wodim
wodim / Preferences.sublime-settings
Last active March 31, 2018 17:32
my sublimetext config
{
"font_size": 9,
"translate_tabs_to_spaces": true,
"trim_trailing_white_space_on_save": true,
"default_line_ending": "unix",
"auto_match_enabled": false,
"tab_size": 4,
"detect_indentation": false,
"rulers": [79],
"auto_complete": false,
use Irssi;
use strict;
use vars qw($VERSION %IRSSI);
$VERSION = "1.0";
%IRSSI = (
authors => "",
contact => "",
name => "",
description => "",
license => "",
@wodim
wodim / main.scm
Created July 13, 2014 10:42
main.scm from GTA: Vice City
This file has been truncated, but you can view the full file.
DEFINE OBJECTS 204
DEFINE OBJECT (noname)
DEFINE OBJECT DTN_STADDOORA // Object number -1
DEFINE OBJECT DTN_STADDOORB // Object number -2
DEFINE OBJECT DTHOTRING_A // Object number -3
DEFINE OBJECT BRIBE // Object number -4
DEFINE OBJECT CI_GATESCLOSED // Object number -5
DEFINE OBJECT CI_BACKGATECLOSE // Object number -6
DEFINE OBJECT INFO // Object number -7
DEFINE OBJECT YT_MAIN_BODY // Object number -8
@wodim
wodim / sound_extract.py
Created July 17, 2014 12:01
Script to extract the .wav audio files from sfx.raw from GTA 3 and Vice City
# wodim, 17/07/2014 -- public domain
# This script can be used to get information and/or extract
# the .wav files inside the .raw files of the GTA 3 and Vice City games.
# They are located inside the /audio folder once the game is installed.
# There are two files: sfx.raw and sfx.sdt. The raw file includes the audio
# samples, and the sdt file includes pointers to each sample, with information
# such as the size and the sample rate. Here is a detailed description, from the
# GTAModding wiki site: http://www.gtamodding.com/index.php?title=SFX
@wodim
wodim / AutoHotkey.ahk
Last active October 3, 2021 13:30
My AutoHotkey script
; disable alt+f4
!F4::return
; disable alt+esc
!Escape::return
; allows to close windows using alt+pgdown
!PgDn::WinKill, A
; a few bindings: altgr+key to add some characters
; that are not part of the spanish keyboard layout
<^>!z::Send «
@wodim
wodim / hueg.pl
Created August 28, 2014 21:14
hueg.pl
######
# hueg.pl PRO MODE
# modded by ma0 and others
# respekts 2 jakk and others
######
use Irssi;
use vars qw($VERSION %IRSSI);
Irssi::command_bind hueg => \&hueg;
$maxchars = 10; #num of chars b4 split
my $reverse = 0;