Skip to main content
deleted 674 characters in body
Source Link
user45941
user45941

Actually, 3220 bytes

0'u';"7╙D@%c◙0"'#,⌠";#"íu⌡░ΣÆÆƒX'#@s⌠';@c7╙D@%c⌡MdXΣ 

Try it online!

##ExplanationTry it online!

This Actually program converts the ;# program to an Actually program through simple string substitution. With the accumulator value on top of the stack, the ;# ; instruction is equivalent to u in Actually (increment), and # is equivalent to 7╙D@%c◙0 (modulo by 2**7-1, convert to ASCII char, print without newline, push 0).Explanation:

0'u';"7╙D@%c◙0"'#,⌠";#"íu⌡░ΣÆÆƒX'#@s⌠';@c7╙D@%c⌡MdXΣ 0 '#@s push 0 (the initialsplit accumulatoron value)"#"   ,⌠";#"íu⌡░ ⌠';@c7╙D@%c⌡M filter (take only values where functionfor returnseach truthy)chunk:   ';@c ";#"íu one-basedcount indexoccurrences of the character in the string ";#", or 0 if not found Σ  concatenate";"   "7╙D@%c◙0"'#  7╙D@% Æ  replace "#" with "7╙D@%c◙0"mod inby the127 input(2**7-1)  'u';  c Æ  replaceconvert ";"to withASCII "u"char   ƒdX executediscard thelast codeitem   X discard theΣ accumulator valueconcatenate 

Actually, 32 bytes

0'u';"7╙D@%c◙0"'#,⌠";#"íu⌡░ΣÆÆƒX 

Try it online!

##Explanation

This Actually program converts the ;# program to an Actually program through simple string substitution. With the accumulator value on top of the stack, the ;# ; instruction is equivalent to u in Actually (increment), and # is equivalent to 7╙D@%c◙0 (modulo by 2**7-1, convert to ASCII char, print without newline, push 0).

0'u';"7╙D@%c◙0"'#,⌠";#"íu⌡░ΣÆÆƒX 0  push 0 (the initial accumulator value)   ,⌠";#"íu⌡░  filter (take only values where function returns truthy):   ";#"íu one-based index of the character in the string ";#", or 0 if not found Σ  concatenate   "7╙D@%c◙0"'#  Æ  replace "#" with "7╙D@%c◙0" in the input  'u';  Æ  replace ";" with "u"   ƒ execute the code   X discard the accumulator value 

Actually, 20 bytes

'#@s⌠';@c7╙D@%c⌡MdXΣ 

Try it online!

Explanation:

'#@s⌠';@c7╙D@%c⌡MdXΣ '#@s split on "#" ⌠';@c7╙D@%c⌡M for each chunk: ';@c count occurrences of ";" 7╙D@% mod by 127 (2**7-1) c convert to ASCII char dX discard last item Σ concatenate 
deleted 210 characters in body
Source Link
user45941
user45941

Actually, 3532 bytes

0'u';"7╙D@%c◙0"'#,⌠;";#"íub*⌡MΣÆÆƒX⌠";#"íu⌡░ΣÆÆƒX 

Try it online!Try it online!

##Explanation

This Actually program converts the ;# program to an Actually program through simple string substitution. With the accumulator value on top of the stack, the ;# ; instruction is equivalent to u in Actually (increment), and # is equivalent to 7╙D@%c◙0 (modulo by 2**7-1, convert to ASCII char, print without newline, push 0).

0'u';"7╙D@%c◙0"'#,⌠;";#"íub*⌡MΣÆÆƒX⌠";#"íu⌡░ΣÆÆƒX 0  push 0 (the initial accumulator value) ,⌠;";#"íub*⌡MΣ ⌠";#"íu⌡░ peform the following on each characterfilter in(take theonly inputvalues andwhere concatenatfunction thereturns resulttruthy): ; duplicate the character   ";#"íu  one-based index of the character in the string ";#", or 0 if not found   b*  convert to boolean and repeat the character that many times (1 ifΣ it is ";" or "#" and 0 otherwise)concatenate "7╙D@%c◙0"'#  Æ replace "#" with "7╙D@%c◙0" in the input 'u';  Æ replace ";" with "u"   ƒ execute the code   X discard the accumulator value 

Actually, 35 bytes

0'u';"7╙D@%c◙0"'#,⌠;";#"íub*⌡MΣÆÆƒX 

Try it online!

##Explanation

This Actually program converts the ;# program to an Actually program through simple string substitution. With the accumulator value on top of the stack, the ;# ; instruction is equivalent to u in Actually (increment), and # is equivalent to 7╙D@%c◙0 (modulo by 2**7-1, convert to ASCII char, print without newline, push 0).

