FiveTech Software tech support forums

pip install unsloth vllm
pip install --upgrade pillow
pip install git+https://github.com/huggingface/trl.git@e95f9fb74a3c3647b86f251b7e230ec51c64b72b
pip install diffusers
pip install triton

qwen_SFT_RL.py
from unsloth import FastLanguageModel, PatchFastRL
PatchFastRL("GRPO", FastLanguageModel ...

... hb_MatrixSum(hb_MatrixMultiply(hb_MatrixSubstract(output, tgt), ;
hb_MatrixTranspose(hb_MatrixSubstract(output, tgt)))) / (10 * d_model)

// Gradiente de salida
d_output := hb_MatrixSubstract(output, tgt)

// Retropropagación y actualización de pesos
transformer:Backward(d_output ...

... return

// Clase para la capa de Multi-Head Attention
CLASS MultiHeadAttention
DATA WQ, WK, WV, WO // Pesos de la capa
DATA dWQ, dWK, dWV, dWO // Gradientes de los pesos
DATA d_model, n_heads

METHOD New(d_model, n_heads)
METHOD ScaledDotProductAttention(Q, K, V)
METHOD Forward(query, key ...

we can set a gradient color for each cell ?

oCol:bClrStd := { || { <clrtext>, <aGradient> } }

Nages,
I tried to make gradient cell color

https://i.postimg.cc/wBjJzNtj/grad.png

I made ( I have the colors on ini file and load it on a array)

aadd( aTmpColors, {aText[n], {aBack[n],aGradient[n ...

... aRbPrompts,,nOption,,nHeightRib, 26, , ,,,,,,,,.t.,)
::oRebar:l2016:=.t.
::oRebar:nRoundBox := 0

I see right the color of text of tabs but the grad of the RBBTN must be as when the ribbonbar is l2013

Perhaps there is ar error on TRBBTN class

When I use l2016 I see the color of rbbtn like 2007 ...

... there are some tools You can test :
I think You will find the infos You need

A painter :

1. any background-combination of Window/Dialog
2. gradient-painter and Image / Brush selector
3. test of function SETGRADIENT ( Grad(B) = Brush or Grad(F) = Function )
4. zoom using Mouseclick, Buttons ...

thanks run ok

Try this: (following your code)
Local bClrGrad := &#123; | lPressed | If&#40; ! lPressed,;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &#123; &#123; 1, nRGB&#40; 255, 255, 255 &#41;, nRGB&#40; 229, 233, 238 &#41; &#125; &#125;,;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &#123; &#123; 1, nRGB&#40; 229 ...

for the version 2007 I made this type of gradient

Local bClrGrad := { | lPressed | If( ! lPressed,;
{ { 1, nRGB( 253, 254, 255 ), nRGB( 179, 217, 255 ) } },;
{ { 1, nRGB( 179, 217, 255 ), nRGB( 253, 254, 255 ) } } ) }

but now I wish have a 2010 effect ...how I can modify the clrgrad ?

... endif

*------------- Proceso de Generacion del DUMP de la base de datos
lEsc := .F.

cText := ""

DEFINE BRUSH oBrush FILE oApp:cDirBmps + "grad.jpg"

DEFINE DIALOG oDls RESOURCE "DLG_AVISO2" TITLE "Mi Respaldo ..." FONT ::oFont[2] BRUSH oBrush TRANSPARENT

REDEFINE SAY oSay PROMPT cText ID ...

... between dialog- and graph :

// Dialog ( values for function-call )
// --------------------------------------
nDStyle := 2 // 1 = color / 2 = Gradient / 3 = Brush / 4 = Image
nDColorF := 16765559
nDColorB := LightColor( 175, nDColorF )
nDTxtColor := 255
nDGradpos := 0
LDDirect := .T.
cDBrush ...

Goosfancito.

Utiliza una funcion externa para la asignacion del color, no dentro del bloque de codigo que define el GRAD.

Tal como lo habia hecho yo, llamando a validacolor() en el valid del Boton.
Si quieres guardar el color elegio, la variable COLOR1 la puedes traspasar a un DBf o un campo de una ...

Can we not simplify this program using the latest features like GRADIENT clause?
Also we can derive one combined aGrad array from multiple Grad arrays.
function TestGradPartial&#40;&#41;&nbsp; &nbsp;local oDlg, oFont, oBrush&nbsp; &nbsp;local aGrad&nbsp; &nbsp;aGrad := &#123; &#123; 0.10, RGB&#40 ...

Hello,

the promised Image-zoomer

1. any background-combination of Window/Dialog
2. gradient-painter and Image / Brush selector
3. test of function SETGRADIENT ( Grad(B) = Brush or Grad(F) = Function )
4. zoom using Mouseclick, Buttons or Tselex
5. create a PRG- and EXE-file
6. embedded PIXELFORMER ...

... Your application.
A straight connection to PIXELFORMER is included as well.
It makes it possible, to change something of the selected Image.

The gradient-array saved to var aDlgActual ( nDGradPos = Grad.-pos, nDColorF = 1. Color, nDColorB = 2. Color ) :
aDlgActual := { { nDGradPos, nDColorF ...