Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- 001: madtoggle = 0
- 004: Return (7.21)
- 005: if madtoggle = 0
- 007: SetSystemCursor("anicursor.ani")
- 020: BlankCursor := 0, SystemCursor := 0, FileCursor := 0
- 022: SystemCursors = 32512IDC_ARROW,32513IDC_IBEAM,32514IDC_WAIT,32515IDC_CROSS,32516IDC_UPARROW,32640IDC_SIZE,32641IDC_ICON,32642IDC_SIZENWSE,32643IDC_SIZENESW,32644IDC_SIZEWE,32645IDC_SIZENS,3264
- 027: if Cursor =
- 032: if SubStr( Cursor,1,4 ) = "IDC_"
- 051: if FileExist( Cursor )
- 053: SplitPath,Cursor,,,Ext
- 054: if Ext = ico
- 056: if Ext in cur,ani
- 057: uType := 0x2
- 063: FileCursor = 1
- 064: }
- 070: if CursorHandle <> Error
- 072: Loop,Parse,SystemCursors,,
- 074: if BlankCursor = 1
- 082: if SystemCursor = 1
- 091: if FileCursor = 1
- 093: Type = FileCursor
- 094: %Type%%A_Index% := DllCall( "LoadImageA", UInt,0, Str,Cursor, UInt,uType, Int,cx, Int,cy, UInt,0x10 )
- 096: DllCall( "SetSystemCursor", Uint,%Type%%A_Index%, Int,SubStr( A_Loopfield, 1, 5 ) )
- 097: }
- 098: }
- 074: if BlankCursor = 1
- 082: if SystemCursor = 1
- 091: if FileCursor = 1
- 093: Type = FileCursor
- 094: %Type%%A_Index% := DllCall( "LoadImageA", UInt,0, Str,Cursor, UInt,uType, Int,cx, Int,cy, UInt,0x10 ) (0.14)
- 096: DllCall( "SetSystemCursor", Uint,%Type%%A_Index%, Int,SubStr( A_Loopfield, 1, 5 ) )
- 097: }
- 098: }
- 074: if BlankCursor = 1
- 082: if SystemCursor = 1
- 091: if FileCursor = 1
- 093: Type = FileCursor
- 094: %Type%%A_Index% := DllCall( "LoadImageA", UInt,0, Str,Cursor, UInt,uType, Int,cx, Int,cy, UInt,0x10 ) (0.07)
- 096: DllCall( "SetSystemCursor", Uint,%Type%%A_Index%, Int,SubStr( A_Loopfield, 1, 5 ) )
- 097: }
- 098: }
- 074: if BlankCursor = 1
- 082: if SystemCursor = 1
- 091: if FileCursor = 1
- 093: Type = FileCursor
- 094: %Type%%A_Index% := DllCall( "LoadImageA", UInt,0, Str,Cursor, UInt,uType, Int,cx, Int,cy, UInt,0x10 )
- 096: DllCall( "SetSystemCursor", Uint,%Type%%A_Index%, Int,SubStr( A_Loopfield, 1, 5 ) )
- 097: }
- 098: }
- 074: if BlankCursor = 1
- 082: if SystemCursor = 1
- 091: if FileCursor = 1
- 093: Type = FileCursor
- 094: %Type%%A_Index% := DllCall( "LoadImageA", UInt,0, Str,Cursor, UInt,uType, Int,cx, Int,cy, UInt,0x10 )
- 096: DllCall( "SetSystemCursor", Uint,%Type%%A_Index%, Int,SubStr( A_Loopfield, 1, 5 ) )
- 097: }
- 098: }
- 074: if BlankCursor = 1
- 082: if SystemCursor = 1
- 091: if FileCursor = 1
- 093: Type = FileCursor
- 094: %Type%%A_Index% := DllCall( "LoadImageA", UInt,0, Str,Cursor, UInt,uType, Int,cx, Int,cy, UInt,0x10 ) (0.05)
- 096: DllCall( "SetSystemCursor", Uint,%Type%%A_Index%, Int,SubStr( A_Loopfield, 1, 5 ) )
- 097: }
- 098: }
- 074: if BlankCursor = 1
- 082: if SystemCursor = 1
- 091: if FileCursor = 1
- 093: Type = FileCursor
- 094: %Type%%A_Index% := DllCall( "LoadImageA", UInt,0, Str,Cursor, UInt,uType, Int,cx, Int,cy, UInt,0x10 ) (0.11)
- 096: DllCall( "SetSystemCursor", Uint,%Type%%A_Index%, Int,SubStr( A_Loopfield, 1, 5 ) )
- 097: }
- 098: }
- 074: if BlankCursor = 1
- 082: if SystemCursor = 1
- 091: if FileCursor = 1
- 093: Type = FileCursor
- 094: %Type%%A_Index% := DllCall( "LoadImageA", UInt,0, Str,Cursor, UInt,uType, Int,cx, Int,cy, UInt,0x10 ) (0.07)
- 096: DllCall( "SetSystemCursor", Uint,%Type%%A_Index%, Int,SubStr( A_Loopfield, 1, 5 ) )
- 097: }
- 098: }
- 074: if BlankCursor = 1
- 082: if SystemCursor = 1
- 091: if FileCursor = 1
- 093: Type = FileCursor
- 094: %Type%%A_Index% := DllCall( "LoadImageA", UInt,0, Str,Cursor, UInt,uType, Int,cx, Int,cy, UInt,0x10 )
- 096: DllCall( "SetSystemCursor", Uint,%Type%%A_Index%, Int,SubStr( A_Loopfield, 1, 5 ) )
- 097: }
- 098: }
- 074: if BlankCursor = 1
- 082: if SystemCursor = 1
- 091: if FileCursor = 1
- 093: Type = FileCursor
- 094: %Type%%A_Index% := DllCall( "LoadImageA", UInt,0, Str,Cursor, UInt,uType, Int,cx, Int,cy, UInt,0x10 ) (0.02)
- 096: DllCall( "SetSystemCursor", Uint,%Type%%A_Index%, Int,SubStr( A_Loopfield, 1, 5 ) )
- 097: }
- 098: }
- 074: if BlankCursor = 1
- 082: if SystemCursor = 1
- 091: if FileCursor = 1
- 093: Type = FileCursor
- 094: %Type%%A_Index% := DllCall( "LoadImageA", UInt,0, Str,Cursor, UInt,uType, Int,cx, Int,cy, UInt,0x10 )
- 096: DllCall( "SetSystemCursor", Uint,%Type%%A_Index%, Int,SubStr( A_Loopfield, 1, 5 ) )
- 097: }
- 098: }
- 074: if BlankCursor = 1
- 082: if SystemCursor = 1
- 091: if FileCursor = 1
- 093: Type = FileCursor
- 094: %Type%%A_Index% := DllCall( "LoadImageA", UInt,0, Str,Cursor, UInt,uType, Int,cx, Int,cy, UInt,0x10 ) (0.15)
- 096: DllCall( "SetSystemCursor", Uint,%Type%%A_Index%, Int,SubStr( A_Loopfield, 1, 5 ) )
- 097: }
- 098: }
- 074: if BlankCursor = 1
- 082: if SystemCursor = 1
- 091: if FileCursor = 1
- 093: Type = FileCursor
- 094: %Type%%A_Index% := DllCall( "LoadImageA", UInt,0, Str,Cursor, UInt,uType, Int,cx, Int,cy, UInt,0x10 )
- 096: DllCall( "SetSystemCursor", Uint,%Type%%A_Index%, Int,SubStr( A_Loopfield, 1, 5 ) )
- 097: }
- 098: }
- 074: if BlankCursor = 1
- 082: if SystemCursor = 1
- 091: if FileCursor = 1
- 093: Type = FileCursor
- 094: %Type%%A_Index% := DllCall( "LoadImageA", UInt,0, Str,Cursor, UInt,uType, Int,cx, Int,cy, UInt,0x10 ) (0.14)
- 096: DllCall( "SetSystemCursor", Uint,%Type%%A_Index%, Int,SubStr( A_Loopfield, 1, 5 ) )
- 097: }
- 098: }
- 074: if BlankCursor = 1
- 082: if SystemCursor = 1
- 091: if FileCursor = 1
- 093: Type = FileCursor
- 094: %Type%%A_Index% := DllCall( "LoadImageA", UInt,0, Str,Cursor, UInt,uType, Int,cx, Int,cy, UInt,0x10 ) (0.11)
- 096: DllCall( "SetSystemCursor", Uint,%Type%%A_Index%, Int,SubStr( A_Loopfield, 1, 5 ) )
- 097: }
- 098: }
- 074: if BlankCursor = 1
- 082: if SystemCursor = 1
- 091: if FileCursor = 1
- 093: Type = FileCursor
- 094: %Type%%A_Index% := DllCall( "LoadImageA", UInt,0, Str,Cursor, UInt,uType, Int,cx, Int,cy, UInt,0x10 ) (0.13)
- 096: DllCall( "SetSystemCursor", Uint,%Type%%A_Index%, Int,SubStr( A_Loopfield, 1, 5 ) )
- 097: }
- 098: }
- 099: }
- 100: }
- 008: madtoggle = 1
- 009: Return (5.48)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement