Script lines most recently executed (oldest first). Press [F5] to refresh. The seconds elapsed between a line and the one after it is in parentheses to the right (if not 0). The bottommost line's elapsed time is the number of seconds since it executed.
---- C:\WinClip\evernote_code_wrap.ahk
027: WinClip.SetText(plainText)
---- C:\WinClip\WinClip.ahk
402: if ( textData = "" )
404: clipSize := this._fromclipboard( clipData )
051: if !WinClipAPI.OpenClipboard()
---- C:\WinClip\WinClipAPI.ahk
055: Return,DllCall( "OpenClipboard", "Ptr", 0 )
---- C:\WinClip\WinClip.ahk
053: nextformat := 0
054: objFormats := object()
055: clipSize := 0
056: formatsNum := 0
057: While,( nextformat := WinClipAPI.EnumClipboardFormats( nextformat ) )
---- C:\WinClip\WinClipAPI.ahk
070: Return,DllCall( "EnumClipboardFormats", "UInt", format )
---- C:\WinClip\WinClip.ahk
080: structSize := formatsNum*( 4 + 4 ) + clipSize
081: if !structSize
082: Return,0
405: if !( clipSize := this._appendText( clipData, clipSize, textData, 1 ) )
548: objFormats := this._parseClipboardData( clipData, clipSize )
163: offset := 0
164: formats := object()
165: While,( offset < size )
182: Return,formats
549: uFmt := this.ClipboardFormats.CF_UNICODETEXT
550: str := ""
551: if ( objFormats.haskey( uFmt ) && !IsSet )
554: objFormats[ uFmt ] := object()
555: str .= textData
556: sLen := ( StrLen( str ) + 1 ) * 2
557: ObjSetCapacity( objFormats[ uFmt ], "buffer", sLen )
558: StrPut( str, ObjGetAddress( objFormats[ uFmt ], "buffer" ), sLen, "UTF-16" )
559: objFormats[ uFmt ].size := sLen
560: Return,this._compileClipData( clipData, objFormats )
187: if !IsObject( objClip )
190: clipSize := 0
191: For fmt,params in objClip
192: clipSize += 8 + params.size
193: VarSetCapacity( out_data, clipSize, 0 )
194: offset := 0
195: For fmt,params in objClip
197: NumPut( fmt, out_data, offset, "UInt" )
198: offset += 4
199: NumPut( params.size, out_data, offset, "UInt" )
200: offset += 4
201: WinClipAPI.memcopy( &out_data + offset, ObjGetAddress( params, "buffer" ), params.size )
---- C:\WinClip\WinClipAPI.ahk
040: Return,DllCall( "msvcrt\memcpy", "ptr", dest, "ptr", src, "uint", size )
---- C:\WinClip\WinClip.ahk
202: offset += params.size
203: }
204: Return,clipSize
407: Return,this._toclipboard( clipData, clipSize )
011: if !WinClipAPI.OpenClipboard()
---- C:\WinClip\WinClipAPI.ahk
055: Return,DllCall( "OpenClipboard", "Ptr", 0 )
---- C:\WinClip\WinClip.ahk
013: offset := 0
014: lastPartOffset := 0
015: WinClipAPI.EmptyClipboard()
---- C:\WinClip\WinClipAPI.ahk
067: Return,DllCall( "EmptyClipboard" )
---- C:\WinClip\WinClip.ahk
016: While,( offset < size )
018: if !( fmt := NumGet( data, offset, "UInt" ) )
020: offset += 4
021: if !( dataSize := NumGet( data, offset, "UInt" ) )
023: offset += 4
024: if ( ( offset + dataSize ) > size )
026: if !( pData := WinClipAPI.GlobalLock( WinClipAPI.GlobalAlloc( 0x0042, dataSize ) ) )
---- C:\WinClip\WinClipAPI.ahk
052: Return,DllCall( "GlobalAlloc", "Uint", flags, "Uint", size )
046: Return,DllCall( "GlobalLock", "Ptr", hMem )
---- C:\WinClip\WinClip.ahk
031: WinClipAPI.memcopy( pData, &data + offset, dataSize )
---- C:\WinClip\WinClipAPI.ahk
040: Return,DllCall( "msvcrt\memcpy", "ptr", dest, "ptr", src, "uint", size )
---- C:\WinClip\WinClip.ahk
032: if ( fmt == this.ClipboardFormats.CF_ENHMETAFILE )
035: pClipData := pData
036: if !pClipData
038: WinClipAPI.SetClipboardData( fmt, pClipData )
---- C:\WinClip\WinClipAPI.ahk
061: Return,DllCall( "SetClipboardData", "Uint", format, "Ptr", hMem )
---- C:\WinClip\WinClip.ahk
039: if ( fmt == this.ClipboardFormats.CF_ENHMETAFILE )
041: WinClipAPI.GlobalUnlock( pData )
---- C:\WinClip\WinClipAPI.ahk
049: Return,DllCall( "GlobalUnlock", "Ptr", hMem )
---- C:\WinClip\WinClip.ahk
042: offset += dataSize
043: lastPartOffset := offset
044: }
016: While,( offset < size )
045: WinClipAPI.CloseClipboard()
---- C:\WinClip\WinClipAPI.ahk
058: Return,DllCall( "CloseClipboard" )
---- C:\WinClip\WinClip.ahk
046: Return,lastPartOffset
---- C:\WinClip\evernote_code_wrap.ahk
030: plainText := RegExReplace(plainText, "\t", " ")
031: Transform,innerHtml,HTML,plainText
032: innerHtml := RegExReplace(innerHtml, "[\r\n]", "")
033: innerHtml := RegExReplace(innerHtml, "
", "
")
034: innerHtml := RegExReplace(innerHtml, "
", "
")
035: innerHtml := RegExReplace(innerHtml, " ", " ")
038: html := "
"
040: WinClip.SetHTML(html)
---- C:\WinClip\WinClip.ahk
485: if ( html = "" )
487: clipSize := this._fromclipboard( clipData )
051: if !WinClipAPI.OpenClipboard()
---- C:\WinClip\WinClipAPI.ahk
055: Return,DllCall( "OpenClipboard", "Ptr", 0 )
---- C:\WinClip\WinClip.ahk
053: nextformat := 0
054: objFormats := object()
055: clipSize := 0
056: formatsNum := 0
057: While,( nextformat := WinClipAPI.EnumClipboardFormats( nextformat ) )
---- C:\WinClip\WinClipAPI.ahk
070: Return,DllCall( "EnumClipboardFormats", "UInt", format )
---- C:\WinClip\WinClip.ahk
059: if this.skipFormats.hasKey( nextformat )
061: if ( dataHandle := WinClipAPI.GetClipboardData( nextformat ) )
---- C:\WinClip\WinClipAPI.ahk
064: Return,DllCall( "GetClipboardData", "Uint", format )
---- C:\WinClip\WinClip.ahk
063: pObjPtr := 0, nObjSize := 0
064: if ( nextFormat == this.ClipboardFormats.CF_ENHMETAFILE )
069: if ( nSize := WinClipAPI.GlobalSize( WinClipAPI.GlobalLock( dataHandle ) ) )
---- C:\WinClip\WinClipAPI.ahk
046: Return,DllCall( "GlobalLock", "Ptr", hMem )
043: Return,DllCall( "GlobalSize", "Ptr", hObj )
---- C:\WinClip\WinClip.ahk
070: pObjPtr := dataHandle, nObjSize := nSize
073: if !( pObjPtr && nObjSize )
075: objFormats[ nextformat ] := { handle : pObjPtr, size : nObjSize }
076: clipSize += nObjSize
077: formatsNum += 1
078: }
079: }
057: While,( nextformat := WinClipAPI.EnumClipboardFormats( nextformat ) )
---- C:\WinClip\WinClipAPI.ahk
070: Return,DllCall( "EnumClipboardFormats", "UInt", format )
---- C:\WinClip\WinClip.ahk
059: if this.skipFormats.hasKey( nextformat )
061: if ( dataHandle := WinClipAPI.GetClipboardData( nextformat ) )
---- C:\WinClip\WinClipAPI.ahk
064: Return,DllCall( "GetClipboardData", "Uint", format )
---- C:\WinClip\WinClip.ahk
063: pObjPtr := 0, nObjSize := 0
064: if ( nextFormat == this.ClipboardFormats.CF_ENHMETAFILE )
069: if ( nSize := WinClipAPI.GlobalSize( WinClipAPI.GlobalLock( dataHandle ) ) )
---- C:\WinClip\WinClipAPI.ahk
046: Return,DllCall( "GlobalLock", "Ptr", hMem )
043: Return,DllCall( "GlobalSize", "Ptr", hObj )
---- C:\WinClip\WinClip.ahk
070: pObjPtr := dataHandle, nObjSize := nSize
073: if !( pObjPtr && nObjSize )
075: objFormats[ nextformat ] := { handle : pObjPtr, size : nObjSize }
076: clipSize += nObjSize
077: formatsNum += 1
078: }
079: }
057: While,( nextformat := WinClipAPI.EnumClipboardFormats( nextformat ) )
---- C:\WinClip\WinClipAPI.ahk
070: Return,DllCall( "EnumClipboardFormats", "UInt", format )
---- C:\WinClip\WinClip.ahk
059: if this.skipFormats.hasKey( nextformat )
060: Continue
057: While,( nextformat := WinClipAPI.EnumClipboardFormats( nextformat ) )
---- C:\WinClip\WinClipAPI.ahk
070: Return,DllCall( "EnumClipboardFormats", "UInt", format )
---- C:\WinClip\WinClip.ahk
059: if this.skipFormats.hasKey( nextformat )
060: Continue
057: While,( nextformat := WinClipAPI.EnumClipboardFormats( nextformat ) )
---- C:\WinClip\WinClipAPI.ahk
070: Return,DllCall( "EnumClipboardFormats", "UInt", format ) (0.03)
---- C:\WinClip\WinClip.ahk
080: structSize := formatsNum*( 4 + 4 ) + clipSize
081: if !structSize
083: VarSetCapacity( clipData, structSize, 0 )
088: offset := 0
089: For fmt,params in objFormats
091: NumPut( fmt, &clipData, offset, "UInt" )
092: offset += 4
093: NumPut( params.size, &clipData, offset, "UInt" )
094: offset += 4
095: WinClipAPI.memcopy( &clipData + offset, params.handle, params.size )
---- C:\WinClip\WinClipAPI.ahk
040: Return,DllCall( "msvcrt\memcpy", "ptr", dest, "ptr", src, "uint", size )
---- C:\WinClip\WinClip.ahk
096: offset += params.size
097: WinClipAPI.GlobalUnlock( params.handle )
---- C:\WinClip\WinClipAPI.ahk
049: Return,DllCall( "GlobalUnlock", "Ptr", hMem )
---- C:\WinClip\WinClip.ahk
098: }
091: NumPut( fmt, &clipData, offset, "UInt" )
092: offset += 4
093: NumPut( params.size, &clipData, offset, "UInt" )
094: offset += 4
095: WinClipAPI.memcopy( &clipData + offset, params.handle, params.size )
---- C:\WinClip\WinClipAPI.ahk
040: Return,DllCall( "msvcrt\memcpy", "ptr", dest, "ptr", src, "uint", size )
---- C:\WinClip\WinClip.ahk
096: offset += params.size
097: WinClipAPI.GlobalUnlock( params.handle )
---- C:\WinClip\WinClipAPI.ahk
049: Return,DllCall( "GlobalUnlock", "Ptr", hMem )
---- C:\WinClip\WinClip.ahk
098: }
099: WinClipAPI.CloseClipboard()
---- C:\WinClip\WinClipAPI.ahk
058: Return,DllCall( "CloseClipboard" )
---- C:\WinClip\WinClip.ahk
100: Return,structSize
488: if !( clipSize := this._setHTML( clipData, clipSize, html, source ) )
513: objFormats := this._parseClipboardData( clipData, clipSize )
163: offset := 0
164: formats := object()
165: While,( offset < size )
167: if !( fmt := NumGet( data, offset, "UInt" ) )
169: offset += 4
170: if !( dataSize := NumGet( data, offset, "UInt" ) )
172: offset += 4
173: if ( ( offset + dataSize ) > size )
175: params := { name : this._getFormatName( fmt ), size : dataSize }
885: if this.formatByValue.HasKey( iformat )
886: Return,this.formatByValue[ iformat ]
176: ObjSetCapacity( params, "buffer", dataSize )
177: pBuf := ObjGetAddress( params, "buffer" )
178: WinClipAPI.memcopy( pBuf, &data + offset, dataSize )
---- C:\WinClip\WinClipAPI.ahk
040: Return,DllCall( "msvcrt\memcpy", "ptr", dest, "ptr", src, "uint", size )
---- C:\WinClip\WinClip.ahk
179: formats[ fmt ] := params
180: offset += dataSize
181: }
165: While,( offset < size )
167: if !( fmt := NumGet( data, offset, "UInt" ) )
169: offset += 4
170: if !( dataSize := NumGet( data, offset, "UInt" ) )
172: offset += 4
173: if ( ( offset + dataSize ) > size )
175: params := { name : this._getFormatName( fmt ), size : dataSize }
885: if this.formatByValue.HasKey( iformat )
886: Return,this.formatByValue[ iformat ]
176: ObjSetCapacity( params, "buffer", dataSize )
177: pBuf := ObjGetAddress( params, "buffer" )
178: WinClipAPI.memcopy( pBuf, &data + offset, dataSize )
---- C:\WinClip\WinClipAPI.ahk
040: Return,DllCall( "msvcrt\memcpy", "ptr", dest, "ptr", src, "uint", size )
---- C:\WinClip\WinClip.ahk
179: formats[ fmt ] := params
180: offset += dataSize
181: }
165: While,( offset < size )
182: Return,formats
514: uFmt := WinClipAPI.RegisterClipboardFormat( "HTML Format" )
---- C:\WinClip\WinClipAPI.ahk
219: Return,DllCall( "RegisterClipboardFormat", "ptr", &fmtName )
---- C:\WinClip\WinClip.ahk
515: objFormats[ uFmt ] := object()
516: encoding := "UTF-8"
517: htmlLen := StrPut( htmlData, encoding ) - 1
518: srcLen := 2 + 10 + StrPut( source, encoding ) - 1
519: StartHTML := this._calcHTMLLen( 105 + srcLen )
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
508: Return,num
520: EndHTML := this._calcHTMLLen( StartHTML + htmlLen + 76 )
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
508: Return,num
521: StartFragment := this._calcHTMLLen( StartHTML + 38 )
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
508: Return,num
522: EndFragment := this._calcHTMLLen( StartFragment + htmlLen )
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
507: num := "0" . num
506: While,( StrLen( num ) < 10 )
508: Return,num
523: html = Version:0.9
StartHTML:%StartHTML%
EndHTML:%EndHTML%
StartFragment:%StartFragment%
EndFragment:%EndFragment%
SourceURL:%source%
%htmlData%
size )
026: if !( pData := WinClipAPI.GlobalLock( WinClipAPI.GlobalAlloc( 0x0042, dataSize ) ) )
---- C:\WinClip\WinClipAPI.ahk
052: Return,DllCall( "GlobalAlloc", "Uint", flags, "Uint", size )
046: Return,DllCall( "GlobalLock", "Ptr", hMem )
---- C:\WinClip\WinClip.ahk
031: WinClipAPI.memcopy( pData, &data + offset, dataSize )
---- C:\WinClip\WinClipAPI.ahk
040: Return,DllCall( "msvcrt\memcpy", "ptr", dest, "ptr", src, "uint", size )
---- C:\WinClip\WinClip.ahk
032: if ( fmt == this.ClipboardFormats.CF_ENHMETAFILE )
035: pClipData := pData
036: if !pClipData
038: WinClipAPI.SetClipboardData( fmt, pClipData )
---- C:\WinClip\WinClipAPI.ahk
061: Return,DllCall( "SetClipboardData", "Uint", format, "Ptr", hMem )
---- C:\WinClip\WinClip.ahk
039: if ( fmt == this.ClipboardFormats.CF_ENHMETAFILE )
041: WinClipAPI.GlobalUnlock( pData )
---- C:\WinClip\WinClipAPI.ahk
049: Return,DllCall( "GlobalUnlock", "Ptr", hMem )
---- C:\WinClip\WinClip.ahk
042: offset += dataSize
043: lastPartOffset := offset
044: }
016: While,( offset < size )
018: if !( fmt := NumGet( data, offset, "UInt" ) )
020: offset += 4
021: if !( dataSize := NumGet( data, offset, "UInt" ) )
023: offset += 4
024: if ( ( offset + dataSize ) > size )
026: if !( pData := WinClipAPI.GlobalLock( WinClipAPI.GlobalAlloc( 0x0042, dataSize ) ) )
---- C:\WinClip\WinClipAPI.ahk
052: Return,DllCall( "GlobalAlloc", "Uint", flags, "Uint", size )
046: Return,DllCall( "GlobalLock", "Ptr", hMem )
---- C:\WinClip\WinClip.ahk
031: WinClipAPI.memcopy( pData, &data + offset, dataSize )
---- C:\WinClip\WinClipAPI.ahk
040: Return,DllCall( "msvcrt\memcpy", "ptr", dest, "ptr", src, "uint", size )
---- C:\WinClip\WinClip.ahk
032: if ( fmt == this.ClipboardFormats.CF_ENHMETAFILE )
035: pClipData := pData
036: if !pClipData
038: WinClipAPI.SetClipboardData( fmt, pClipData )
---- C:\WinClip\WinClipAPI.ahk
061: Return,DllCall( "SetClipboardData", "Uint", format, "Ptr", hMem )
---- C:\WinClip\WinClip.ahk
039: if ( fmt == this.ClipboardFormats.CF_ENHMETAFILE )
041: WinClipAPI.GlobalUnlock( pData )
---- C:\WinClip\WinClipAPI.ahk
049: Return,DllCall( "GlobalUnlock", "Ptr", hMem )
---- C:\WinClip\WinClip.ahk
042: offset += dataSize
043: lastPartOffset := offset
044: }
016: While,( offset < size )
018: if !( fmt := NumGet( data, offset, "UInt" ) )
020: offset += 4
021: if !( dataSize := NumGet( data, offset, "UInt" ) )
023: offset += 4
024: if ( ( offset + dataSize ) > size )
026: if !( pData := WinClipAPI.GlobalLock( WinClipAPI.GlobalAlloc( 0x0042, dataSize ) ) )
---- C:\WinClip\WinClipAPI.ahk
052: Return,DllCall( "GlobalAlloc", "Uint", flags, "Uint", size )
046: Return,DllCall( "GlobalLock", "Ptr", hMem )
---- C:\WinClip\WinClip.ahk
031: WinClipAPI.memcopy( pData, &data + offset, dataSize )
---- C:\WinClip\WinClipAPI.ahk
040: Return,DllCall( "msvcrt\memcpy", "ptr", dest, "ptr", src, "uint", size )
---- C:\WinClip\WinClip.ahk
032: if ( fmt == this.ClipboardFormats.CF_ENHMETAFILE )
035: pClipData := pData
036: if !pClipData
038: WinClipAPI.SetClipboardData( fmt, pClipData )
---- C:\WinClip\WinClipAPI.ahk
061: Return,DllCall( "SetClipboardData", "Uint", format, "Ptr", hMem )
---- C:\WinClip\WinClip.ahk
039: if ( fmt == this.ClipboardFormats.CF_ENHMETAFILE )
041: WinClipAPI.GlobalUnlock( pData )
---- C:\WinClip\WinClipAPI.ahk
049: Return,DllCall( "GlobalUnlock", "Ptr", hMem )
---- C:\WinClip\WinClip.ahk
042: offset += dataSize
043: lastPartOffset := offset
044: }
016: While,( offset < size )
045: WinClipAPI.CloseClipboard()
---- C:\WinClip\WinClipAPI.ahk
058: Return,DllCall( "CloseClipboard" )
---- C:\WinClip\WinClip.ahk
046: Return,lastPartOffset
---- C:\WinClip\evernote_code_wrap.ahk
041: }
019: Send,^v (0.03)
020: }
015: Return (21.47)
Press [F5] to refresh.