0'u';"7╙D@%c◙0"'#,⌠;";#"íub*⌡MΣÆÆƒX 0  push 0 (the initial accumulator value) ,⌠;";#"íub*⌡MΣ  peform the following on each character in the input and concatenat the result: ; duplicate the character   ";#"íu  one-based index of the character in the string ";#", or 0 if not found   b*  convert to boolean and repeat the character that many times (1 if it is ";" or "#" and 0 otherwise) "7╙D@%c◙0"'#  Æ replace "#" with "7╙D@%c◙0" in the input 'u';  Æ replace ";" with "u"   ƒ execute the code   X discard the accumulator value 

Actually, 32 bytes

0'u';"7╙D@%c◙0"'#,⌠";#"íu⌡░ΣÆÆƒX 

Try it online!

##Explanation

This Actually program converts the ;# program to an Actually program through simple string substitution. With the accumulator value on top of the stack, the ;# ; instruction is equivalent to u in Actually (increment), and # is equivalent to 7╙D@%c◙0 (modulo by 2**7-1, convert to ASCII char, print without newline, push 0).

0'u';"7╙D@%c◙0"'#,⌠";#"íu⌡░ΣÆÆƒX 0 push 0 (the initial accumulator value) ,⌠";#"íu⌡░ filter (take only values where function returns truthy): ";#"íu one-based index of the character in the string ";#", or 0 if not found Σ concatenate "7╙D@%c◙0"'# Æ replace "#" with "7╙D@%c◙0" in the input 'u'; Æ replace ";" with "u" ƒ execute the code X discard the accumulator value 
added 920 characters in body
Source Link
user45941
user45941

Actually, 1735 bytes

'#@s♂l7╙D@♀%♂cdXΣ0'u';"7╙D@%c◙0"'#,⌠;";#"íub*⌡MΣÆÆƒX 

Try it online!Try it online!

Explanation:##Explanation

This Actually program converts the ;# program to an Actually program through simple string substitution. With the accumulator value on top of the stack, the ;# ; instruction is equivalent to u in Actually (increment), and # is equivalent to 7╙D@%c◙0 (modulo by 2**7-1, convert to ASCII char, print without newline, push 0).

'#@s♂l7╙D@♀%♂cdXΣ0'u';"7╙D@%c◙0"'#,⌠;";#"íub*⌡MΣÆÆƒX '#@s0 split input on "#" push 0 (the initial accumulator value) ♂l length,⌠;";#"íub*⌡MΣ of peform the following on each chunkcharacter ofin semicolonsthe input and concatenat the result: 7╙D@♀% modulo each length with 127 (2**8 ; duplicate the character ";#"íu one-1)based index of the character in the string ";#", or 0 if not found ♂c  b*  convert to ASCIIboolean and repeat the character that many times (1 if it is ";" or "#" and 0 otherwise)   "7╙D@%c◙0"'# dX discard Æ replace "#" with "7╙D@%c◙0" in the lastinput  one'u'; Æ replace ";" with "u" Σ concatenate ƒ execute the code X discard the accumulator value 

Actually, 17 bytes

'#@s♂l7╙D@♀%♂cdXΣ 

Try it online!

Explanation:

'#@s♂l7╙D@♀%♂cdXΣ '#@s split input on "#" ♂l length of each chunk of semicolons 7╙D@♀% modulo each length with 127 (2**8-1) ♂c convert to ASCII character dX discard the last one Σ concatenate 

Actually, 35 bytes

0'u';"7╙D@%c◙0"'#,⌠;";#"íub*⌡MΣÆÆƒX 

Try it online!

##Explanation

This Actually program converts the ;# program to an Actually program through simple string substitution. With the accumulator value on top of the stack, the ;# ; instruction is equivalent to u in Actually (increment), and # is equivalent to 7╙D@%c◙0 (modulo by 2**7-1, convert to ASCII char, print without newline, push 0).

0'u';"7╙D@%c◙0"'#,⌠;";#"íub*⌡MΣÆÆƒX 0  push 0 (the initial accumulator value) ,⌠;";#"íub*⌡MΣ  peform the following on each character in the input and concatenat the result:  ; duplicate the character ";#"íu one-based index of the character in the string ";#", or 0 if not found   b*  convert to boolean and repeat the character that many times (1 if it is ";" or "#" and 0 otherwise)   "7╙D@%c◙0"'#  Æ replace "#" with "7╙D@%c◙0" in the input  'u'; Æ replace ";" with "u"  ƒ execute the code X discard the accumulator value 
Source Link
user45941
user45941
Loading