RadASM 3.0 bugtest

[ragdog]

Hi

If this a bug?

Open Radasm without auto the last opening project or file

now if the file menu grey instead of blue

http://www.imagebanana.com/view/o12huilf/xyz.png

this is same with and without my Addin

And i code a addin to add a menu entry in ther first menu
this is not added by Open Radasm without auto the last opening project or file

Start i Radasm with auto opening project works fine with my addin and this blue menu.

[ragdog]

Hi

I have found a bug in the Project converter (convert Radasm2 to Radasm3 project file

I Convert a dll project with this tool and after sucessfully converted projectfile
if my project a exe project

[Make]
Make=0
0=Window Release,'/v "$R"',"$R.res",'/c /coff /Cp "$C"',"$C.obj",'/SUBSYSTEM:WINDOWS /RELEASE /VERSION:4.0 /OUT:$O $C $M $R',"$C.exe",'',

Now must i change manuelly the Projecttype with Project option

[Make]
Make=0
0=Dll Release,'/v "$R"',"$R.res",'/c /coff /Cp "$C"',"$C.obj",'/SUBSYSTEM:WINDOWS /RELEASE /VERSION:4.0 /DLL /DEF:$D /OUT:$O $C $M $R',"$C.dll",'',

[ragdog]

Hi

I missing a function on CodeComplete Listboxn in Radasm 2x and 3x
Have i many entry in this listbox need i a MouseWheel function to scroll down and up

I have add to my Radasm this function

Code Select Expand


CodeCompleteProc proc hWin:HWND,uMsg:UINT,wParam:WPARAM,lParam:LPARAM
LOCAL rect:RECT

mov eax,uMsg
.if eax==WM_CHAR
mov eax,wParam
.if eax==VK_TAB || eax==VK_RETURN
invoke SendMessage,ha.hEdt,WM_CHAR,VK_TAB,0
jmp Ex
.elseif eax==VK_ESCAPE
invoke ShowWindow,hWin,SW_HIDE
jmp Ex
.endif
    ;// MOUSEWHEEL CodeComplete ListBox
    .elseif eax==WM_MOUSEWHEEL
            mov eax, wParam
            shr eax, 16
            xor ecx,ecx ;LINEUP
            cmp ax,0
            jge @F
            inc ecx ; LINEDOWN
         @@:
           invoke SendMessage,hWin,WM_VSCROLL,ecx,0
...
..


Now can you whell with mouse in the Codecomplete

[KetilO]

Hi all

New upload.

Version 3.0.0.7m 2011-04-30
---------------------------
o Fixed a menu draw bug.
o Added support for mouse wheel in code complete list (thanks ragdog).

KetilO

[S_Alex]

Addins for WINAVR.

[qWord]

hi KetilO,

I can't still open includes (masm) when an comment following the include path.
Not sure,but in looking in the function OpenInclude() placed in FileIO.asm:

Code Select Expand

.if byte ptr [esi]=="'"
mov ah,"'"
inc esi
.elseif byte ptr [esi]=='"'
mov ah,'"'
inc esi
.elseif byte ptr [esi]=='<'
mov ah,'>'
inc esi
.else
mov ah,0
.endif
.while ah!=byte ptr [esi] && byte ptr [esi]
mov al,[esi]
mov [edi],al
inc esi
inc edi
.endw
it could be (for masm & C):

Code Select Expand

.if byte ptr [esi]=="'"
mov ah,"'"
inc esi
.elseif byte ptr [esi]=='"'
mov ah,'"'
inc esi
.elseif byte ptr [esi]=='<'
mov ah,'>'
inc esi
.else
mov ah,0
.endif
.while ah!=byte ptr [esi] && byte ptr [esi] && byte ptr [esi]!= ';' && word ptr [esi] != "//" && word ptr [esi] != "/*"
mov al,[esi]
mov [edi],al
inc esi
inc edi
.endw

qWord

[ragdog]

Thanks KetilO

For add this function

Why update you not all resource?
Remus has posted a Resource fix

Here is a one bug

http://www.imagebanana.com/view/47debvbx/xxx.png

And in other Dialog´s have too bugs

[ragdog]

Resource Update

- Do not Debug
- Find...
- Make Options
- IDD_DLGMENUEDIT
- Project Options
- Goto Line
- IDD_RESPREVIEWBTN
- IDC_TABOPT
- IDD_TABOPT1
- IDD_TABOPT3

- Update Checker Dialog

[KetilO]

Hi all

New upload.

Version 3.0.0.7m 2011-05-03
---------------------------
o Fixed bug where Open Include did not work (thanks qWord).
o Fixed dialog control sizes (thanks remus2k / ragdog)
o Fixed a menu draw bug.
o Added support for mouse wheel in code complete list (thanks ragdog).

KetilO

[PauloH]

KetilO

Everytime any .rc tab is closed RadAsm crashs. To make it work I need to close all tabs. I think this is a bug.
System: Win7 Ultimate 64 bits.

Thanks.

[Ficko]

Hi KetilO!

Is there a "RadASMini.rtf" for RadASM 3.0 somewhere?  ::)
I like to add some more languages but can't figure out some "magic" encoding exspecially in the "[Parse]" section.

