Recent posts

Welcome to Interactive PowerBasic Forum.
Log in
Sign up

May 21, 2024, 11:52:31 AM

Main Menu

Home
Search

Recent posts

Pages1 2 3 4 5 6 7 8 9 10

Contentious discussions about anything, the world, politics and health topics. / Re: Studying Near Death Experi...

Last post by Theo Gottwald - Today at 10:27:50 AM

Very interesting topic.
I often look into this. There are many videos on YouTube.

Most people say that they think its even more REAL then their previous life.

OxygenBasic Examples / Re: Asm multiplication

Last post by Theo Gottwald - Today at 09:39:18 AM

That is not a simple question, as you do not say what datatypes you want to multiply.
Then there may be differences in handling signed, unsigned Integer and/or FP-Data.
FP-Numbers can also be different formats.

Let me say that such questions get most easily answers if you just let AI explain it to you.

QuoteTo multiply two numbers in x86 assembly, you can use the mul instruction. Here is an example of how to multiply two numbers stored in the eax and ebx registers:

Move the first number into the eax register:
mov eax, first_number

Move the second number into the ebx register:
mov ebx, second_number

Multiply the two numbers using the mul instruction. The mul instruction multiplies the value in the eax register by the value in the specified register or memory location, and stores the result in the eax (lower 32 bits) and edx (upper 32 bits) registers:
mul ebx

The result of the multiplication is now stored in the eax register (if the result is less than 32 bits) or in the edx:eax register pair (if the result is 64 bits).
Here is the complete code:

section .data
first_number dd 5
second_number dd 10

section .bss
result resd 1

section .text
global _start

_start:
; load the first number into eax
mov eax, [first_number]

; load the second number into ebx
mov ebx, [second_number]

; multiply eax by ebx
mul ebx

; store the result in [result]
mov [result], eax

; exit the program
mov eax, 1
xor ebx, ebx
int 0x80
In this example, the first number is 5 and the second number is 10. The result of the multiplication is 50, which is stored in the eax register.

General Discussion / Re: Why is it so hard to retur...

Last post by Theo Gottwald - Today at 09:35:51 AM

General Discussion / Re: The future of ... PowerBas...

Last post by Theo Gottwald - Today at 09:25:44 AM

Hallo Johann and anybody who can login to the Powerbasic Forum,
I can not download any stuff from the Powerbasic Forum, due they removed me some years ago.

If you find some interesting stuff there, you are free, to copy the posts - especially those with attachments to this forum.

When the PB Forum has been closed parts may still be available in the wayback machine but attachments will not.

OxygenBasic Examples / Asm multiplication

Last post by Frank Brübach - Today at 12:49:14 AM

Hello

Simple question I have how to multiply two values in asm?

Code Select

' multiplication of two values
'
byte val1
byte val2
int result

macro myMul(val1,val2)
    val1=5
    val2=10

    ! mov eax,val1 
    ''! mov eax,val2 
    ! mul val2 
    ! mov result,wax
end macro

'print "the result of val1*val2 is " + str(myMul(val1,val2))  
'print "the result of val1*val2 is " + str(result)

OxygenBasic Examples / Re: Tabcontrol color

Last post by Zlatko Vid - Yesterday at 10:16:24 PM

Hi Pierre

I have troubles to get this work properly
I mean ..how to change at runtime color of edit control
i tried this:

Code Select

ASE WM_CTLCOLOREDIT
	'by Pierre Bellisle..
  select GetDlgCtrlID(lparam)
		case ed1ID
             if theme = 4 : SetBkColor(wparam, RGB(43,42,54)): end if
                SetTextColor(wparam,RGB(240,230,230))     
              return darkBrush 'darkColor
         case else
              darkBrush = CreateSolidBrush(RGB(255,255,255))
             SetBkColor( wparam, RGB(255,255,255))
	        if theme <> 4 : SetTextColor( wparam,RGB(0,0,0)) : end if 
            return  darkBrush
        
  end select