Skip to content

Instantly share code, notes, and snippets.

View rmgimenez's full-sized avatar

Ricardo Moura Gimenez rmgimenez

View GitHub Profile
@rmgimenez
rmgimenez / Strings.pas
Created June 15, 2016 12:13
Unit com várias funções para strings
unit Strings;
interface
uses
Windows, Dialogs, Messages, SysUtils, Classes, Controls, StdCtrls, Mask;
function ArredontaFloat(x : Real): Real;
function RoundNum(Valor:Extended;Decimais:Integer):Extended;
function Gerapercentual(valor:real;Percent:Real):real;
@rmgimenez
rmgimenez / ler_cotacao_hist_bovespa.py
Created June 13, 2016 18:01
Lê um arquivo de cotação da Bovespa e joga os valores para variáveis
ref_arquivo = open("COTAHIST_A2016.TXT","r")
# formata uma data do tipo yyyymmdd para dd/mm/yyyy
def formata_data(data):
return data[6:8] + '/' + data[4:6] + '/' + data[0:4]
def formata_numero(numero):
return int(numero) / 100
for linha in ref_arquivo:
@rmgimenez
rmgimenez / share_button.js
Last active June 10, 2016 19:27
Botões de compartilhar conteúdos para blogs
// Vertical
<script>
document.write('<script src="//sharebutton.net/plugin/sharebutton.php?type=vertical&u=' + encodeURIComponent(document.location.href) + '"></scr' + 'ipt>');
</script>
// Horizontal
<script>
document.write('<script src="//sharebutton.net/plugin/sharebutton.php?type=horizontal&u=' + encodeURIComponent(document.location.href) + '"></scr' + 'ipt>');
</script>
@rmgimenez
rmgimenez / MY_Model.php
Last active June 7, 2016 12:35
Classe que extende a classe padrão de model do CodeIginiter. Com essa classe fica mais fácil fazer consultas no banco de dados usando o CodeIginiter. É importante que a chave das suas tabelas seja o campo com o nome "id"
<?php if ( ! defined('BASEPATH')) exit('No direct script access allowed');
// http://jeromejaglale.com/doc/php/codeigniter_models
// Salvar em : application/core/MY_Model.php
class MY_Model extends CI_Model {
var $table = "";
function __construct()
{
parent::__construct();
@rmgimenez
rmgimenez / data_extenso.pas
Created June 7, 2016 12:24
Data por extenso no delphi
function DataExtenso(Data:TDateTime): String;
var
NoDia : Integer;
DiaDaSemana : array [1..7] of String;
Meses : array [1..12] of String;
Dia, Mes, Ano : Word;
begin
DiaDasemana [1]:= 'Domingo';
DiaDasemana [2]:= 'Segunda-feira';
DiaDasemana [3]:= 'Terçafeira';
@rmgimenez
rmgimenez / destravar_registro_oracle.sql
Created June 7, 2016 12:21
Script para destravar registro travado no banco de dados Oracle
Select l1.sid,
' esta bloqueando ' "Esta bloqueando",
l2.sid,
' matar esse => ' "Matar esse",
l1.sid,
l3.serial#,
'ALTER SYSTEM KILL SESSION '''|| l1.sid || ','|| l3.serial# ||'''' comando
From v$lock l1,
v$lock l2,
v$session l3
def fib_rec(n):
# essa é a condição que fará com que a função pare de chamar ela mesma
if n==1 or n==2:
return 1 # e retorne algum valor, que nos dois casos será 1
# o retorno da função se não entrar no if que termina a recursão é ela chamar
# ela mesmo diminuindo o valor do parâmetro por 1 e depois por 2 e somar os resultados
# a função vai diminuindo o valor de n até que entre na função que para a recursão
return fib_rec(n-1) + fib_rec(n-2)
from time import time
start = time()
'''
Retorna true se o ano é bissexto e false se não for
'''
def is_leap_year(ano):
if (ano % 2 != 0):
return False
else:
<?php
defined('BASEPATH') OR exit('No direct script access allowed');
class C_administracao extends CI_Controller {
function __construct()
{
parent::__construct();
}