Thanks

[sebart7]

Hello.

Resource Editor operates on "WAWE" instead of "WAVE" when creating or manipulating resources.

After fixing WAWE to WAVE in "someFile.rc", then attempt to open it with RadAsm Resource Editor,
Rad Asm will pop up "Unknown Resource. Not supported by ResEd" Error.

[ragdog]

Look in the Radasm.ini

And Change to:

[CustType]
5=WAVE,0,'Wave (*.wav)|*.wav',

[sebart7]

Thank you ragdog.

That worked  :U

[ragdog]

Hi Ketil

Gives a function to show and hide the debug window like this

Add Hide/View Debug Window to the Menu
--------------------------------------

WndProc

Code Select Expand



.elseif eax==IDM_VIEW_DEBUG
invoke SendMessage,ha.hTool,TLM_HIDE,0,ha.hToolDebug
invoke SendMessage,ha.hTool,TLM_GETVISIBLE,0,ha.hToolDebug
invoke SendMessage,ha.hTbrView,TB_CHECKBUTTON,IDM_VIEW_DEBUG,eax


CheckMenu

Code Select Expand



invoke SendMessage,ha.hTool,TLM_GETVISIBLE,0,ha.hToolDebug
push eax
push IDM_VIEW_DEBUG


Radasm30.rc

Code Select Expand


#define IDM_VIEW_TAB 10035
#define IDM_VIEW_DEBUG 10036 ;<<<<<<<<<<<<<<<<<< I use this ID im not sure if this already used
..
.

  POPUP "&View",IDM_VIEW
  BEGIN
    POPUP "&Toolbar",IDM_VIEW_TOOLBAR
    BEGIN
      MENUITEM "&Lock Toolbars",IDM_VIEW_LOCK
      MENUITEM "",10064,0x00000800
      MENUITEM "&File",IDM_VIEW_TBFILE
      MENUITEM "&Edit",IDM_VIEW_TBEDIT
      MENUITEM "&Bookmark",IDM_VIEW_TBBOOKMARK
      MENUITEM "&View",IDM_VIEW_TBVIEW
      MENUITEM "&Make",IDM_VIEW_TBMAKE
      MENUITEM "Build Type",IDM_VIEW_TBBUILD
    END
    MENUITEM "&Statusbar",IDM_VIEW_STATUSBAR
    MENUITEM "&Project",IDM_VIEW_PROJECT
    MENUITEM "Properties",IDM_VIEW_PROPERTIES
    MENUITEM "&Output",IDM_VIEW_OUTPUT
    MENUITEM "Tab Select",IDM_VIEW_TAB
    MENUITEM "View Debug",IDM_VIEW_DEBUG             ;<<<<<<<<<<<<<<<<<<<<<<





And other  to this debug window
-------------------------------

I have change my Theme by button apply works all fine with the Text and Background color
After restart radasm have this debug window again the old Text und background color

Here is fixed

Code Select Expand


GetColors proc uses ebx
LOCAL racolor:RACOLOR

