Asc: Difference between revisions

From NSIS Wiki
Jump to navigationJump to search
mNo edit summary
Line 20: Line 20:
<highlight-nsis>
<highlight-nsis>
!macro Asc _STRING _RETURN
!macro Asc _STRING _RETURN
  ; save global registers
  Push $0
  Push $1
  Push $2
  Push $3   
  ; store parameter
   Push ${_STRING}
   Push ${_STRING}
   Call Asc         
   Call Asc         
  ; restore global register       
  Pop $3
  Pop $2
  Pop $1
  Exch $0
   Pop ${_RETURN}
   Pop ${_RETURN}
!macroend
!macroend
Line 45: Line 34:
;  
;  
; "String"  ; string argument
; "String"  ; string argument
; "Return"  ; Variable where the ASCII code is returned. The function returns -1 if no ASCII code was found.
; "Return"  ; Variable where the ASCII code is returned.
;  
;  
; e.g.
; e.g.
Line 53: Line 42:


     ; get parameter
     ; get parameter
     Pop $1 ; CHAR
     Exch $0 ; CHAR
     StrCpy $1 $1 1
     Push $1
   
    IntOp $0 0 + 0
    Asc.Do:
        IntFmt $2 %c $0
        System::Call 'kernel32::lstrcmpA(t, t) i(r1,r2) .r3'
        StrCmp $3 "0" Asc.Exit
        IntOp $0 $0 + 1
    StrCmp $0 256 0 Asc.Do
    StrCpy $0 "-1"


     Asc.Exit:
     StrCpy $0 $0 1
    System::Call "*(&t4 r0)i.r1"
    System::Call "*$1(i .r0)"
    System::Free $1


    Pop $1
    Exch $0
FunctionEnd
FunctionEnd
</highlight-nsis>
</highlight-nsis>


[[Category:String Functions]]
[[Category:String Functions]]

Revision as of 17:31, 3 October 2005

Author: nechai (talk, contrib)


Description

Returns an Integer representing the character code corresponding to the first letter in a string.

Syntax

${Asc} "String"

"String"   ; string argument

Stack 1    ; Ascii code

Usage

 ${Asc} "a" $0 ; returns 97 in $0
 ${Asc} "AA" $0 ; returns 65 in $0

The Function

!macro Asc _STRING _RETURN
   Push ${_STRING}
   Call Asc        
   Pop ${_RETURN}
!macroend
 
!define Asc "!insertmacro Asc"
 
Function Asc
; Returns an Integer representing the character code corresponding to the first letter in a string.
; 
; Syntax:
; ${Asc} "String" "Return"
; 
; "String"   ; string argument
; "Return"   ; Variable where the ASCII code is returned.
; 
; e.g.
; ${Asc} "a" $0 ; returns 97 in $0
; ${Asc} "AA" $0 ; returns 65 in $0
;
 
    ; get parameter
    Exch $0 ; CHAR
    Push $1
 
    StrCpy $0 $0 1
    System::Call "*(&t4 r0)i.r1"
    System::Call "*$1(i .r0)"
    System::Free $1
 
    Pop $1
    Exch $0
FunctionEnd