Creating an Alphabet & Number Pcell for chip label

Hello,

I am quite new to skill not even 2 months, I am trying to make a pcell for my company where I need to write Alphabet and number in different Metals for Example "Chip01" and it should be scaleable. I have created the polygons for all alphabets and number and could change metals and scale them. But now i need a cdf with user input and write whatever the name is and this will show my desired polygon according to the string input in CDF, but i am unable to do so, i ask for help.

What i am looking for is  the user can put a string combination of Alphabets and number and which will show in the layout the respective polygons in pecell with the x distance from each other. Please help!!

Here is a small portion of my code

LIBRARY = "wk_shahriar"
CELL = "rectangle"
cdf = cdfGetBaseCellCDF(ddGetObj(LIBRARY CELL))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

procedure( AlphaSicoya(cv Layer)

Alpha_A = dbCreatePolygon(cv list(Layer "drawing") list(0:0 0:37.4 6.6:44 20.9:44 27.5:37.4 27.5:0 22:0 22:19.8 11.23:19.8 11.23:25.3 22:25.3 22:34.1 17.6:38.5 9.9:38.5 5.5:34.1 5.5:0))
Alpha_B = dbCreatePolygon(cv list(Layer "drawing") list(0:0 0:44 5.5:44 5.5:5.5 17.6:5.5 22:9.9 22:15.4 15.4:22 8.8:22 8.8:27.5 15.4:27.5 20.9:33 20.9:35.2 17.6:38.5 8.8:38.5 8.8:44 20.9:44 27.5:37.4 27.5:30.8 22:25.3 27.5:19.8 27.5:6.6 20.9:0))

.

.

.

Numbr_0 = dbCreatePolygon(cv list(Layer "drawing") list(3:0 0:3 0:17 3:20 5.5:20 5.5:17.5 4.5:17.5 2.5:15.5 2.5:4.5 4.5:2.5 8:2.5 10:4.5 10:8.32 8.32:8.32 7:7 5:9 10:14 10:15.5 8:17.5 7.5:17.5 7.5:20 9.5:20 12.5:17 12.5:3 9.5:0))
Numbr_1 = dbCreatePolygon(cv list(Layer "drawing") list(0:0 0:2.5 4:2.5 4:15.5 2.5:15.5 1:14 -1:16 3:20 6.5:20 6.5:2.5 10:2.5 10:0))

.

.

);let

);procedure

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

procedure( FactorSicoya(cv s)

let( ()

scale_A = dbMoveFig(Alpha_A Alpha_A~>cellView list(0:0 "R0" s))
scale_B = dbMoveFig(Alpha_B Alpha_B~>cellView list(50:0 "R0" s))

.

.

scale_0 = dbMoveFig( Numbr_0 Numbr_0~>cellView list(50:-30 "R0" s))
scale_1 = dbMoveFig( Numbr_1 Numbr_1~>cellView list(100:-30 "R0" s))

.

.

);let

);procedure

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

/* Pcell Creation*/
pcDefinePCell( list(ddGetObj("wk_shahriar") "rectangle" "layout")

list(
(Layer "Metal1")
(s "float" cdf->s->defValue)
(text string "SICOYA")
)

cv = pcCellView

AlphaSicoya(cv Layer )
FactorSicoya(cv s)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
/* Creation of the CDF window*/

let( (LIBRARY CELL libId cellId cdfId)
LIBRARY = "wk_shahriar"
CELL = "rectangle"
unless( cellId = ddGetObj( LIBRARY CELL )
error( "Could not get cell %s." CELL))

when( cdfId = cdfCreateBaseCellCDF( cellId )
cdfDeleteCDF( cdfId )
)
cdfId = cdfCreateBaseCellCDF(cellId )

cdfCreateParam( cdfId
?name "Layer"
?prompt "Layer"
?defValue "Metal1"
?choices '("Metal1" "Metal2" "Metal3" "TopMetal1" "TopMetal2")
?type "cyclic"
)/*Selection of Metals*/

cdfCreateParam( cdfId
?name "s"
?prompt "s"
?defValue 1
?type "float"
?callback "CCScheckParamValue5('s)"
) /*Selection of ScaleFactor*/

cdfCreateParam( cdfId
?name "text"
?prompt "text"
?defValue "SICOYA"
?type "string"
;?callback "Text('text)"
) /*Selection of ScaleFactor*/

cdfSaveCDF( cdfId )
)

)