invoke GetPrivateProfileString,addr szIniColors,addr szIniColors,addr szNULL,addr tmpbuff,sizeof tmpbuff,addr da.szAssemblerIni
.if eax
xor ebx,ebx
.while ebx<sizeof RADCOLOR/4
invoke GetItemInt,addr tmpbuff,0
mov dword ptr da.radcolor[ebx*4],eax
inc ebx
.endw
.else
invoke RtlMoveMemory,addr da.radcolor,addr defcol,sizeof RADCOLOR
.endif
invoke SendMessage,ha.hOutput,REM_GETCOLOR,0,addr racolor
mov eax,da.radcolor.toolback
mov racolor.bckcol,eax
mov eax,da.radcolor.tooltext
mov racolor.txtcol,eax
        ;-----------------------------------------------------------------------------------------------
invoke SendMessage,ha.hREGDebug,REM_SETCOLOR,0,addr racolor
invoke SendMessage,ha.hFPUDebug,REM_SETCOLOR,0,addr racolor
invoke SendMessage,ha.hMMXDebug,REM_SETCOLOR,0,addr racolor
invoke SendMessage,ha.hWATCHDebug,REM_SETCOLOR,0,addr racolor
         ;-----------------------------------------------------------------------------------------------


String Bug "Region searced."
----------------------------


Radasm.inc

szRegionSearched            db 'Region searced.',0
szReplaceDone               db 'Region searced.',0Dh,'%d replacements done.',0

Replace to "Region searched"




Resource editor WAWE string bug."
---------------------------------

And fix this in the Radasm.ini

[CustType]
5=WAVE,0,'Wave (*.wav)|*.wav',


New Function Autorefresh currentfile in Proberties WIndow."
-----------------------------------------------------------

And to the Proberties WIndow >>Button current file
If this button activated  for auto refresh

Radasm.inc
.data
AutoRefresh db 0

Radasm.asm

Code Select Expand


.elseif [esi].NMHDR.code==BN_CLICKED && eax==ha.hProperty
invoke SendMessage,ha.hProperty,PRM_GETSELBUTTON,0,0
.if eax==1
.if ha.hMdi
invoke GetWindowLong,ha.hEdt,GWL_ID
.if eax==ID_EDITCODE
.if da.fProject
invoke GetWindowLong,ha.hEdt,GWL_USERDATA
invoke SendMessage,ha.hProperty,PRM_SELOWNER,[eax].TABMEM.pid,0
mov AutoRefresh,TRUE ;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
.else
invoke SendMessage,ha.hProperty,PRM_SELOWNER,ha.hMdi,0
.endif
.endif
.endif
.elseif eax==2
invoke SendMessage,ha.hProperty,PRM_SELOWNER,0,0
mov AutoRefresh,FALSE  ;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
.endif
.endif


TabTool.asm

Code Select Expand


TabToolActivate proc uses ebx
LOCAL tci:TC_ITEM

invoke SendMessage,ha.hTab,TCM_GETCURSEL,0,0
mov tci.imask,TCIF_PARAM
mov edx,eax
invoke SendMessage,ha.hTab,TCM_GETITEM,edx,addr tci
mov ebx,tci.lParam
mov eax,[ebx].TABMEM.hwnd
mov ha.hMdi,eax
mov eax,[ebx].TABMEM.hedt
mov ha.hEdt,eax
invoke strcpy,offset da.szFileName,addr [ebx].TABMEM.filename
mov da.fTimer,1
invoke SendMessage,ha.hFileBrowser,FBM_SETSELECTED,0,addr [ebx].TABMEM.filename
invoke GetWindowLong,ha.hEdt,GWL_ID
.if da.fProject
invoke SendMessage,ha.hProjectBrowser,RPBM_SETSELECTED,0,addr da.szFileName
.endif
invoke SendMessage,ha.hClient,WM_MDIACTIVATE,ha.hMdi,0
  ;---------------------------------------------------------------------
          ;If current file button selected autorefresh
.if AutoRefresh==TRUE
invoke SendMessage,ha.hProperty,WM_COMMAND,5,0
.endif
        ;----------------------------------------------------------------------


RaTools Text Color Change

Code Select Expand


;Draw Caption
  .if [esi].TOOL.dFocus
        invoke SetTextColor,hDC,0h
mov eax,COLOR_ACTIVECAPTION+1
.else
invoke SetTextColor,hDC,0FFFFFFh
mov eax,COLOR_INACTIVECAPTION+1
.endif


All New function tested and works fine  :U
I know many question,idea, bugs ::)

Your can test it (compiled exe)
http://www.2shared.com/file/7DiuWoYR/RadASM_myupdate.html

Though good work for this nice IDE  :U