Uhuh, that's indeed the old theme, but as said before I now prefer the current theme with some adaptations: it's less aggressive to the eye.
SHTextStylerST80 styleTable: #(
"(symbol color [emphasisSymbolOrArray [textStyleName [pixelHeight]]])"
(default ( black ) )
(invalid ( red ) )
(excessCode ( red ) )
(comment ( green muchDarker ) )
(unfinishedComment ( green muchDarker ) )
(#'$' ( magenta muchDarker) )
(character ( magenta muchDarker) )
(integer ( magenta muchDarker) )
(number ( magenta muchDarker) )
(#- ( magenta muchDarker) )
(symbol ( magenta muchDarker) )
(stringSymbol ( magenta muchDarker) )
(literalArray ( magenta muchDarker) )
(string ( magenta muchDarker) )
(unfinishedString ( magenta muchDarker) )
(assignment ( black ) )
(ansiAssignment ( black ) )
(literal ( black ) )
(keyword ( black ) )
(binary ( black ) )
(unary ( black ) )
(incompleteKeyword ( red ) )
(incompleteBinary ( red ) )
(incompleteUnary ( red ) )
(undefinedKeyword ( red ) )
(undefinedBinary ( red ) )
(undefinedUnary ( red ) )
(patternKeyword ( black ) bold )
(patternBinary ( black ) bold )
(patternUnary ( black ) bold )
(#self ( cyan muchDarker ) )
(#super ( cyan muchDarker ) )
(#true ( cyan muchDarker ) )
(#false ( cyan muchDarker ) )
(#nil ( cyan muchDarker ) )
(#thisContext ( cyan muchDarker ) )
(#return ( black ) )
(patternArg ( blue muchDarker ) )
(methodArg ( blue muchDarker ) )
(blockPatternArg ( blue muchDarker ) )
(blockArg ( blue muchDarker ) )
(argument ( blue muchDarker ) )
(blockArgColon black )
(leftParenthesis black )
(rightParenthesis black )
(leftParenthesis1 black )
(rightParenthesis1 black )
(leftParenthesis2 black )
(rightParenthesis2 black )
(leftParenthesis3 black )
(rightParenthesis3 black )
(leftParenthesis4 black )
(rightParenthesis4 black )
(leftParenthesis5 black )
(rightParenthesis5 black )
(leftParenthesis6 black )
(rightParenthesis6 black )
(leftParenthesis7 black )
(rightParenthesis7 black )
(blockStart black )
(blockEnd black )
(blockStart1 black )
(blockEnd1 black )
(blockStart2 black )
(blockEnd2 black )
(blockStart3 black )
(blockEnd3 black )
(blockStart4 black )
(blockEnd4 black )
(blockStart5 black )
(blockEnd5 black )
(blockStart6 black )
(blockEnd6 black )
(blockStart7 black )
(blockEnd7 black )
(arrayStart black )
(arrayEnd black )
(arrayStart1 black )
(arrayEnd1 black )
(byteArrayStart black )
(byteArrayEnd black )
(byteArrayStart1 black )
(byteArrayEnd1 black )
(leftBrace black )
(rightBrace black )
(cascadeSeparator black )
(statementSeparator black )
(externalCallType black )
(externalCallTypePointerIndicator black )
(primitiveOrExternalCallStart black )
(primitiveOrExternalCallEnd black )
(methodTempBar black )
(blockTempBar black )
(blockArgsBar black )
(primitive gray )
(externalFunctionCallingConvention gray )
(module gray )
(blockTempVar ( blue muchDarker ) )
(blockPatternTempVar ( blue muchDarker ) )
(instVar ( brown darker) )
(workspaceVar ( blue muchDarker ) )
(undefinedIdentifier ( red ) )
(incompleteIdentifier ( red ) )
(tempVar ( blue muchDarker ) )
(patternTempVar ( blue muchDarker ) )
(poolConstant ( black ) bold )
(classVar ( brown darker ) )
(globalVar ( black ) bold ) )