2014년 9월 24일 수요일

2014년 8월 17일 일요일

keygen

http://pincopall.altervista.org/cratut/ThunderPwr-CDtoMP3115-tutorial7.htm

load dll asm

.file "loaddllex.cpp" .intel_syntax noprefix .def ___main; .scl 2; .type 32; .endef .section .rdata,"dr" LC0: .ascii "C:\\work\\dummy.dll\0" .text .globl _main .def _main; .scl 2; .type 32; .endef _main: LFB6: lea ecx, [esp+4] LCFI0: and esp, -16 push DWORD PTR [ecx-4] push ebp LCFI1: mov ebp, esp push ecx LCFI2: sub esp, 36 call ___main mov DWORD PTR [esp], OFFSET FLAT:LC0 call _LoadLibraryA@4 sub esp, 4 mov DWORD PTR [ebp-12], eax mov eax, 0 mov ecx, DWORD PTR [ebp-4] LCFI3: leave LCFI4: lea esp, [ecx-4] LCFI5: ret LFE6: .section .eh_frame,"w" Lframe1: .long LECIE1-LSCIE1 LSCIE1: .long 0 .byte 0x3 .ascii "\0" .uleb128 0x1 .sleb128 -4 .uleb128 0x8 .byte 0xc .uleb128 0x4 .uleb128 0x4 .byte 0x88 .uleb128 0x1 .align 4 LECIE1: LSFDE1: .long LEFDE1-LASFDE1 LASFDE1: .long LASFDE1-Lframe1 .long LFB6 .long LFE6-LFB6 .byte 0x4 .long LCFI0-LFB6 .byte 0xc .uleb128 0x1 .uleb128 0 .byte 0x4 .long LCFI1-LCFI0 .byte 0x10 .byte 0x5 .uleb128 0x2 .byte 0x75 .sleb128 0 .byte 0x4 .long LCFI2-LCFI1 .byte 0xf .uleb128 0x3 .byte 0x75 .sleb128 -4 .byte 0x6 .byte 0x4 .long LCFI3-LCFI2 .byte 0xc .uleb128 0x1 .uleb128 0 .byte 0x4 .long LCFI4-LCFI3 .byte 0xc5 .byte 0x4 .long LCFI5-LCFI4 .byte 0xc .uleb128 0x4 .uleb128 0x4 .align 4 LEFDE1: .ident "GCC: (GNU) 4.8.1" .def _LoadLibraryA@4; .scl 2; .type 32; .endef

2014년 8월 16일 토요일

k-mean clustering

require(graphics) beta1<-c(-0.130811881,-0.124113184,-0.111084035,-0.346505179,0.146765992,-0.203682819) beta2<-c(0.19744896,0.158675025,0.098311959,0.644843941,-0.197478252,0.278922585) beta1<-c(-0.130811881, -0.124113184, -0.111084035, -0.346505179, 0.146765992, -0.201818799, 0.109229194, -0.203682819, -0.124113184, -0.065281704, -0.089614531) beta2<-c(0.19744896, 0.158675025, 0.098311959, 0.644843941, -0.197478252, 0.100779252, -0.204082744, 0.278922585, 0.158675025, 0.099221018, 0.136914875) x <- cbind(beta1, beta2) colnames(x) <- c("x", "y") (cl <- kmeans(x, 2)) plot(x, col = cl$cluster) points(cl$centers, col = 1:2, pch = 8, cex = 2) # sum of squares ss <- function(x) sum(scale(x, scale = FALSE)^2) ## cluster centers "fitted" to each obs.: fitted.x <- fitted(cl); head(fitted.x) resid.x <- x - fitted(cl) ## Equalities : ---------------------------------- cbind(cl[c("betweenss", "tot.withinss", "totss")], # the same two columns c(ss(fitted.x), ss(resid.x), ss(x))) stopifnot(all.equal(cl$ totss, ss(x)), all.equal(cl$ tot.withinss, ss(resid.x)), ## these three are the same: all.equal(cl$ betweenss, ss(fitted.x)), all.equal(cl$ betweenss, cl$totss - cl$tot.withinss), ## and hence also all.equal(ss(x), ss(fitted.x) + ss(resid.x)) ) kmeans(x,1)$withinss # trivial one-cluster, (its W.SS == ss(x)) ## random starts do help here with too many clusters ## (and are often recommended anyway!): (cl <- kmeans(x, 5, nstart = 25)) plot(x, col = cl$cluster) points(cl$centers, col = 1:5, pch = 8)

2014년 7월 28일 월요일

2014년 7월 27일 일요일

텍스트 파일 병합 펄 스크립트

$name = "name.txt"; $formular = "formular.txt"; $A = "A.txt"; $B = "B.txt"; $C = "C.txt"; open $fh_name, '<', $name or die "Cannot open $name: $!"; open $fh_formular, '<', $formular or die "Cannot open $formular: $!"; open $fh_A, '<', $A or die "Cannot open $A: $!"; open $fh_B, '<', $B or die "Cannot open $B: $!"; open $fh_C, '<', $C or die "Cannot open $C: $!"; open $table, '>table.txt'; my $n = @{[<$fh_name>]}; seek $fh_name,0,0; for ($i=1; $i<= $n; $i++){ $l_name = <$fh_name>; chomp($l_name); $l_formular = <$fh_formular>; chomp($l_formular); $l_A = <$fh_A>; chomp($l_A); $l_B = <$fh_B>; chomp($l_B); $l_C = <$fh_C>; chomp($l_C); print $table "$l_name\t$l_formular\t$l_A\t$l_B\t$l_C\n"; }

2014년 7월 23일 수요일

이클립스 프로젝트 SWT 예제

1.[File]-[New]-[Java Project]


[New]-[Class]

소스코드 입력

import org.eclipse.swt.SWT;
import org.eclipse.swt.events.SelectionEvent;
import org.eclipse.swt.events.SelectionListener;
import org.eclipse.swt.layout.RowLayout;
import org.eclipse.swt.widgets.Button;
import org.eclipse.swt.widgets.Display;
import org.eclipse.swt.widgets.Shell;
import org.eclipse.swt.widgets.Text;

/**
 * @author Steven Holzner
 * 
 */
public class SWTButtonExampleDemo {

  public static void main(String[] args) {
    Display display = new Display();
    Shell shell = new Shell(display);
    shell.setSize(300, 200);
    shell.setText("Button Example");
    shell.setLayout(new RowLayout());

    final Button button = new Button(shell, SWT.PUSH);
    button.setText("Click Me");

    final Text text = new Text(shell, SWT.SHADOW_IN);

    button.addSelectionListener(new SelectionListener() {

      public void widgetSelected(SelectionEvent event) {
        text.setText("No worries!");
      }

      public void widgetDefaultSelected(SelectionEvent event) {
        text.setText("No worries!");
      }
    });
    shell.open();
    while (!shell.isDisposed()) {
      if (!display.readAndDispatch())
        display.sleep();
    }
    display.dispose();
  }
}



2. [Project]-[Java Build Path]-[Libraries]-[Add External JARs]