bunnyboi

.586                                      ; create 32 bit code
.model flat, stdcall                      ; 32 bit memory model
option casemap :none                      ; case sensitive

include test.inc

    .data
      rlen  dd 0
      .radix 16
      buff  db 05,45,6D,61,69,6C,0A,59,61,68,6F,6F,20,4D,6A,69,6C,0,0,0
      .radix 10
    .data?
    buffer byte 13 dup (?)
    .code
; �������������������������������������������������������������������������
start:
; �������������������������������������������������������������������������
    xor ebx, ebx
    .WHILE ebx < SIZEOF buff
      mov al, [buff+ebx]
      print xbyte$(al)
      .IF ebx < SIZEOF buff - 1
        print chr$(",")
      .ENDIF
      inc ebx
    .ENDW
    print chr$(13,10)
    invoke CreateFile,addr buffer,
                      GENERIC_READ or GENERIC_WRITE,
                      NULL,
                      NULL,
                      CREATE_ALWAYS,
                      FILE_ATTRIBUTE_NORMAL,
                      NULL
    mov ebx, eax
    print "file handle      "
    print ustr$(ebx),13,10

    invoke WriteFile, ebx, ADDR buff, SIZEOF buff, ADDR rlen, NULL
    print "bytes written    "
    print ustr$(rlen),13,10

    print "new file pointer "
    invoke SetFilePointer,ebx, 0, 0, FILE_BEGIN
    print ustr$(eax),13,10

    invoke ReadFile, ebx, ADDR buff, SIZEOF buff, ADDR rlen, NULL
    print "bytes read       "
    print ustr$(rlen),13,10

    xor ebx, ebx
    .WHILE ebx < SIZEOF buff
      mov al, [buff+ebx]
      print xbyte$(al)
      .IF ebx < SIZEOF buff - 1
        print chr$(",")
      .ENDIF
      inc ebx
    .ENDW
    print chr$(13,10)

    inkey "Press any key to exit..."
    exit
; �������������������������������������������������������������������������
end start