Me! Me! Look at me!

[MarillionFan]

Still waiting.

I'm using the 'how to keep idiots in suspense' approach.

[Clippy]

Plan B is in the oven, Plan C is in the toaster and Plan D is in the sh!tter.

To all you planners out there good luck and see you on Dragons Den.

[MaryPoppins]

I'm using the 'how to keep idiots in suspense' approach.

Learning from your boss? Nice.

[Lockhouse]

I'm having a staycation next week. I'm just going to potter around the estate, go for walks and go down the pub. I am going to try to avoid going anywhere near a computer. See you later!

[MarillionFan]

I'm having a staycation next week. I'm just going to potter around the estate, go for walks and go down the pub. I am going to try to avoid going anywhere near a computer. See you later!

Chav.

[Lockhouse]

Chav.

[Zippy]

Chav.

That should have read country estate, obviously. Townie.

[MarillionFan]

That should have read country estate, obviously. Townie.

He could have said 'hang around the lifts at the bottom of my flats' I suppose.

[Clippy]

He could have said 'hang around the lifts at the bottom of my flats' I suppose.

Thank you for your application but this position has now been filled by a Richard Cranium.

[darmstadt]

/* rexx */
Parse Arg inputstr,srcform,trgform
ile = Length(srcform)
ole = Length(trgform)
outputStr = ''
ax='4142434445464748494A4B4C4D4E4F5051525354555657 58595A'||, /*ABC...*/
'6162636465666768696A6B6C6D6E6F7071727374757677787 97A'||, /*abc...*/
'30313233343536373839'||, /*123...*/
'E4F6FCC4D6DCDF'||, /*{¦}¢\!*/
'00202122232425262728292A2B2C2D2E2F3A3B3C3D3E3F40' ||, /*sond_1*/
'5B5C5D5E5F607B7C7D7E9BF8' /*sond_2*/
ex='C1C2C3C4C5C6C7C8C9D1D2D3D4D5D6D7D8D9E2E3E4E5E6 E7E8E9'||,
'818283848586878889919293949596979899A2A3A4A5A6A7A 8A9'||,
'F0F1F2F3F4F5F6F7F8F9'||,
'43CCDC63ECFC59'||,
'00405A7F7B5B6C507D4D5D5C4E6B604B617A5E4C7E6E6F7C' ||,
'ADE0BD5F6D79C04FD0A14A70'
Select
When srcform = 'E' Then Do
itable = ex
ixconv = 1
End
When srcform = 'EH' Then Do
itable = ex
ixconv = 0
End
When srcform = 'A' Then Do
itable = ax
ixconv = 1
End
When srcform = 'AH' Then Do
itable = ax
ixconv = 0
End
Otherwise Do
Say "no valid input mode selected. Use one of 'E' 'EH' 'A' 'AH'"
Exit 1
End
End
Select
When trgform = 'E' Then Do
otable = ex
oxconv = 1
End
When trgform = 'EH' Then Do
otable = ex
oxconv = 0
End
When trgform = 'A' Then Do
otable = ax
oxconv = 1
End
When trgform = 'AH' Then Do
otable = ax
oxconv = 0
End
Otherwise Do
Say "no valid output mode selected. Use one of 'E' 'EH' 'A' 'AH'"
Exit 1
End
End
Do i = 1 To Length(inputstr) By ile
inchar = Substr(inputstr,i,ile)
if ixConv then
If ixconv Then inchar = c2x(inchar)
indexfound = 0
index = 0
Do Until indexfound | index = 0
index = Pos(inchar,itable,index + 1)
If index > 0 & index // 2 Then indexfound = 1
End
If indexfound Then Do
outchar = Substr(otable,index,2)
If oxconv Then outchar = X2c(outchar)
End
Else Do
Say 'sorry...couldn''t find' srcform '->' trgform ,
'translation for "'inchar'"'
Say " inputstr = "inputstr" ==> outputstr = "outputstr
outchar = '?'
End
outputstr = outputstr || outchar
End
Return outputstr