SIMULADOR DE POLÍTICAS DE UBICACIÓN, SUSTITUCIÓN Y ESCRITURA DE MEMORIA CACHÉ
Anexo 3

Bloque tres: definición de distribución de espacio de memoria caché en base al tamaño y número de sets, así como la inicialización de los apuntadores por set para actualización y despliegue de la tabla.

 

Private Sub MEMORIA_Click()

    memc = MC.ItemData(MC.ListIndex)

    noset = NSET.ItemData(NSET.ListIndex)

    celda = memc / noset

   

    If celda > 4 Then

        colu = 4

        fila = memc / 4

        filaset = celda / 4

    Else

        colu = celda

        fila = memc / celda

        filaset = 1

    End If

   

    TABLA.Rows = fila

    TABLA.Cols = colu

    TABLAFILA.Rows = noset

    TABLAFILA.Cols = 1

   

    ReDim dato(2, 1 To noset)

    ReDim datoLRU(noset, celda)

    For i = 1 To noset

        dato(1, i) = i

        dato(2, i) = 0

        datoLRU(i, 0) = i

        For j = 1 To celda

            datoLRU(i, j) = 0

        Next

    Next

        For i = 0 To (colu - 1)

        TABLA.ColWidth(i) = 2000

    Next

    TABLA.Width = 2060 * colu - 18 * colu

    For i = 0 To (fila - 1)

        TABLA.RowHeight(i) = 500

    Next

    TABLA.Height = 540 * fila

    TABLAFILA.ColWidth(0) = 500

    TABLAFILA.Width = 510

 

    For i = 0 To (noset - 1)

        TABLAFILA.RowHeight(i) = 500 * filaset

        TABLAFILA.TextMatrix(i, 0) = Str(i + 1)

    Next

 

    TABLAFILA.Height = 540 * fila

    TABLA.Visible = True

    TABLAFILA.Visible = True

End Sub

Regresar al artículo