Skip to content

Instantly share code, notes, and snippets.

View Danyboy's full-sized avatar

Danyboy

12 followers · 11 following
  • Saint-Petersburg
View GitHub Profile
@Danyboy
Danyboy / untrusted-lvl7-solution.js
Created April 17, 2014 19:31 — forked from anonymous/untrusted-lvl7-solution.js
/*************
* colors.js *
*************
*
* You're almost at the exit. You just need to get past this
* color lock.
*
* Changing your environment is no longer enough. You must
* learn to change yourself. I've sent you a little something
* that should help with that.
@Danyboy
Danyboy / untrusted-lvl10-solution.js
Created April 17, 2014 20:46 — forked from anonymous/untrusted-lvl10-solution.js
/*************
* ambush.js *
*************
*
* Oh. Oh, I see. This wasn't quite part of the plan.
*
* Looks like they won't let you take the Algorithm
* without a fight. You'll need to carefully weave your
* way through the guard drones.
*
@Danyboy
Danyboy / untrusted-lvl20-solution.js
Created April 18, 2014 21:31 — forked from anonymous/untrusted-lvl20-solution.js
/*****************
* bossFight.js *
*****************
*
* NO FARTHER, DR. EVAL!!!!
* YOU WILL NOT GET OUT OF HERE ALIVE!!!!
* IT'S TIME YOU SEE MY TRUE FORM!!!!
* FACE MY ROBOT WRATH!!!!!
*/
@Danyboy
Danyboy / gist:365d1abd7d3ff0db09ac
Created May 13, 2014 20:51
SmallTest
import java.lang.reflect.InvocationTargetException;
import java.util.Arrays;
import java.util.Objects;
import java.util.Timer;
/**
* Created by Dany on 01.05.14.
*/
public class QuickSort {
private static int[][] arrays;
@Danyboy
Danyboy / coocking.html
Created November 10, 2014 20:24
<html>
<head>
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
<title>Готовим борщ:</title>
<style>
.fig {
text-align: center; /* Выравнивание по центру */
}
.text {
text-align: center;
@Danyboy
Danyboy / gist:c1464ccfa6aeeff88c27
Created April 7, 2015 21:54
Const FILL_MACROS_DIR As String = "D:\2015\macro\"
Const FILL_MACROS_DOC As String = "D:\2015\macro\Template\01_zapros_dokumentatsia_O_Fkhd.doc"
Const DEFAULT_COMP_NAME As String = "ÎÀÎ ""Íîâàÿ ÝÐÀ"""
Const DEFAULT_DIR_NAME As String = "ã-íó Óðóñîâó Ð.À."
Const DEFAULT_DATE_NAME As String = """20"" ôåâðàëÿ 2015 ãîäà"
Sub test1()
Dim pathh As String
Dim pathhi As String
@Danyboy
Danyboy / temp_macro_not_my
Created April 7, 2015 21:57
Sub Test2()
' Select cell A2, *first line of data*.
Range("B4").Select
' Set Do loop to stop when an empty cell is reached.
Do Until IsEmpty(ActiveCell)
' Insert your code here.
With ActiveDocument.Content.Find.Execute FindText:="{variable1}", ReplaceWith:=""
' Step down 1 row from present location.
@Danyboy
Danyboy / macro_not_work
Created April 7, 2015 22:27
Const FILL_MACROS_DIR As String = "D:\2015\macro\"
Const FILL_MACROS_DOC As String = "D:\2015\macro\Template\01_zapros_dokumentatsia_O_Fkhd.doc"
Const DEFAULT_COMP_NAME As String = "ÎÀÎ ""Íîâàÿ ÝÐÀ"""
Const DEFAULT_DIR_NAME As String = "ã-íó Óðóñîâó Ð.À."
Const DEFAULT_DATE_NAME As String = """20"" ôåâðàëÿ 2015 ãîäà"
Sub test1()
Dim pathh As String
Dim pathhi As String
@Danyboy
Danyboy / macro_work_1
Created April 7, 2015 22:51
Const FILL_MACROS_DIR As String = "D:\2015\macro\"
Const FILL_MACROS_DOC As String = "D:\2015\macro\Template\01_zapros_dokumentatsia_O_Fkhd.doc"
Const DEFAULT_COMP_NAME As String = "ÎÀÎ ""Íîâàÿ ÝÐÀ"""
Const DEFAULT_DIR_NAME As String = "ã-íó Óðóñîâó Ð.À."
Const DEFAULT_DATE_NAME As String = """20"" ôåâðàëÿ 2015 ãîäà"
Sub MyReplace()
Dim pathh As String
Dim pathhi As String
@Danyboy
Danyboy / macro_work_2.vb
Last active August 29, 2015 14:18
work иногда не открывает файл второй раз, исправил замену второго и следующих файлов
Const FILL_MACROS_DIR As String = "D:\2015\macro\"
Const FILL_MACROS_OUT As String = FILL_MACROS_DIR & "Result\"
Const MACROS_TEMPLATE As String = FILL_MACROS_DIR & "Template\"
'' Copy files from FILL_MACROS_DIR and replace words by excel cells
Sub MyReplace()
On Error Resume Next
MkDir (FILL_MACROS_OUT)