Skip to content

Instantly share code, notes, and snippets.

View Brutt's full-sized avatar

Ukraїner Brutt

View GitHub Profile
@Brutt
Brutt / 2
Last active August 29, 2015 14:19
function PARSEEXPORTDATAFROMMINI2(p_numdoc t_mini_numdoc, p_numrow t_mini_numrow, p_price t_mini_price,
p_qtysale t_mini_qtysal, p_sumsale t_mini_sumsale, p_qtyret t_mini_qtyret,
p_sumret t_mini_sumret) return integer is
i integer;
v_array t_exportdatafrommini_tree := t_exportdatafrommini_tree();
begin
--наполняем коллекцию
for i in 1..p_numdoc.COUNT loop
v_array.Extend();
v_array(v_array.count) := t_exportdatafrommini(p_numdoc(i), p_numrow(i), p_price(i),
@Brutt
Brutt / rollback_in_loop_1
Created September 3, 2015 06:32
rollback_in_loop_1
declare
i integer;
begin
insert into tbl_1
(id1)
values
(1);
for s in (SELECT t.* FROM all_objects t where rownum < 3) loop
begin
@Brutt
Brutt / Rollback_in_loop_2
Last active September 3, 2015 07:21
Rollback_in_loop_2
/*using savepoint*/
declare
i integer;
cnt number := 0;
begin
insert into tbl_1
(id1)
values
(1);
@Brutt
Brutt / projecteuler_net_problem_5
Last active August 17, 2016 10:56
My version of decision of problem 5 "Smallest multiple"
#https://projecteuler.net/problem=5
#python 3.5.2
import time
from functools import reduce as reduce
start = time.time()
simpleList = [2,3,5,7,11,13,17,19]
@Brutt
Brutt / pythonchallenge_10
Created August 22, 2016 09:51
My version of decision of pythonchallenge №10
#http://www.pythonchallenge.com/
#challenge num_10
import re
import time
start = time.time()
def GetNextNum(num):
num1 = re.sub('[2]+', ' 0 ', num)
@Brutt
Brutt / raspberry_pir_sms_twilio
Created August 27, 2016 13:52
Send the sms when raspberry registered any movement. For sms sending I use free Twilio trial
import RPi.GPIO as GPIO
import time
from datetime import datetime
def SendSms(msg):
from twilio.rest import TwilioRestClient
client = TwilioRestClient("Your ACCOUNT SID",
"Your AUTH TOKEN")
@Brutt
Brutt / BlobToTImage
Created December 27, 2016 16:22
Load blob to TImage Delphi
procedure LoadImageFromDbToTImage(img: TImage; Field: string; id: integer);
var
memStream: TMemoryStream;
Graphic: Graphics.TGraphic;
bm: Graphics.Tbitmap;
begin
odsImages.Close;
odsImages.SetVariable('id', id); //ИД картинки
odsImages.Open;
@Brutt
Brutt / camera
Created January 29, 2017 20:16
Detection movement and sending email via gmail
import picamera
import time
import RPi.GPIO as GPIO
from datetime import datetime
import smtplib
from os.path import basename
from email.mime.application import MIMEApplication
from email.mime.multipart import MIMEMultipart
#send e-mail via gmail
@Brutt
Brutt / 4wd_robot_arduino_bluetooth
Created April 1, 2017 12:10
4wd robot arduino bluetooth control
int enableA = 1;
int pinA1 = 3;
int pinA2 = 2;
int enableB = 6;
int pinB1 = 5;
int pinB2 = 4;
char state = '0';
@Brutt
Brutt / ultrasonic_sensor_4wd_robot_arduino
Created April 1, 2017 12:18
From Youtube, corrected code for 4wd robot arduino and ultrasonic sensor
#include <Servo.h>
Servo myservo;
int enableA = 1;
int pinA1 = 3;
int pinA2 = 2;
int servposnum = 0;
int servpos = 0;
int enableB = 6;