This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
from abc import ABC, abstractmethod | |
import logging | |
from enum import Enum | |
import inspect | |
import threading | |
from typing import Any, Callable, get_type_hints, override, Self | |
from functools import partial | |
from ssdi.exceptions import ( | |
ServicesCircularDependencyError, |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
; This is an AutoHotKey script designed to be used with Diablo III | |
; Pressing F1 will constantly activate skill 1, F2 will activate skill 2, F3 for 3, and F4 for 4 | |
; The keys are togglable. | |
Thread, interrupt, 0 | |
togF1 := 0 | |
$F1:: | |
togF1 := !togF1 | |
if (togF1) { |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# -*- coding: utf-8 -*- | |
""" | |
Created on Fri Jul 3 11:09:36 2015 | |
@author: James.Innes | |
""" | |
import requests | |
import json | |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Sub CombineSheets() | |
Dim I As Integer | |
On Error Resume Next | |
Sheets(1).Select | |
Worksheets.Add | |
Sheets(1).Name = "Combined" | |
Sheets(2).range("A1").EntireRow.Select | |
Selection.Copy Destination:=Sheets(1).range("A1") |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Function ANNA_MAP(anna_text As String) As String | |
Dim map As String | |
Dim RegExp As Object | |
Set RegExp = CreateObject("VBScript.RegExp") | |
Dim aPattern As String | |
Dim nPattern As String | |
Dim cPattern As String | |
aPattern = "[a-zA-Z]" | |
nPattern = "[0-9]" |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Function CAT(cell_range As range, delim As String) As String | |
Dim CAT_iter As String | |
Dim iter As Integer | |
iter = 1 | |
For Each cell In cell_range | |
If iter = cell_range.Count Then | |
CAT_iter = CAT_iter & cell.Value | |
Else | |
CAT_iter = CAT_iter & cell.Value & delim |